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

-- activar otros ingresos en devolucion de efectivo de compras

Browse Source
This commit is contained in:
rrene
2023-10-06 12:04:44 -07:00
parent 01f48dfdba
commit a6e105bdd9
2 changed files with 18 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Bancos/IE.aspx.vb
View File

@@ -638,7 +638,9 @@ Partial Class Bancos_IE
'CargaNotas()
DVDevolucion.Visible = True
HdnCveProveedor.Value = Request("CveProveedor")
DivOtrosIngresosEgresos.Visible = False
DivOtrosIngresosEgresos.Visible = True
TxtOtrosIngresosEgresos.Attributes.Add("onkeyup", $"ValidarCantidadDevCompras();")
End If
TxtImporte.Attributes.Add("onkeypress", "javascript: return false;")
End If
@@ -647,10 +649,8 @@ Partial Class Bancos_IE
If UsuarioActual.Empresa.Funcionalidad(590) = "1" Then
DivOtrosIngresosEgresos.Visible = True
End If
End If
If Request("Opcion") IsNot Nothing AndAlso Request("Opcion").ToString.Contiene("EGSCREDITO") Then
LblPagueseA.Text = ""
LblPagueseA.Visible = False
@@ -2468,10 +2468,6 @@ Partial Class Bancos_IE
Exit Select
End If
'NC COMPLEMENTARIA
If tCveMoneda > 1 Then
@@ -4836,6 +4832,8 @@ Partial Class Bancos_IE
ImporteOriginalDevDin = UrlParametros("ORIGINAL").ToString.ToDecimal.RoundSQL(6)
TxtImporte.Text = UrlParametros("SALDO").ToString.FormatoNumero()
TxtDevolución.Text = UrlParametros("SALDO").ToString.FormatoNumero()
divTxtDevolucion.Visible = True
lblDevolucion.Visible = True
'TxtImporte.Attributes.Add("onkeyup", $"FormatoMoneda(this);ValidarCantidad(this,{UrlParametros("SALDO").ToString});")
TxtDevolución.Attributes.Add("onkeyup", $"FormatoMoneda(this);ValidarCantidadDev( {UrlParametros("SALDO").ToString});")
TxtOtrosIngresosEgresos.Attributes.Add("onkeyup", $"ValidarCantidadDev();")