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

cmabio de filtro de método de pago por forma de pago

Browse Source
This commit is contained in:
rrene
2025-01-25 10:03:09 -07:00
parent 5da45e3567
commit 16a78bc279
2 changed files with 17 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
RH/CatPersonal.aspx
View File

@@ -141,13 +141,11 @@
<div class="portlet-body portlet-filterT" style="display: none;"> <div class="portlet-body portlet-filterT" style="display: none;">
<div class="row"> <div class="row">
<label class="col-md-1 truncate">Método de Pago:</label> <label class="col-md-1 truncate">Forma de Pago:</label>
<div class="col-md-2 "> <div class="col-md-2 ">
<asp:DropDownList ID="DdlMetodoPago" runat="server" Width="100%" CssClass="select2me" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPago" DataValueField="CveMetodoPago" ValidationGroup="GrpGuardar"> <asp:DropDownList ID="DdlFormaPago" Width="100%" runat="server" AppendDataBoundItems="true" CausesValidation="true" CssClass="form-control input-sm select2me" DataTextField="FormaPago" DataValueField="CveFormaPago" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVMetodoPago" runat="server" ControlToValidate="DdlMetodoPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método de Pago''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCOMetodoPago" runat="server" HighlightCssClass="VCO" TargetControlID="RFVMetodoPago" Width="300px"></ajax:ValidatorCalloutExtender>
</div> </div>
<label class="col-md-1 truncate">Tipo Contrato:</label> <label class="col-md-1 truncate">Tipo Contrato:</label>
<div class="col-md-2"> <div class="col-md-2">
@@ -462,9 +460,9 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="false"> <asp:TemplateField Visible="false">
<HeaderTemplate>Metodo de Pago</HeaderTemplate> <HeaderTemplate>Forma de Pago</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
&nbsp;<asp:Literal ID="LtlMetodoPago" runat="server" Text='<%# Eval("MetodoPago", "{0}") %>'></asp:Literal> &nbsp;<asp:Literal ID="LtlMetodoPago" runat="server" Text='<%# Eval("FormaPago", "{0}") %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="false"> <asp:TemplateField Visible="false">
@@ -750,7 +748,7 @@
<asp:CheckBox ID="ChkTipoPeriodo" runat="server" Text="Tipo Periodo" Checked="true" /> <asp:CheckBox ID="ChkTipoPeriodo" runat="server" Text="Tipo Periodo" Checked="true" />
</div> </div>
<div class="col-md-3"> <div class="col-md-3">
<asp:CheckBox ID="ChkMetodoPago" runat="server" Text="Método de Pago" /> <asp:CheckBox ID="ChkFormaPago" runat="server" Text="Forma de Pago" />
</div> </div>
</div> </div>
<div class="row"> <div class="row">

20
RH/CatPersonal.aspx.vb
View File

@@ -57,7 +57,7 @@ Partial Class RH_CatPersonal
CargaTurno() CargaTurno()
CargaProyecto() CargaProyecto()
CargaSupervisores() CargaSupervisores()
CargaMetodosPago() CargaFormaPago()
CargaDatos() CargaDatos()
CargaTipoRegimen() CargaTipoRegimen()
CargaJornada() CargaJornada()
@@ -112,7 +112,7 @@ Partial Class RH_CatPersonal
Dim HorarioTrabajo As String = "-1" '----- Dim HorarioTrabajo As String = "-1" '-----
Dim CveSupervisor As Integer = DdlSupervisor.SelectedValue.ToEntero Dim CveSupervisor As Integer = DdlSupervisor.SelectedValue.ToEntero
Dim CveTipoPeriodo As Integer = DdlTipoPeriodo.SelectedValue.ToEntero Dim CveTipoPeriodo As Integer = DdlTipoPeriodo.SelectedValue.ToEntero
Dim CveMetodoPago As Integer = DdlMetodoPago.SelectedValue.ToEntero Dim CveFormaPago As Integer = DdlFormaPago.SelectedValue.ToEntero
Dim CveTipoContrato As Integer = DdlTipoContrato.SelectedValue.ToEntero Dim CveTipoContrato As Integer = DdlTipoContrato.SelectedValue.ToEntero
Dim CveMotivoBaja As Integer = DdlMotivoBaja.SelectedValue.ToEntero Dim CveMotivoBaja As Integer = DdlMotivoBaja.SelectedValue.ToEntero
Dim CveProyecto As Integer = DdlProyectoAsignado.SelectedValue.ToEntero Dim CveProyecto As Integer = DdlProyectoAsignado.SelectedValue.ToEntero
@@ -135,7 +135,7 @@ Partial Class RH_CatPersonal
End If End If
If ObjPersonal.GetPersonal(-1, "-1", "-1", "-1", "-1", CveTurno, CvePuesto, CveDepartamento, CveRuta, CveEscolaridad, CveEstadoCivil, CveGenero, If ObjPersonal.GetPersonal(-1, "-1", "-1", "-1", "-1", CveTurno, CvePuesto, CveDepartamento, CveRuta, CveEscolaridad, CveEstadoCivil, CveGenero,
CveEstatusPersonal, CveSubProyecto, CveClienteAsignado, HorarioTrabajo, CveSupervisor, CveTipoPeriodo, CveMetodoPago, CveEstatusPersonal, CveSubProyecto, CveClienteAsignado, HorarioTrabajo, CveSupervisor, CveTipoPeriodo, CveFormaPago,
CveTipoContrato, CveMotivoBaja, CveProyecto, FechaIFinContrato, FechaFFinContrato, FechaIIngreso, FechaFIngreso, CveTipoContrato, CveMotivoBaja, CveProyecto, FechaIFinContrato, FechaFFinContrato, FechaIIngreso, FechaFIngreso,
UsuarioActual.CveEmpresa, ddlclasificacion.SelectedValue.ToEntero()) Then UsuarioActual.CveEmpresa, ddlclasificacion.SelectedValue.ToEntero()) Then
DTDatos = ObjPersonal.DtResultados DTDatos = ObjPersonal.DtResultados
@@ -337,11 +337,11 @@ Partial Class RH_CatPersonal
DdlSupervisor.DataBind() DdlSupervisor.DataBind()
End Sub End Sub
Private Sub CargaMetodosPago() Private Sub CargaFormaPago()
DdlMetodoPago.DataSource = GlobalDTVtaMetodoPago DdlFormaPago.DataSource = GlobalDTVtaFormaPago
DdlMetodoPago.DataBind() DdlFormaPago.DataBind()
DdlMetodoPagoAdd.DataSource = GlobalDTVtaMetodoPago DdlFormaPago.DataSource = GlobalDTVtaFormaPago
DdlMetodoPagoAdd.DataBind() DdlFormaPago.DataBind()
End Sub End Sub
#End Region #End Region
@@ -364,7 +364,7 @@ Partial Class RH_CatPersonal
GvDatos.Columns(12).Visible = ChkSubProyecto.Checked GvDatos.Columns(12).Visible = ChkSubProyecto.Checked
GvDatos.Columns(13).Visible = ChkSupervisor.Checked GvDatos.Columns(13).Visible = ChkSupervisor.Checked
GvDatos.Columns(14).Visible = ChkTipoPeriodo.Checked GvDatos.Columns(14).Visible = ChkTipoPeriodo.Checked
GvDatos.Columns(15).Visible = ChkMetodoPago.Checked GvDatos.Columns(15).Visible = ChkFormaPago.Checked
GvDatos.Columns(16).Visible = ChkTipoContrato.Checked GvDatos.Columns(16).Visible = ChkTipoContrato.Checked
GvDatos.Columns(17).Visible = ChkMotivoBaja.Checked GvDatos.Columns(17).Visible = ChkMotivoBaja.Checked
GvDatos.Columns(18).Visible = ChkProyecto.Checked GvDatos.Columns(18).Visible = ChkProyecto.Checked
@@ -878,7 +878,7 @@ Partial Class RH_CatPersonal
libro.Cell(crow, ccol).Value = "Area Geografica" : libro.Range(crow + 1, ccol, 50000, ccol).SetDataValidation().List(Catalogos.Range(2, colAreaGeografica, rowAreaGeografica, colAreaGeografica), True) : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Area Geografica" : libro.Range(crow + 1, ccol, 50000, ccol).SetDataValidation().List(Catalogos.Range(2, colAreaGeografica, rowAreaGeografica, colAreaGeografica), True) : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "Prima vacacional" : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Prima vacacional" : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "Dias aguinaldo" : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Dias aguinaldo" : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "Metodo Pago" : libro.Range(crow + 1, ccol, 50000, ccol).SetDataValidation().List(Catalogos.Range(2, colmetodopago, rowmetodopago, colmetodopago), True) : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Forma Pago" : libro.Range(crow + 1, ccol, 50000, ccol).SetDataValidation().List(Catalogos.Range(2, colmetodopago, rowmetodopago, colmetodopago), True) : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "SDI" : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "SDI" : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "Nominista" : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Nominista" : ccol = ccol + 1
libro.Cell(crow, ccol).Value = "Registro Patronal" : ccol = ccol + 1 libro.Cell(crow, ccol).Value = "Registro Patronal" : ccol = ccol + 1