AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--puntos varios

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-07-24 17:37:16 -07:00
parent ec4e5c4072
commit d4140fad0b
9 changed files with 85 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Compras/Compras.aspx.vb
View File

@@ -9919,6 +9919,7 @@ Partial Class Compras_Compras
e.Row.FCTextBox("TxtAnticipo").Attributes.Add("data-tcanticipo", tTCFecha.ToString)
e.Row.FCTextBox("TxtComision").Attributes.Add("data-tcanticipo", tTCFecha.ToString)
Dim TCAnt As Decimal = If(DdlMoneda.SelectedValue = "1", 1, If(CveCompra > 0, LblTC.Text.Replace("TC:", "").ToDecimal, TxtTC.Text.ToDecimal))
@@ -13309,7 +13310,7 @@ Partial Class Compras_Compras
DDLDevolucion.Items.Clear()
Dim dtt As DataTable = objcompras.DtResultados
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then 'solo los últimos 3 meses
dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-6).ToString("yyyy/MM/dd")}#")
dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-12).ToString("yyyy/MM/dd")}#")
End If
DDLDevolucion.DataSource = dtt
DDLDevolucion.Items.Insert(0, New ListItem("Seleccione", "-1"))