From c6d6cb57d5ce0d414f31e9686446015b5f101ef0 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 24 Feb 2022 10:33:37 -0700
Subject: [PATCH] --parametro

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

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 768786cfd..03b5936b4 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -5537,7 +5537,7 @@ Partial Class Ventas
                                         dr("CvePS").ToString().ToEntero(), dr("PS").ToString(), dr("Obs").ToString(), dr("PU").ToString().ToDecimal, dr("Descuento").ToString().ToDecimal,
                                         dr("CveProyecto").ToString().ToEntero(), dr("Proyecto").ToString(), dr("CveSubProyecto").ToString().ToEntero(), dr("SubProyecto").ToString(),
                                         CveContratoDetalle:=dr("CveContratoDetalle").ToString().ToEntero(), CveVentaDetalleCotizacion:=dr("CveVentaDetalleCotizacion").ToString().ToEntero(),
-                                        CveVentaDetalle:=dr("CveVentaDetalle").ToString().ToEntero(), RegeneraIEPS:=True, SeActualiza:=True)
+                                        CveVentaDetalle:=dr("CveVentaDetalle").ToString().ToEntero(), RegeneraIEPS:=False, SeActualiza:=True)
 
 
                     Next
@@ -17872,7 +17872,7 @@ Partial Class Ventas
             Dim FacturaDesglosoIEPS As Boolean = ((CveDevolucion > 0 AndAlso NuevaFactura = 1) AndAlso (Me.ObjFacturaNC IsNot Nothing AndAlso Not Me.ObjFacturaNC.VentaDesglosaIEPS))
 
             If Not ClienteDesglosaIEPS Then
-                If RegeneraIEPS AndAlso FacturaDesglosoIEPS Then
+                If Not RegeneraIEPS AndAlso Not FacturaDesglosoIEPS Then
                     PU = PU * (1 + DrPS("IEPSPorcentaje").ToString().ToDecimal)
                     VentaDesglosaIEPS = True
                 End If