-- personalizar impuestos pendientes

This commit is contained in:
2024-01-03 17:28:39 -07:00
parent 25e20985c8
commit 164e04756f
4 changed files with 55 additions and 3 deletions

View File

@@ -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>

View File

@@ -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

View File

@@ -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>

View File

@@ -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