AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- mejora en personalizar columnas de cuentas bancarias de personal

Browse Source
This commit is contained in:
rrene
2022-12-14 12:01:22 -07:00
parent 1f1e4c246e
commit 6f721834ec
2 changed files with 33 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
RH/CatPersonal.aspx
View File

@@ -651,6 +651,24 @@
<asp:Literal ID="LtlTipodeSalario" runat="server" Text='<%# Eval("TipodeSalario") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false">
<HeaderTemplate>Banco</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlBanco" runat="server" Text='<%# Eval("BancoNombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false">
<HeaderTemplate>Cuenta Bancaria</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlCuentaBancaria" runat="server" Text='<%# Eval("CuentaBancaria") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false">
<HeaderTemplate>CLABE</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlCLABE" runat="server" Text='<%# Eval("CLABE") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
@@ -832,6 +850,17 @@
<div class="col-md-3">
<asp:CheckBox ID="ChkTipodeSalario" runat="server" Text="Tipo de salario" />
</div>
</div>
<div class="row">
<div class="col-md-3">
<asp:CheckBox ID="ChkBanco" runat="server" Text="Banco" />
</div>
<div class="col-md-3">
<asp:CheckBox ID="ChkCuentaBancaria" runat="server" Text="Cuenta Bancaria" />
</div>
<div class="col-md-3">
<asp:CheckBox ID="ChkCLABE" runat="server" Text="CLABE" />
</div>
</div>
</div>

4
RH/CatPersonal.aspx.vb
View File

@@ -2,6 +2,7 @@
Option Strict On
Imports System.Data
Imports CFDI_GenCodigo
Imports Extensiones
Imports Microsoft.Reporting.WebForms
@@ -605,6 +606,9 @@ Partial Class RH_CatPersonal
Else
GvDatos.Columns(45).Visible = False
End If
GvDatos.Columns(46).Visible = ChkBanco.Checked
GvDatos.Columns(47).Visible = ChkCuentaBancaria.Checked
GvDatos.Columns(48).Visible = ChkClaBE.Checked
If (GvDatos.Rows.Count > 0) Then