From 2da0b5b0095ace063d77df4d83a3dbf86a4c6565 Mon Sep 17 00:00:00 2001 From: JPerez Date: Mon, 9 Jun 2025 15:12:13 -0700 Subject: [PATCH] --FIX ajuste por saldo al aplicar RNC por concepto --- Ventas/Ventas.aspx | 2 +- Ventas/Ventas.aspx.vb | 7 ++++++- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx index 97640280d..390e804f4 100644 --- a/Ventas/Ventas.aspx +++ b/Ventas/Ventas.aspx @@ -7699,7 +7699,7 @@
+ DataKeyNames="CveVenta,CveVentaDetalleRNC,CvePS,PU,PorcentajeIVA,Saldo" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn" GridLines="None"> diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 810d41a9e..bed1c3e60 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -36698,10 +36698,15 @@ Partial Class Ventas Dim ImporteIVA As Decimal = (TotalCalculableImpuestos * PorcentajeIVA).RoundSQL(2) Dim TotalRNCDetalle As Decimal = (TotalCalculableImpuestos + ImporteIVA) + Dim Saldo As Decimal = GvRow.DataKey("Saldo").ToDecimal() + + 'AJUSTAR SALDO SI EL TOTAL ES MAYOR + If TotalRNCDetalle > Saldo Then + TotalRNCDetalle = Saldo + End If TotalRNC += TotalRNCDetalle - End If End If