From b28c95acd9f1b30105d6efc69812fa9ccdc488ec Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Tue, 2 Jun 2020 10:01:23 -0700
Subject: [PATCH] Correccion en aplicacion de notas de credito

---
 Ventas/Ventas.aspx.vb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index f6f71a957..f5fdd155e 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -7858,7 +7858,7 @@ Partial Class Ventas
                             dr("SATClaveUM") = "ACT"
                             dr("Consec") = ii
 
-                            dr("PorcentajeIVA") = dr("PorcentajeIVA").ToString().ToDecimal
+                            dr("PorcentajeIVA") = Drr("PorcentajeIVA").ToString().ToDecimal
 
                             dr("IVA") = Drr("PorcentajeIVA")
                             dr("ImporteIVA") = Drr("ImporteIVA").ToString().ToDecimal
@@ -12817,13 +12817,13 @@ Partial Class Ventas
 
                 'cuando es amortización por NOTA DE CREDITO
                 If DdlTipoAmortizacionAnticipo.SelectedValue = "2" Then
-                    LblAntAplicados.Text = "Amortización por Nota de Crédito" : LblAntAplicados.Visible = True
+                    LblAntAplicados.Text = String.Format("Amortización por Nota de Crédito: {0:C}", Amortizacion) : LblAntAplicados.Visible = True
                     Amortizacion = 0
                     HdnTipoDescuento.Value = "-1"
                     HdnDescuento.Value = "0"
                     RegistraScript("BorraDescuentos();")
                     HdnTieneAnticiposVinculados.Value = "1"
-
+                    AplicaNCMasiva = True
                 End If
 
                 'cuando es AMORTIZACIÓN CON FACTURA EN CERO