From 26c7a25f01782da96a2a7f88926e172b50ba6495 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 21 Feb 2022 18:57:08 -0700
Subject: [PATCH] =?UTF-8?q?---=20ancho=20ddlvendedor=20y=20ddlnc=20--=20re?=
 =?UTF-8?q?cacula=20el=20ieps,=20en=20refacturaci=C3=B3n?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/Ventas.aspx    | 4 ++--
 Ventas/Ventas.aspx.vb | 6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index d5e3c7e8b..3db0a9422 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -619,7 +619,7 @@
                         <tr align="left" runat="server" id="trNCFactura" visible="false">
                             <td><b>Factura:</b></td>
                             <td>
-                                <asp:DropDownList ID="DdlNCFactura" AutoPostBack="true" runat="server" CssClass="form-control input-sm select2me " DataTextField="Factura" DataValueField="CveVenta" Width="100%">
+                                <asp:DropDownList ID="DdlNCFactura" AutoPostBack="true" runat="server" CssClass="form-control input-sm select2me " DataTextField="Factura" DataValueField="CveVenta" Width="200px">
                                 </asp:DropDownList>
                                 <asp:Label ID="LblSerieFolioPadre" runat="server" Visible="false"></asp:Label>
                                 <asp:HiddenField ID="HdnFolioFiscalNC" runat="server" />
@@ -679,7 +679,7 @@
                             <td>
                                 <asp:UpdatePanel ID="UPPVentas" runat="server" UpdateMode="Conditional">
                                     <ContentTemplate>
-                                        <asp:DropDownList ID="DdlVendedor" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" Width="100%">
+                                        <asp:DropDownList ID="DdlVendedor" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" Width="200px">
                                             <asp:ListItem Selected="true" Text="Sin asignar" Value="0"></asp:ListItem>
                                         </asp:DropDownList>
                                     </ContentTemplate>
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 368aaca72..768786cfd 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:=False, SeActualiza:=True)
+                                        CveVentaDetalle:=dr("CveVentaDetalle").ToString().ToEntero(), RegeneraIEPS:=True, SeActualiza:=True)
 
 
                     Next
@@ -7187,7 +7187,7 @@ Partial Class Ventas
                 If ObjClientes.GetVenta(pCveVenta, UsuarioActual.CveEmpresa) AndAlso ObjClientes.DtResultados.Rows.Count > 0 Then
                     DTFacNC = ObjClientes.DtResultados
                     Dim drvv As DataRow = DTFacNC.FiltroPrimero("")
-                    DTFacNC.Columns.Add("Factura", GetType(String), " Folio + ' - ' + Fecha + ' $' + Total")
+                    DTFacNC.Columns.Add("Factura", GetType(String), " Folio + ' - ' +' $' + Total + ' - ' + Fecha ")
                     HdnFolioFiscalNC.Value = drvv("FolioFiscal").ToString()
 
                     If DTFacNC IsNot Nothing AndAlso DTFacNC.Rows.Count > 0 Then
@@ -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 Not RegeneraIEPS AndAlso Not FacturaDesglosoIEPS Then
+                If RegeneraIEPS AndAlso FacturaDesglosoIEPS Then
                     PU = PU * (1 + DrPS("IEPSPorcentaje").ToString().ToDecimal)
                     VentaDesglosaIEPS = True
                 End If