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

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2022-03-01 11:09:49 -07:00
parent bfb1e339dc
commit 3614d03d6c
6 changed files with 118 additions and 103 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
App_Code/ClsNominas.vb
View File

@@ -1931,7 +1931,7 @@ Public Class ClsNominas
End Function
Public Function AddPeriodo(CveTipoPeriodo As Integer, Ejercicio As Integer, Mes As Integer, Numero As Integer, FechaInicio As Date, FechaFin As Date,
EsInicioMes As Boolean, EsFinMes As Boolean, EsInicioSS As Boolean, EsFinSS As Boolean, EsInicioAño As Boolean, EsFinAño As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
EsInicioMes As Boolean, EsFinMes As Boolean, EsInicioSS As Boolean, EsFinSS As Boolean, EsInicioAño As Boolean, EsFinAño As Boolean, CveUsuario As Integer, CveEmpresa As Integer, CveTurno As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Nom_PeriodosAdd")
@@ -1951,7 +1951,7 @@ Public Class ClsNominas
.Add("@EsFinAño", SqlDbType.Bit).Value = EsFinAño
.Add("@FueCalculado", SqlDbType.Bit).Value = FueCalculado
.Add("@Estatus", SqlDbType.SmallInt).Value = Estatus
'.Add("@FechaIng", SqlDbType.DateTime).Value = FechaIng
.Add("@CveTurno", SqlDbType.Int).Value = CveTurno
.Add("@CveUsuario", SqlDbType.VarChar).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
@@ -1974,7 +1974,7 @@ Public Class ClsNominas
Public Function UpdatePeriodo(FechaInicio As Date, FechaFin As Date, EsInicioMes As Boolean, EsFinMes As Boolean, EsInicioSS As Boolean, EsFinSS As Boolean,
EsInicioAño As Boolean, EsFinAño As Boolean, FueCalculado As Boolean, CveTipoPeriodo As Integer, Ejercicio As Integer, Mes As Integer, Numero As Integer,
Estatus As Integer, CvePeriodo As Integer, CveEmpresa As Integer) As Boolean
Estatus As Integer, CvePeriodo As Integer, CveEmpresa As Integer, CveTurno As Integer) As Boolean
Dim Retorno As Boolean = False
@@ -1998,6 +1998,7 @@ Public Class ClsNominas
'.Add("@FechaIng", SqlDbType.DateTime).Value = FechaIng
'.Add("@CveUsuario", SqlDbType.VarChar).Value = CveUsuario
.Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo
.Add("@CveTurno", SqlDbType.Int).Value = CveTurno
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With

135
Nomina/CatPeriodos.aspx
View File

@@ -5,12 +5,9 @@
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.chkChoice input
{
margin-right: 5px;
.chkChoice input {
margin-right: 5px;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
@@ -31,8 +28,8 @@
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpFiltros" runat="server" RenderMode="Inline" ViewStateMode="Inherit" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT smalltitle " style="">
<div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle ">
<div class="tools">
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
</div>
@@ -49,16 +46,15 @@
<div class="col-md-1 truncate">Ejercicio:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlEjercicio" DataTextField="Ejercicio" DataValueField="Ejercicio" CssClass="form-control input-sm select2me" runat="server">
</asp:DropDownList>
<asp:DropDownList ID="DdlEjercicio" DataTextField="Ejercicio" DataValueField="Ejercicio" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
</div>
<div class="col-md-1 truncate">Estatus:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlEstatus" CssClass="select2me form-control" runat="server" AppendDataBoundItems="true" DataTextField="Estatus" DataValueField="CveEstatus" Width="80%" ValidationGroup="GrpConsutar">
<asp:DropDownList ID="DdlEstatus" CssClass="select2me form-control" runat="server" AppendDataBoundItems="true" DataTextField="Estatus" DataValueField="CveEstatus" Width="80%" ValidationGroup="GrpConsutar">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:ListItem Text="Actual" Value="1"></asp:ListItem>
<asp:ListItem Text="Cerrado" Value="2"></asp:ListItem>
<asp:ListItem Text="Cerrado" Value="2"></asp:ListItem>
</asp:DropDownList>
</div>
@@ -67,11 +63,11 @@
</div>
</div>
<div class="portlet-body" style="display: none;">
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<div class="portlet light xspadding bordered " id="pnldl">
<div class="portlet-title">
<div class="caption ">
@@ -98,85 +94,85 @@
<table class="table table-striped table-advance table-hover mysmallbtn Widthall tableheader">
<thead>
<tr class="Titulos ADtr">
<th style="width:110px">
<th style="width: 110px">
<asp:LinkButton ID="LbTipoPeriodo" runat="server" CausesValidation="false" Text="" CommandArgument="TipoPeriodo" OnClick="LbOrden_Click">
Tipo
<asp:Literal ID="ImgTipoPeriodo" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEjercicio" runat="server" CausesValidation="false" Text="" CommandArgument="Ejercicio" OnClick="LbOrden_Click">
Ej.
<asp:Literal ID="ImgEjercicio" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbMes" runat="server" CausesValidation="false" Text="" CommandArgument="Mes" OnClick="LbOrden_Click">
Mes
<asp:Literal ID="ImgMes" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbNumero" runat="server" CausesValidation="false" Text="" CommandArgument="Numero" OnClick="LbOrden_Click">
No.
<asp:Literal ID="ImgNumero" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:100px">
<th style="width: 100px">
<asp:LinkButton ID="LbFechaInicio" runat="server" CausesValidation="false" Text="" CommandArgument="FechaInicio" OnClick="LbOrden_Click">
Fecha Ini
<asp:Literal ID="ImgFechaInicio" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:100px">
<th style="width: 100px">
<asp:LinkButton ID="LbFechaFin" runat="server" CausesValidation="false" Text="" CommandArgument="FechaFin" OnClick="LbOrden_Click">
Fecha Fin
<asp:Literal ID="ImgFechaFin" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsInicioMes" runat="server" CausesValidation="false" Text="" CommandArgument="EsInicioMes" OnClick="LbOrden_Click">
Ini. Mes
<asp:Literal ID="ImgEsInicioMes" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsFinMes" runat="server" CausesValidation="false" Text="" CommandArgument="EsFinMes" OnClick="LbOrden_Click">
Fin Mes
<asp:Literal ID="ImgEsFinMes" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsInicioSS" runat="server" CausesValidation="false" Text="" CommandArgument="EsInicioSS" OnClick="LbOrden_Click">
Ini. SS
<asp:Literal ID="ImgEsInicioSS" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsFinSS" runat="server" CausesValidation="false" Text="" CommandArgument="EsFinSS" OnClick="LbOrden_Click">
Fin SS
<asp:Literal ID="ImgEsFinSS" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsInicioAño" runat="server" CausesValidation="false" Text="" CommandArgument="EsInicioAño" OnClick="LbOrden_Click">
Ini. Año
<asp:Literal ID="ImgEsInicioAño" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:80px">
<th style="width: 80px">
<asp:LinkButton ID="LbEsFinAño" runat="server" CausesValidation="false" Text="" CommandArgument="EsFinAño" OnClick="LbOrden_Click">
Fin Año
<asp:Literal ID="ImgEsFinAño" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:100px">
<th style="width: 100px">
<asp:LinkButton ID="LbFueCalculado" runat="server" CausesValidation="false" Text="" CommandArgument="FueCalculado" OnClick="LbOrden_Click">
Calculado
<asp:Literal ID="ImgFueCalculado" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton>
</th>
<th style="width:100px">
<th style="width: 100px">
<asp:LinkButton ID="LbEstatus" runat="server" CausesValidation="false" Text="" CommandArgument="Estatus" OnClick="LbOrden_Click">
Estatus
<asp:Literal ID="ImgEstatus" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
@@ -188,9 +184,9 @@
</tr>
</thead>
</table>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePeriodo, CveTipoPeriodo, Ejercicio, Numero, FechaInicio,FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, FueCalculado, Estatus"
CssClass="table table-striped table-advance table-hover mysmallbtn ScrollAD Widthall GvDatos" data-tableheader=".tableheader" EmptyDataText="No se encontraron Periodos Registrados"
GridLines="None" data-rows="0" ShowHeader="false">
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePeriodo, CveTipoPeriodo, Ejercicio, Numero, FechaInicio,FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, FueCalculado, Estatus"
CssClass="table table-striped table-advance table-hover mysmallbtn ScrollAD Widthall GvDatos" data-tableheader=".tableheader" EmptyDataText="No se encontraron Periodos Registrados"
GridLines="None" data-rows="0" ShowHeader="false">
<Columns>
<asp:TemplateField ItemStyle-Width="250px">
<ItemTemplate>
@@ -252,58 +248,58 @@
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsInicioMes" runat="server" Checked='<%# If (Eval("EsInicioMes").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioMes" runat="server" Checked='<%# If(Eval("EsInicioMes").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsInicioMes" runat="server" Checked='<%# If (Eval("EsInicioMes").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioMes" runat="server" Checked='<%# If(Eval("EsInicioMes").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsFinMes" runat="server" Checked='<%# If (Eval("EsFinMes").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinMes" runat="server" Checked='<%# If(Eval("EsFinMes").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsFinMes" runat="server" Checked='<%# If (Eval("EsFinMes").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinMes" runat="server" Checked='<%# If(Eval("EsFinMes").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsInicioSS" runat="server" Checked='<%# If (Eval("EsInicioSS").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioSS" runat="server" Checked='<%# If(Eval("EsInicioSS").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsInicioSS" runat="server" Checked='<%# If (Eval("EsInicioSS").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioSS" runat="server" Checked='<%# If(Eval("EsInicioSS").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsFinSS" runat="server" Checked='<%# If (Eval("EsFinSS").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinSS" runat="server" Checked='<%# If(Eval("EsFinSS").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsFinSS" runat="server" Checked='<%# If (Eval("EsFinSS").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinSS" runat="server" Checked='<%# If(Eval("EsFinSS").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsInicioAño" runat="server" Checked='<%# If (Eval("EsInicioAño").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioAño" runat="server" Checked='<%# If(Eval("EsInicioAño").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsInicioAño" runat="server" Checked='<%# If (Eval("EsInicioAño").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsInicioAño" runat="server" Checked='<%# If(Eval("EsInicioAño").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkEsFinAño" runat="server" Checked='<%# If (Eval("EsFinAño").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinAño" runat="server" Checked='<%# If(Eval("EsFinAño").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkEsFinAño" runat="server" Checked='<%# If (Eval("EsFinAño").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkEsFinAño" runat="server" Checked='<%# If(Eval("EsFinAño").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="10px">
<ItemTemplate>
<asp:CheckBox ID="ChkFueCalculado" runat="server" Checked='<%# If (Eval("FueCalculado").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkFueCalculado" runat="server" Checked='<%# If(Eval("FueCalculado").ToString = "Si", True, False) %>' />
</ItemTemplate>
<EditItemTemplate>
<asp:CheckBox ID="ChkFueCalculado" runat="server" Checked='<%# If (Eval("FueCalculado").ToString = "Si", True, False) %>' />
<asp:CheckBox ID="ChkFueCalculado" runat="server" Checked='<%# If(Eval("FueCalculado").ToString = "Si", True, False) %>' />
</EditItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
@@ -349,7 +345,7 @@
</asp:UpdatePanel>
</div>
</div>
<div id="divAddPeriodo" class="modal ADS fade" role="dialog">
<div id="divAddPeriodo" class="modal ADS fade" role="dialog">
<div class="modal-dialog modal" id="modal">
<asp:UpdatePanel ID="UpAddInventarioFisico" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
@@ -357,17 +353,19 @@
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
<span aria-hidden="true">&times;</span>
</button>
<h4 class="modal-title" id="myModalLabel" runat="server"><asp:Label runat="server" ID="lblTiulomodal" Text="Agregar Periodo"></asp:Label></h4>
<h4 class="modal-title" id="myModalLabel" runat="server">
<asp:Label runat="server" ID="lblTiulomodal" Text="Agregar Periodo"></asp:Label>
</h4>
</div>
<div class="modal-body">
<asp:UpdatePanel ID="UpModalPerido" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<br />
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left">Tipo Periodo:</div>
<div class="col-xs-4">
<asp:DropDownList ID="DdlTipoPeriodoAdd" CssClass="select2me form-control" runat="server" DataValueField="CveTipoPeriodo" DataTextField="TipoPeriodo" Width="100%"></asp:DropDownList>
<asp:HiddenField runat="server" ID="hdnCvePerido" Value=""/>
<asp:HiddenField runat="server" ID="hdnCvePerido" Value="" />
</div>
</div>
<br />
@@ -376,10 +374,10 @@
Numero:
</div>
<div class="col-xs-4">
<asp:TextBox ID="TxtNumeroAdd" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
<asp:TextBox ID="TxtNumeroAdd" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
</div>
</div>
<br />
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left; padding-top: 10px;">
Fecha Inicio:
@@ -399,7 +397,7 @@
<ajax:ValidatorCalloutExtender ID="VCOFechaDocumento1Inicio" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaDocumentoInicio" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VCOFechaDocumento2Inicio" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaDocumentoInicio" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<div class="col-xs-2" style="text-align: left; padding-top: 10px;">
<div class="col-xs-2" style="text-align: left; padding-top: 10px;">
Fecha Fin:
</div>
<div class="col-xs-4">
@@ -421,34 +419,45 @@
<br />
<div class="row">
<div class="col-xs-12">
<asp:CheckBoxList ID="CBLchk" RepeatDirection="Horizontal" RepeatColumns="4" runat="server" CssClass="chkChoice" Width="100%">
<asp:ListItem Text=" Incio Mes" Value="1"></asp:ListItem>
<asp:ListItem Text=" Fin Mes" Value="2"></asp:ListItem>
<asp:ListItem Text=" Inicio SS" Value="3"></asp:ListItem>
<asp:ListItem Text=" Fin SS" Value="4"></asp:ListItem>
<asp:ListItem Text=" Inicio Año" Value="5"></asp:ListItem>
<asp:ListItem Text=" Fin Año" Value="6"></asp:ListItem>
<asp:ListItem Text=" Calculado" Value="7"></asp:ListItem>
<asp:CheckBoxList ID="CBLchk" RepeatDirection="Horizontal" RepeatColumns="4" runat="server" CssClass="chkChoice" Width="100%">
<asp:ListItem Text=" Incio Mes" Value="1"></asp:ListItem>
<asp:ListItem Text=" Fin Mes" Value="2"></asp:ListItem>
<asp:ListItem Text=" Inicio SS" Value="3"></asp:ListItem>
<asp:ListItem Text=" Fin SS" Value="4"></asp:ListItem>
<asp:ListItem Text=" Inicio Año" Value="5"></asp:ListItem>
<asp:ListItem Text=" Fin Año" Value="6"></asp:ListItem>
<asp:ListItem Text=" Calculado" Value="7"></asp:ListItem>
</asp:CheckBoxList>
</div>
</div>
<br />
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left;">
Estatus:
Estatus:
</div>
<div class="col-xs-4">
<asp:DropDownList ID="DdlEstatusAdd" runat="server" CssClass="select2me form-control" AppendDataBoundItems="true" DataTextField="Estatus" Width="100%" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
<asp:ListItem Text="Actual" Value="1"></asp:ListItem>
<asp:ListItem Text="Cerrado" Value="2"></asp:ListItem>
</asp:DropDownList>
</asp:DropDownList>
</div>
</div>
<br />
<div class="row">
<div class="col-xs-2" style="text-align: left">Turno:</div>
<div class="col-xs-4">
<asp:DropDownList Width="100%" ID="DdlTurno" runat="server" AppendDataBoundItems="True" DataTextField="Turno" DataValueField="CveTurno" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Sin Turno" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
<div class="modal-footer">
<asp:UpdatePanel ID="UpFooter" runat="server" UpdateMode="Conditional">
<ContentTemplate>

69
Nomina/CatPeriodos.aspx.vb
View File

@@ -10,7 +10,7 @@ Partial Class Nomina_CatPeriodos
Inherits ClsPaginas
Private Property Comando As String
Get
Return ViewState("Comando").ToString
Return ViewState("Comando").ToString()
End Get
Set(value As String)
ViewState("Comando") = value
@@ -37,7 +37,7 @@ Partial Class Nomina_CatPeriodos
Public Sub CargaDatos()
Dim ObjNom_Periodos As New ClsNominas
If ObjNom_Periodos.GetPeriodos(DdlTipoPeriodo.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlEjercicio.SelectedValue.ToEntero, -1, -1, DdlEstatus.SelectedValue.ToEntero) Then
If ObjNom_Periodos.GetPeriodos(DdlTipoPeriodo.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, DdlEjercicio.SelectedValue.ToEntero(), -1, -1, DdlEstatus.SelectedValue.ToEntero()) Then
ViewState("DTNom_Periodos") = ObjNom_Periodos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTNom_Periodos = ObjNom_Periodos.DtResultados
@@ -116,17 +116,17 @@ Partial Class Nomina_CatPeriodos
e.Row.Cells(13).HorizontalAlign = HorizontalAlign.Center
e.Row.Cells(14).HorizontalAlign = HorizontalAlign.Center
e.Row.FCCheckBox("ChkEsInicioMes").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioMes").ToString)
e.Row.FCCheckBox("ChkEsFinMes").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinMes").ToString)
e.Row.FCCheckBox("ChkEsInicioSS").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioSS").ToString)
e.Row.FCCheckBox("ChkEsFinSS").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinSS").ToString)
e.Row.FCCheckBox("ChkEsInicioAño").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioAño").ToString)
e.Row.FCCheckBox("ChkEsFinAño").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinAño").ToString)
e.Row.FCCheckBox("ChkFueCalculado").Checked = Convert.ToBoolean(e.Row.DataKey("FueCalculado").ToString)
e.Row.FCCheckBox("ChkEsInicioMes").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioMes").ToString())
e.Row.FCCheckBox("ChkEsFinMes").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinMes").ToString())
e.Row.FCCheckBox("ChkEsInicioSS").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioSS").ToString())
e.Row.FCCheckBox("ChkEsFinSS").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinSS").ToString())
e.Row.FCCheckBox("ChkEsInicioAño").Checked = Convert.ToBoolean(e.Row.DataKey("EsInicioAño").ToString())
e.Row.FCCheckBox("ChkEsFinAño").Checked = Convert.ToBoolean(e.Row.DataKey("EsFinAño").ToString())
e.Row.FCCheckBox("ChkFueCalculado").Checked = Convert.ToBoolean(e.Row.DataKey("FueCalculado").ToString())
If e.Row.DataKey("Estatus").ToString.ToEntero = 1 Then
If e.Row.DataKey("Estatus").ToString().ToEntero() = 1 Then
e.Row.FCLiteral("LtlEstatus").Text = "Actual"
ElseIf e.Row.DataKey("Estatus").ToString.ToEntero = 2 Or e.Row.DataKey("Estatus").ToString.ToEntero = 3 Then
ElseIf e.Row.DataKey("Estatus").ToString().ToEntero() = 2 Or e.Row.DataKey("Estatus").ToString().ToEntero() = 3 Then
e.Row.FCLiteral("LtlEstatus").Text = "Cerrado"
Else
e.Row.FCLiteral("LtlEstatus").Text = ""
@@ -137,7 +137,7 @@ Partial Class Nomina_CatPeriodos
Protected Sub GvDatos_RowDeleting(sender As Object, e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GvDatos.RowDeleting
Dim ObjNom_Periodos As New ClsNominas
If ObjNom_Periodos.RemovePeriodo(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
If ObjNom_Periodos.RemovePeriodo(GvDatos.DataKeys(e.RowIndex).Value.ToString().ToEntero()) Then
GvDatos.EditIndex = -1
ViewState("DTNom_Periodos") = ObjNom_Periodos.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTNom_Periodos = ObjNom_Periodos.DtResultados
@@ -173,18 +173,18 @@ Partial Class Nomina_CatPeriodos
Const OrdenInicial As String = ""
Dim Arg(2) As String
Arg = CType(sender, LinkButton).CommandArgument().ToString.Split(";"c)
Arg = CType(sender, LinkButton).CommandArgument().ToString().Split(";"c)
Campo = Arg(0)
Literal = CType(CType(sender, LinkButton).NamingContainer.FindControl("Img" & Campo.Replace(",", "_")), Literal)
If ViewState(String.Format("O{0}", Campo)) IsNot Nothing AndAlso ViewState(String.Format("O{0}", Campo)).ToString = String.Format("{0} DESC", Campo) Then
If ViewState(String.Format("O{0}", Campo)) IsNot Nothing AndAlso ViewState(String.Format("O{0}", Campo)).ToString() = String.Format("{0} DESC", Campo) Then
ViewState(String.Format("O{0}", Campo)) = String.Format("{0} ASC", Campo)
Literal.Text = String.Format("<i class='fa fa-sort-asc' style='color:#999' ></i>")
Else
ViewState(String.Format("O{0}", Campo)) = String.Format("{0} DESC", Campo)
Literal.Text = String.Format("<i class='fa fa-sort-desc' style='color:#999' ></i>")
End If
Orden = OrdenInicial & ViewState(String.Format("O{0}", Campo)).ToString
Orden = OrdenInicial & ViewState(String.Format("O{0}", Campo)).ToString()
ViewState("Orden") = Orden
CargaGrid(Orden)
End Sub
@@ -218,14 +218,14 @@ Partial Class Nomina_CatPeriodos
Dim EsInicioAño As Boolean
Dim EsFinAño As Boolean
Dim FueCalculado As Boolean
Dim Numero As Integer = TxtNumeroAdd.Text.Trim.ToEntero
Dim Numero As Integer = TxtNumeroAdd.Text.Trim.ToEntero()
Dim FechaInicio As Date = TxtFechaInicioAdd.Text.Trim.ToDate
Dim FechaFin As Date = TxtFechaFinAdd.Text.Trim.ToDate
Dim Mes As Integer = FechaFin.Month
Dim Ejercicio As Integer = FechaFin.Year
Dim CveTipoPeriodo As Integer = DdlTipoPeriodoAdd.SelectedValue.ToEntero
Dim Estatus As Integer = DdlEstatusAdd.SelectedValue.ToEntero
Dim CvePeriodo As Integer = hdnCvePerido.Value.ToEntero
Dim CveTipoPeriodo As Integer = DdlTipoPeriodoAdd.SelectedValue.ToEntero()
Dim Estatus As Integer = DdlEstatusAdd.SelectedValue.ToEntero()
Dim CvePeriodo As Integer = hdnCvePerido.Value.ToEntero()
For Each item As ListItem In CBLchk.Items
Select Case item.Value.ToEntero()
@@ -247,7 +247,7 @@ Partial Class Nomina_CatPeriodos
Next
If Comando = "Agregar" Then
If ObjNom_Periodos.AddPeriodo(CveTipoPeriodo, Ejercicio, Mes, Numero, FechaInicio, FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
If ObjNom_Periodos.AddPeriodo(CveTipoPeriodo, Ejercicio, Mes, Numero, FechaInicio, FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DdlTurno.SelectedValue.ToEntero()) Then
Alert("El nuevo Periodo se guardó correctamente.", TipoMensaje.MsgInformacion)
UpDatos.Update()
@@ -263,7 +263,7 @@ Partial Class Nomina_CatPeriodos
End If
ElseIf Comando = "Actualizar" Then
If ObjNom_Periodos.UpdatePeriodo(FechaInicio, FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, FueCalculado, CveTipoPeriodo, Ejercicio, Mes, Numero, Estatus, CvePeriodo, UsuarioActual.CveEmpresa) Then
If ObjNom_Periodos.UpdatePeriodo(FechaInicio, FechaFin, EsInicioMes, EsFinMes, EsInicioSS, EsFinSS, EsInicioAño, EsFinAño, FueCalculado, CveTipoPeriodo, Ejercicio, Mes, Numero, Estatus, CvePeriodo, UsuarioActual.CveEmpresa, DdlTurno.SelectedValue.ToEntero()) Then
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
UpDatos.Update()
@@ -293,28 +293,29 @@ Partial Class Nomina_CatPeriodos
Comando = "Actualizar"
lblTiulomodal.Text = "Actualizar Periodo"
Dim GvRow As GridViewRow = DirectCast((DirectCast(sender, LinkButton)).NamingContainer, GridViewRow)
DdlTipoPeriodoAdd.SelectedValueExist(GvRow.DataKey("CveTipoPeriodo").ToString.ToEntero)
TxtNumeroAdd.Text = GvRow.DataKey("Numero").ToString
TxtFechaInicioAdd.Text = GvRow.DataKey("FechaInicio").ToString
TxtFechaFinAdd.Text = GvRow.DataKey("FechaFin").ToString
DdlEstatusAdd.SelectedValueExist(GvRow.DataKey("Estatus").ToString.ToEntero)
hdnCvePerido.Value = GvRow.DataKey("CvePeriodo").ToString
DdlTipoPeriodoAdd.SelectedValueExist(GvRow.DataKey("CveTipoPeriodo").ToString().ToEntero())
DdlTurno.SelectedValueExist(GvRow.DataKey("CveTurno").ToString().ToEntero())
TxtNumeroAdd.Text = GvRow.DataKey("Numero").ToString()
TxtFechaInicioAdd.Text = GvRow.DataKey("FechaInicio").ToString()
TxtFechaFinAdd.Text = GvRow.DataKey("FechaFin").ToString()
DdlEstatusAdd.SelectedValueExist(GvRow.DataKey("Estatus").ToString().ToEntero())
hdnCvePerido.Value = GvRow.DataKey("CvePeriodo").ToString()
For Each item As ListItem In CBLchk.Items
Select Case item.Value.ToEntero()
Case 1
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioMes").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioMes").ToString())
Case 2
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinMes").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinMes").ToString())
Case 3
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioSS").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioSS").ToString())
Case 4
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinSS").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinSS").ToString())
Case 5
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioAño").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsInicioAño").ToString())
Case 6
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinAño").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("EsFinAño").ToString())
Case 7
item.Selected = Convert.ToBoolean(GvRow.DataKey("FueCalculado").ToString)
item.Selected = Convert.ToBoolean(GvRow.DataKey("FueCalculado").ToString())
End Select
Next
UpModalPerido.Update()

2
RH/CatPersonal.aspx
View File

@@ -961,7 +961,7 @@
</div>
<div class="col-md-4">
</div>
<div class="col-md-5" style="display: none;">
<div class="col-md-5" style="">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtCodigo" runat="server" MaxLength="12" Text="-1"></asp:TextBox>
<asp:Label AssociatedControlID="TxtCodigo" runat="server" Text="Código:"></asp:Label>

4
RH/Personal.aspx.vb
View File

@@ -6586,8 +6586,8 @@ Partial Class RH_Personal
If ObjPersonal.UpdateSalariointegrado(CvePersonal, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtFISalarioDiarioIntegrado.Text.ToDouble(), TxtFISalariodiario.Text.ToDouble) Then
TxtSalarioDiario.Text = TxtFISalariodiario.Text
TxtSalarioDiarioM.Text = TxtFISalariodiario.Text
'TxtSalarioCotizado.Text = TxtFISalarioDiarioIntegrado.Text
'TxtSalarioDiarioImSS.Text = TxtFISalarioDiarioIntegrado.Text
TxtSalarioCotizado.Text = TxtFISalarioDiarioIntegrado.Text
TxtSalarioDiarioImSS.Text = TxtFISalarioDiarioIntegrado.Text
TxtSalarioDiarioIntegrado.Text = TxtFISalarioDiarioIntegrado.Text
TxtSDI.Text = TxtFISalarioDiarioIntegrado.Text
UpDatos.Update()

4
vwd.webinfo
View File

@@ -422,6 +422,10 @@