From 7018f4bb42ff1b0aff4e4b97bdebe1b0544311d3 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 26 Jun 2024 06:38:46 -0700
Subject: [PATCH] =?UTF-8?q?-=20incluir=20m=C3=A9todo=20y=20forma=20de=20pa?=
 =?UTF-8?q?go=20en=20detalle,=20y=20personalizado?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 CxC/RepCxC.aspx           |  2 +-
 CxC/RepCxCDetalle.aspx    | 10 +++++++---
 CxC/RepCxCDetalle.aspx.vb | 23 +++++++++++------------
 3 files changed, 19 insertions(+), 16 deletions(-)

diff --git a/CxC/RepCxC.aspx b/CxC/RepCxC.aspx
index 0a1eda4a2..0f85fe6d6 100644
--- a/CxC/RepCxC.aspx
+++ b/CxC/RepCxC.aspx
@@ -756,7 +756,7 @@
 
                                     <asp:RadioButtonList runat="server" ID="RblTipoCambio" AutoPostBack="true">
                                         <asp:ListItem Selected="true" Text="Moneda Original" Value="1"></asp:ListItem>
-                                        <asp:ListItem Text="Dólares en Tipo Cambio de la Fecha Compra" Value="2"></asp:ListItem>
+                                        <asp:ListItem Text="Dólares en Tipo Cambio de la Fecha Venta" Value="2"></asp:ListItem>
                                         <asp:ListItem Text="Tipo Cambio Especifico" Value="3"></asp:ListItem>
                                     </asp:RadioButtonList>
 
diff --git a/CxC/RepCxCDetalle.aspx b/CxC/RepCxCDetalle.aspx
index 9766d26fa..edd5d9a5a 100644
--- a/CxC/RepCxCDetalle.aspx
+++ b/CxC/RepCxCDetalle.aspx
@@ -537,6 +537,8 @@
                     <asp:BoundField HeaderText="Fecha Ejecución" DataField="FechaEjecucion" DataFormatString="{0:d}" Visible="false" />
                     <asp:BoundField HeaderText="Linea Adicional" DataField="LineaAdicional" Visible="false" />
                     <asp:BoundField HeaderText="Descripción" DataField="DescripcionVenta" Visible="false" />
+                    <asp:BoundField HeaderText="Método Pago" DataField="MetodoPago" Visible="false" />
+                    <asp:BoundField HeaderText="Forma Pago" DataField="FormaPago" Visible="false" />
                     <asp:BoundField HeaderText="Contrato" DataField="NumeroContrato" Visible="false" />
                     <asp:BoundField HeaderText="SubTotal Pend" DataField="SubTotalPendiente" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:N2}" Visible="false" />
                     <asp:BoundField HeaderText="IVA Pend" DataField="IVAPendiente" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:N2}" Visible="false" />
@@ -675,7 +677,8 @@
                                             <asp:CheckBox ID="ChkMostrarDescripcionVenta" runat="server" Text="&nbsp;Descripción Venta" Checked="false" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkContrato" runat="server" Text="&nbsp;Contrato" Checked="false" /></td>
-                                        <td style="text-align: left;"></td>
+                                         <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkMetodoPago" runat="server" Text="&nbsp;Método Pago" /></td>
 
                                     </tr>
                                     <tr>
@@ -684,8 +687,9 @@
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkIVAPend" runat="server" Text="&nbsp;IVA Pendiente" Checked="false" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkIEPSPend" runat="server" Text="&nbsp;IEPS Pendiente" Checked="false" /></td>                                           
-                                        <td style="text-align: left;"></td>
+                                            <asp:CheckBox ID="ChkIEPSPend" runat="server" Text="&nbsp;IEPS Pendiente" Checked="false" /></td>                                        
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkFormaPago" runat="server" Text="&nbsp;Forma Pago" /></td>
                                     </tr>
                                     <tr runat="server" id="trEnquebranto" visible="false">
                                         <td style="text-align: left;">
diff --git a/CxC/RepCxCDetalle.aspx.vb b/CxC/RepCxCDetalle.aspx.vb
index 1b4eb4a43..83473516c 100644
--- a/CxC/RepCxCDetalle.aspx.vb
+++ b/CxC/RepCxCDetalle.aspx.vb
@@ -627,13 +627,15 @@ Partial Class RepCxCDetalle
         ActivaColumna(44, ChkFechaEjecucion.Checked)
         ActivaColumna(45, ChkMostrarLineaAdicional.Checked)
         ActivaColumna(46, ChkMostrarDescripcionVenta.Checked)
-        ActivaColumna(47, ChkContrato.Checked)
-        ActivaColumna(48, ChkSubTotalPend.Checked)
-        ActivaColumna(49, ChkIVAPend.Checked)
-        ActivaColumna(50, ChkIEPSPend.Checked)
-        ActivaColumna(51, ChkEnQuebranto.Checked)
-        ActivaColumna(52, ChkEnDemanda.Checked)
-        ActivaColumna(53, ChkRegistroFirmas.Checked)
+        ActivaColumna(47, ChkMetodoPago.Checked)
+        ActivaColumna(48, ChkFormaPago.Checked)
+        ActivaColumna(49, ChkContrato.Checked)
+        ActivaColumna(50, ChkSubTotalPend.Checked)
+        ActivaColumna(51, ChkIVAPend.Checked)
+        ActivaColumna(52, ChkIEPSPend.Checked)
+        ActivaColumna(53, ChkEnQuebranto.Checked)
+        ActivaColumna(54, ChkEnDemanda.Checked)
+        ActivaColumna(55, ChkRegistroFirmas.Checked)
 
         If SePersonalizo = 1 Then
             ImgExcelPersonalizado.Visible = True
@@ -641,18 +643,15 @@ Partial Class RepCxCDetalle
             ImgExcelPersonalizado.Visible = False
         End If
 
-
         CargaDatos()
         RegistraScript("$('#DivPersonalizar').modal('hide');")
     End Sub
 
     Private Sub ActivaColumna(Indice As Integer, Activo As Boolean)
 
-        If Activo Then
-            GvDatos.Columns(Indice).Visible = True
+        If GvDatos.Columns(Indice).Visible <> Activo Then
+            GvDatos.Columns(Indice).Visible = Activo
             SePersonalizo = 1
-            'Else
-            '    SePersonalizo = 0
         End If
 
     End Sub