diff --git a/Ventas/PVCobranza.aspx b/Ventas/PVCobranza.aspx index a69e53fd1..6a5f1b790 100644 --- a/Ventas/PVCobranza.aspx +++ b/Ventas/PVCobranza.aspx @@ -500,19 +500,26 @@
-
+
$
-
+
$
+ +
+ $ + + +
+
diff --git a/Ventas/PVCobranza.aspx.vb b/Ventas/PVCobranza.aspx.vb index 8cbfdf484..f9c88e062 100644 --- a/Ventas/PVCobranza.aspx.vb +++ b/Ventas/PVCobranza.aspx.vb @@ -651,6 +651,7 @@ Partial Class Ventas_PVCobranza DtPagos.Rows.Add({1, TxtImporteEfectivo.Text.ToDecimal}) End If + Dim PagoMaximo = DtPagos.MAX("Importe") Dim CveFormaPago As Integer = DtPagos.FiltroPrimeroValor("CveFormaPago", $"Importe = {PagoMaximo}").ToEntero()