From 164e04756f9e97b20068a8481a148fcc51af2c5b Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 3 Jan 2024 17:28:39 -0700
Subject: [PATCH] -- personalizar impuestos pendientes

---
 Compras/RepCxP.aspx           | 24 +++++++++++++++++++++++-
 Compras/RepCxP.aspx.vb        |  2 ++
 Compras/RepCxPDetalle.aspx    | 27 +++++++++++++++++++++++++++
 Compras/RepCxPDetalle.aspx.vb |  5 +++--
 4 files changed, 55 insertions(+), 3 deletions(-)

diff --git a/Compras/RepCxP.aspx b/Compras/RepCxP.aspx
index c0932f597..21ceaabd5 100644
--- a/Compras/RepCxP.aspx
+++ b/Compras/RepCxP.aspx
@@ -504,6 +504,24 @@
                      </ItemTemplate>
                      <ItemStyle HorizontalAlign="Right" />
                  </asp:TemplateField>
+                 <asp:TemplateField Visible="false">
+                     <HeaderTemplate>
+                         Ret IVA Pend
+                     </HeaderTemplate>
+                     <ItemTemplate>
+                         <asp:Label CssClass="TextoGris" ID="LtlRETIVA" runat="server" Text='<%# Eval("RetIVAPendiente", "{0:N2}") %>'></asp:Label>
+                     </ItemTemplate>
+                     <ItemStyle HorizontalAlign="Right" />
+                 </asp:TemplateField>
+                <asp:TemplateField Visible="false">
+                    <HeaderTemplate>
+                        Ret ISR Pend
+                    </HeaderTemplate>
+                    <ItemTemplate>
+                        <asp:Label CssClass="TextoGris" ID="LtlRETISR" runat="server" Text='<%# Eval("RetISRPendiente", "{0:N2}") %>'></asp:Label>
+                    </ItemTemplate>
+                    <ItemStyle HorizontalAlign="Right" />
+                </asp:TemplateField>
                 </Columns>
                 <RowStyle CssClass="Texto" />
                 <HeaderStyle CssClass="Titulos" />
@@ -532,7 +550,11 @@
                             <asp:CheckBox ID="ChkIVAP" runat="server" Text="" Checked="False" />
                             <label for="ChkIVAP">IVA Pendiente </label>
                             <br />
-                            <asp:CheckBox ID="ChkIEPSP" runat="server" Text="IEPS Pendiente" Checked="False" Visible="false" TextAlign="Right" />
+                            <asp:CheckBox ID="ChkIEPSP" runat="server" Text="&nbsp; IEPS Pendiente" Checked="False" Visible="false" TextAlign="Right" />
+                            <br />
+                            <asp:CheckBox ID="ChkRetIVAPendiente" runat="server" Text="&nbsp; Ret IVA Pendiente" Checked="False"  TextAlign="Right" />
+                            <br />
+                            <asp:CheckBox ID="ChkRetISRPendiente" runat="server" Text="&nbsp; Ret ISR Pendiente" Checked="False"   TextAlign="Right" />
                            
 
                         </div>
diff --git a/Compras/RepCxP.aspx.vb b/Compras/RepCxP.aspx.vb
index fa5039673..c5782cf3e 100644
--- a/Compras/RepCxP.aspx.vb
+++ b/Compras/RepCxP.aspx.vb
@@ -1894,6 +1894,8 @@ Partial Class Compras_RepCxP
         ActivaColumna(23, ChkSubTotalP.Checked)
         ActivaColumna(24, ChkIVAP.Checked)
         ActivaColumna(25, ChkIEPSP.Checked)
+        ActivaColumna(26, ChkRetIVAPendiente.Checked)
+        ActivaColumna(27, ChkRetISRPendiente.Checked)
 
         If SePersonalizo = 1 Then
             ImgExcelPersonalizado.Visible = True
diff --git a/Compras/RepCxPDetalle.aspx b/Compras/RepCxPDetalle.aspx
index ebf865e8f..eb8f03b10 100644
--- a/Compras/RepCxPDetalle.aspx
+++ b/Compras/RepCxPDetalle.aspx
@@ -461,6 +461,24 @@
                          </ItemTemplate>
                          <ItemStyle HorizontalAlign="Right" />
                      </asp:TemplateField>
+                     <asp:TemplateField Visible="false">
+                         <HeaderTemplate>
+                             Ret IVA Pend
+                         </HeaderTemplate>
+                         <ItemTemplate>
+                             <asp:Label CssClass="TextoGris" ID="LtlRETIVA" runat="server" Text='<%# Eval("RetIVAPendiente", "{0:N2}") %>'></asp:Label>
+                         </ItemTemplate>
+                         <ItemStyle HorizontalAlign="Right" />
+                     </asp:TemplateField>
+                    <asp:TemplateField Visible="false">
+                        <HeaderTemplate>
+                            Ret ISR Pend
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Label CssClass="TextoGris" ID="LtlRETISR" runat="server" Text='<%# Eval("RetISRPendiente", "{0:N2}") %>'></asp:Label>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right" />
+                    </asp:TemplateField>
                 </Columns>
                 <RowStyle CssClass="Texto" /> 
             </asp:GridView>
@@ -527,6 +545,15 @@
                                                         <asp:CheckBox ID="ChkIEPSPend" runat="server" Text="&nbsp;IEPS Pendiente" Checked="false" Visible="false" /></td>                                           
                                                     <td style="text-align: left;"></td>
                                                 </tr>
+                                                 <tr>
+                                                        <td style="text-align: left;">
+                                                    <asp:CheckBox ID="ChkIEPSP" runat="server" Text="&nbsp; IEPS Pendiente" Checked="False" Visible="false" TextAlign="Right" />
+                                                        </td><td style="text-align: left;">
+                                                        <asp:CheckBox ID="ChkRetIVAPendiente" runat="server" Text="&nbsp; Ret IVA Pendiente" Checked="False"  TextAlign="Right" />
+                                                        </td><td style="text-align: left;">
+                                                        <asp:CheckBox ID="ChkRetISRPendiente" runat="server" Text="&nbsp; Ret ISR Pendiente" Checked="False"   TextAlign="Right" />
+                                                              </td>
+                                                 </tr>
                                             </table>
 
  
diff --git a/Compras/RepCxPDetalle.aspx.vb b/Compras/RepCxPDetalle.aspx.vb
index 50e024e6b..bb867e3dd 100644
--- a/Compras/RepCxPDetalle.aspx.vb
+++ b/Compras/RepCxPDetalle.aspx.vb
@@ -325,7 +325,7 @@ Partial Class RepCxPDetalle
         CveTipoProveedor = IfNull(Request("CveTipoProveedor"), -1).ToString.ToEntero
         DdlTipoProveedor.SelectedValueExist(CveTipoProveedor)
 
-        Dim Comprobaciones = IfNull(Request("Comprobaciones"), -1).ToString.ToEntero
+        Dim Comprobaciones As Integer = IfNull(Request("Comprobaciones"), -1).ToString.ToEntero
         DdlComprobacion.SelectedValueExist(Comprobaciones)
 
 
@@ -565,6 +565,8 @@ Partial Class RepCxPDetalle
         ActivaColumna(17, ChkSubTotalPend.Checked)
         ActivaColumna(18, ChkIVAPend.Checked)
         ActivaColumna(19, ChkIEPSPend.Checked)
+        ActivaColumna(20, ChkRetIVAPendiente.Checked)
+        ActivaColumna(21, ChkRetISRPendiente.Checked)
 
         If SePersonalizo = 1 Then
             ImgExcelPersonalizado.Visible = True
@@ -590,7 +592,6 @@ Partial Class RepCxPDetalle
 #End Region
 
 #Region "IMPRESIONES"
-
     Protected Sub ImgExcel_Click(sender As Object, e As System.EventArgs) Handles ImgExcel.Click
         GenerarPDF("EXCEL")
     End Sub