Cancelacion de NC con RNC relacionadas

2021-06-26 12:55:32 -07:00
parent 3278709e48
commit ad742bb5fd
3 changed files with 92 additions and 2 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -8240,7 +8240,7 @@ Partial Class Ventas
                Dim GeneroDescuentoProntoPago As Boolean = False

                'SOLO GENERAR NC POR DESCUENTO PRONTO PAGO SI EL PAGO ES DE CONTADO
-                If RBLPago.SelectedValue = "2" AndAlso ObjFactura.DescuentoProntoPago > 0 Then
+                If ErrorList.Count = 0 AndAlso RBLPago.SelectedValue = "2" AndAlso ObjFactura.DescuentoProntoPago > 0 Then
                    Dim ImportePagado = DtPagos.SUM("Importe").ToString().ToDecimal
                    Dim ImporteRNC As Decimal = LblDescuentosRNC.Text.ToDecimal()