diff --git a/Nomina/FiniquitoOld.aspx b/Nomina/FiniquitoOld.aspx deleted file mode 100644 index df6cee227..000000000 --- a/Nomina/FiniquitoOld.aspx +++ /dev/null @@ -1,516 +0,0 @@ -<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="FiniquitoOld.aspx.cs" Inherits="Nomina_Finiquito" %> - - - - - - - - Finiquito - - - - - - - -
  • - Cambiar Empleado
    • -
  • - ReCalcular
    • -
  • - done_allAutorizar
    • -
  • - Timbrar
    • -
  • - Formato Renuncia
    • -     -     -     - - - - - - -
    -
    - -
    -
    -
    - - Datos del Empleado -
    -
    - - -
    -
    -
    -
    -
    Empleado:
    -
    - -
    -
    -
    -
    Estatus
    -
    - -
    -
    -
    -
    Motivo Baja
    -
    - -
    -
    -
    -
    Fecha Baja
    -
    - -
    -
    -
    -
    Perido Finiquito
    -
    - -
    -
    -
    -
    -
    - -
    - - - - - -
    - -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    -
    -     -     - - -
    - -
    -
    -
    -
    -
    $
    -
    -
    -
    Aguinaldo ejercicio completo
    -
    -
    -
    -
    -
    $
    -
    -
    -
    Aguinaldo
    -
    -
    -
    -
    -
    -
    -
    -
    Aguinaldo Pagado
    -
    -
    -
    -
    -
    -
    -
    -
    Aguinaldo por pagar
    -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    Dias Ejercicio
    -
    -
    -
    -
    -
    -
    -
    -
    Dias Laborados
    -
    -
    -
    -
    -
    -
    -
    -
    Dias pago Aguinaldo
    -
    -
    -
    -
    - -
    -     -     - - -
    - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    - -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    -
    -     -     -     - - - - - -     -     -     - - <%--" PercepcionesDeducciones "--%> - - diff --git a/Nomina/FiniquitoOld.aspx.cs b/Nomina/FiniquitoOld.aspx.cs deleted file mode 100644 index 95eeedff3..000000000 --- a/Nomina/FiniquitoOld.aspx.cs +++ /dev/null @@ -1,515 +0,0 @@ -using System; -using System.Collections.Generic; -using System.Linq; -using Microsoft.VisualBasic; -using System.Data; -using Extensiones; -using System.Web.UI.WebControls; - -partial class Nomina_Finiquito : ClsPaginas -{ - private class NConcepto - { - //Concepto,CveConcepto,Importe,Estatus,ConceptoD,CveConceptoD,ImporteD,EstatusD - - - - public string NoConceptoP { get; set; } - public string ConceptoP { get; set; } - public string LabelValorP { get; set; } - public int CveConceptoP { get; set; } - public double ImporteP { get; set; } - public double ValorP { get; set; } - public int EstatusP { get; set; } - public bool isEditedP { get; set; } - - - public string NoConceptoD { get; set; } - public string ConceptoD { get; set; } - public string LabelValorD { get; set; } - public int CveConceptoD { get; set; } - public double ImporteD { get; set; } - public double ValorD { get; set; } - public int EstatusD { get; set; } - public bool isEditedD { get; set; } - } - - private class ConceptosPersonal - { - public ConceptosPersonal() - { - Concepto = ""; - ConceptoD = ""; - CveConcepto = 0; - CveConceptoD = 0; - Estatus = 0; - Estatus = 0; - } - public string Concepto { get; set; } - public int CveConcepto { get; set; } - public decimal Importe { get; set; } - public int Estatus { get; set; } - - public string ConceptoD { get; set; } - public int CveConceptoD { get; set; } - public decimal ImporteD { get; set; } - public int EstatusD { get; set; } - } - #region Propiedades - private int CvePersonal - { - get { return ViewState["CvePersonal"] != null ? ViewState["CvePersonal"].ToString().ToEntero() : 0; } - set { ViewState["CvePersonal"] = value; } - } - private int CveTipoPeriodo - { - get { return ViewState["CveTipoPeriodo"] != null ? ViewState["CveTipoPeriodo"].ToString().ToEntero() : 0; } - set - { - ViewState["CveTipoPeriodo"] = value; - } - } - private int CvePeriodoFiniquito - { - get { return ViewState["CvePeriodoFiniquito"] != null ? ViewState["CvePeriodoFiniquito"].ToString().ToEntero() : 0; } - set { ViewState["CvePeriodoFiniquito"] = value; } - } - - private int GCEstatus - { - get { return ViewState["GCEstatus"] != null ? ViewState["GCEstatus"].ToString().ToEntero() : 0; } - set { ViewState["GCEstatus"] = value; } - } - private int GCCveConcepto - { - get { return ViewState["GCCveConcepto"] != null ? ViewState["GCCveConcepto"].ToString().ToEntero() : 0; } - set { ViewState["GCCveConcepto"] = value; } - } - private decimal GCImporte - { - get { return ViewState["GCImporte"] != null ? ViewState["GCImporte"].ToString().ToDecimal() : 0; } - set { ViewState["GCImporte"] = value; } - } - - - private DataTable DTConceptosPersonal - { - get { return ViewState["DTConceptosPersonal"] != null ? (DataTable)ViewState["DTConceptosPersonal"] : null; } - set { ViewState["DTConceptosPersonal"] = value; } - } - private DataTable DTConceptos - { - get { return ViewState["DTConceptos"] != null ? (DataTable)ViewState["DTConceptos"] : null; } - set { ViewState["DTConceptos"] = value; } - } - private bool esLiquidacion - { - get { return ViewState["esLiquidacion"] != null ? System.Convert.ToBoolean(ViewState["esLiquidacion"]) : false; } - set { ViewState["esLiquidacion"] = value; } - } - #endregion - - private List ConceptsPersonas - { - get - { - List listaconceptos = new List(); - decimal TotalP = 0; - decimal TotalD = 0; - if ((!Information.IsNothing(DTConceptosPersonal) && DTConceptosPersonal.Rows.Count > 0)) - { - DataTable dtP = DTConceptosPersonal.FiltraParametros("Tipo=1"); - DataTable dtD = DTConceptosPersonal.FiltraParametros("Tipo=2"); - var noP = dtP.Rows.Count; - var noD = dtD.Rows.Count; - var max = noP > noD ? noP : noD; - TotalP = dtP.SUM("Importe").ToString().ToDecimal(); - TotalD = dtD.SUM("Importe").ToString().ToDecimal(); - for (int index = 0; index <= max; index++) - { - ConceptosPersonal obj = new ConceptosPersonal(); - if (index < noP) - { - obj.Importe = dtP.Rows[index]["Importe"].ToString().ToDecimal(); - obj.CveConcepto = dtP.Rows[index]["CveConcepto"].ToString().ToEntero(); - obj.Concepto = dtP.Rows[index]["Concepto"].ToString(); - obj.Estatus = dtP.Rows[index]["Estatus"].ToString().ToEntero(); - } - else if (index == noP) - { - obj.Estatus = -1; - obj.Concepto = "Agregar"; - } - if (index < noD) - { - obj.ImporteD = dtD.Rows[index]["Importe"].ToString().ToDecimal(); - obj.CveConceptoD = dtD.Rows[index]["CveConcepto"].ToString().ToEntero(); - obj.ConceptoD = dtD.Rows[index]["Concepto"].ToString(); - obj.EstatusD = dtD.Rows[index]["Estatus"].ToString().ToEntero(); - } - else if (index == noD) - { - obj.EstatusD = -1; - obj.ConceptoD = "Agregar"; - } - listaconceptos.Add(obj); - } - } - listaconceptos.Add(new ConceptosPersonal()); - - - ConceptosPersonal objST = new ConceptosPersonal(); - objST.Importe = TotalP; - objST.CveConcepto = 0; - objST.Concepto = "Total Percepciones"; - objST.Estatus = -2; - objST.ImporteD = TotalD; - objST.CveConceptoD = 0; - objST.ConceptoD = "Total Deducciones"; - objST.EstatusD = -2; - - listaconceptos.Add(objST); - - ConceptosPersonal objT = new ConceptosPersonal(); - - objT.CveConcepto = 0; - objT.Concepto = ""; - objT.Estatus = -3; - objT.ImporteD = objST.Importe + objST.ImporteD; - objT.CveConceptoD = 0; - objT.ConceptoD = "Total"; - objT.EstatusD = -3; - listaconceptos.Add(objT); - return listaconceptos; - } - } - - protected void Page_Load(object sender, EventArgs e) - { - if (!Page.IsPostBack) - { - CargaDdlPersonal(); - CargaMotivoBaja(); - CvePeriodoFiniquito = 0; - if (Request["CvePersonal"] != null && Request["CvePersonal"].ToString().ToEntero() > 0) - { - CvePersonal = Request["CvePersonal"].ToString().ToEntero(); - } - else - { - CvePersonal = -1; - } - if (!CargaDatosFiniquito()) - { - } - RegistraScript("$('#ModalEmpleados').modal();"); - } - - if (CvePersonal > 0 & CvePeriodoFiniquito > 0) - { - LtlEmpleadoCancelar.Visible = true; - } - } - - private void CargaMotivoBaja() - { - DdlMotivoBaja.DataSource = GlobalDTMotivoBaja.FiltraParametros("CveEmpresa = " + UsuarioActual.CveEmpresa); - DdlMotivoBaja.DataBind(); - } - private void CargaDdlPersonal() - { - ClsRH ObjPersonal = new ClsRH(); - if (ObjPersonal.GetPersonal(-1, UsuarioActual.CveEmpresa)) - { - DdlPersonal.DataSource = ObjPersonal.DtResultados; - DdlPersonal.DataBind(); - } - ObjPersonal.Dispose(); - } - - private bool CargaDatosFiniquito() - { - bool retorno = true; - if (CvePersonal > 0) - { - DdlPersonal.SelectedValueExist(CvePersonal.ToString()); - string Nombre = ""; - string FechaBaja = ""; - string EstatusPersonal = ""; - CvePeriodoFiniquito = 0; - CveTipoPeriodo = 0; - esLiquidacion = false; - pnlupValoresFiniquito.Visible = false; - DdlMotivoBaja.SelectedValue = "-1"; - using (ClsRH ObjPersonal = new ClsRH()) - { - if (ObjPersonal.GetPersonal(CvePersonal, UsuarioActual.CveEmpresa) && ObjPersonal.DtResultados.Rows.Count > 0) - { - DataRow prow = ObjPersonal.DtResultados.Rows[0]; - Nombre = prow["Nombre"].ToString(); - FechaBaja = string.Format("{0:dd/MM/yyyy}", ObjPersonal.FechaBaja); - EstatusPersonal = string.Format("{0}", prow["EstatusPersonal"]); - CveTipoPeriodo = prow["CveTipoPeriodo"].ToString().ToEntero(); - } - if (ObjPersonal.GetPersonalAltas(CvePersonal) && ObjPersonal.DtResultados.Rows.Count > 0) - { - DataRow prow = ObjPersonal.DtResultados.Rows[0]; - CvePeriodoFiniquito = prow["CvePeriodoFiniquito"].ToString().ToEntero(); - FechaBaja = string.Format("{0:dd/MM/yyyy}", prow["FechaFin"]); - DdlMotivoBaja.SelectedValueExist(prow["CveMotivoBaja"].ToString().ToEntero()); - var stringesliquidacion = prow["esLiquidacion"].ToString(); - esLiquidacion = (stringesliquidacion == "True" || stringesliquidacion == "1"); - ChkesLiquidacion.Checked = esLiquidacion; - } - } - Timbrado tr; - if (DdlMotivoBaja.SelectedValue.ToEntero() > 0) - LblMotivoBaja.Text = DdlMotivoBaja.SelectedItem.Text; - else - LblMotivoBaja.Text = ""; - HypEmpleado.Text = Nombre; - HypEmpleado.NavigateUrl = string.Format("/RH/Personal.aspx?CvePersonal={0}", CvePersonal); - LblFechaBaja.Text = FechaBaja; - LblEstatus.Text = EstatusPersonal; - TxtFechaBaja.Text = FechaBaja; - DdlTipoPeriodo_SelectedIndexChanged(null, null); - LblPerido.Text = DdlPeriodo.SelectedItem.Text; - if (CvePeriodoFiniquito <= 0) - retorno = false; - pnlupValoresFiniquito.Visible = true; - using (ClsNominas ObjNom = new ClsNominas()) - { - if (ObjNom.GetFiniquitosPersonal(CvePersonal, UsuarioActual.CveEmpresa)) - { - DataRow finrow = ObjNom.DtResultados.Rows[0]; - TxtAntiguedad.Text = $"{finrow["Antiguedad"]}"; - TxtdiasVacaciones.Text = $"{finrow["Diasvacaciones"]}"; - TxtDiasLaborados.Text = $"{finrow["diaslaborados"]}"; - TxtDiasProporcion.Text = $"{finrow["diasProporcion"]}"; - - TxtVaciones.Text = $"{finrow["Vacaciones"]}"; - TxtDiasPago.Text = $"{finrow["Diasvacaciones"]}"; - TxtDiasPendientes.Text = $"{finrow["diasporpagar"]}"; - TxtVacacionesporPagar.Text = $"{finrow["VacacionesporPagar"]}"; - - TxtPorcentjePrima.Text = $"{finrow["PrimaPorcentaje"]}"; - TxtPrimaVacacional.Text = $"{finrow["PrimaVacacional"]}"; - TxtPrimaPagada.Text = $"{finrow["PrimaPagada"]}"; - TxtPrimaPorPagar.Text = $"{finrow["PrimaVacacionalPorPagar"]}"; - } - if (ObjNom.DTSetResultados.Tables.Count > 5) - { - DataTable dtconceptos = ObjNom.DTSetResultados.Tables[1]; - DataTable dtconpersonal = ObjNom.DTSetResultados.Tables[5]; - - int maxFila = dtconpersonal.MAX("Fila", "Tipo<3").ToEntero(); - List lfin = new List(); - - if (maxFila > 0) - { - DataRow conPerrow; - DataRow conrow; - NConcepto sr; - - for (int i = 1; i <= maxFila; i++) - { - sr = new NConcepto(); - conPerrow = dtconpersonal.FiltroPrimero(string.Format("Tipo=1 AND Fila ={0}", i)); - if (conPerrow != null) - { - sr.CveConceptoP = conPerrow["CveConcepto"].ToString().ToEntero(); - conrow = dtconceptos.FiltroPrimero(string.Format("CveConcepto ={0}", sr.CveConceptoP)); - sr.ConceptoP = conrow["Concepto"].ToString(); - sr.ValorP = conPerrow["Valor"].ToString().ToDouble(); - sr.ImporteP = conPerrow["Importe"].ToString().ToDouble(); - sr.NoConceptoP = conrow["Codigo"].ToString(); - } - - - conPerrow = dtconpersonal.FiltroPrimero(string.Format("Tipo=2 AND Fila ={0}", i)); - if (conPerrow != null) - { - sr.CveConceptoD = conPerrow["CveConcepto"].ToString().ToEntero(); - conrow = dtconceptos.FiltroPrimero(string.Format("CveConcepto ={0}", sr.CveConceptoD)); - sr.ConceptoD = conrow["Concepto"].ToString(); - sr.ValorD= conPerrow["Valor"].ToString().ToDouble(); - sr.ImporteD = conPerrow["Importe"].ToString().ToDouble(); - sr.NoConceptoD = conrow["Codigo"].ToString(); - } - - - - lfin.Add(sr); - } - } - GvConceptos.DataSource = lfin; - GvConceptos.DataBind(); - } - } - //GvConceptos.DataSource = ConceptsPersonas; - //GvConceptos.DataBind(); - } - else - retorno = false; - return retorno; - } - - - protected void LnkCampiarEmpleado_Click(object sender, EventArgs e) - { - CvePersonal = DdlPersonal.SelectedValue.ToEntero(); - - - using (ClsRH ObjPersonal = new ClsRH()) - { - if (ObjPersonal.UpPersonalAltas(CvePersonal, UsuarioActual.CveUsuario, "", TxtFechaBaja.Text.ToDateTime().ToString("yyyy/MM/dd"), DdlPeriodo.SelectedValue.ToEntero(), DdlMotivoBaja.SelectedValue.ToEntero(), ChkesLiquidacion.Checked) && ObjPersonal.DtResultados.Rows.Count > 0) - { - } - } - if (pnlupValoresFiniquito.Visible) - { - } - if (!CargaDatosFiniquito()) - RegistraScript("$('#ModalEmpleados').modal('hide');"); - upDatos.Update(); - } - protected void LnkCalcular_Click(object sender, EventArgs e) - { - } - protected void LnkAutorizar_Click(object sender, EventArgs e) - { - } - protected void LnkTimbrar_Click(object sender, EventArgs e) - { - } - protected void LnkFormatoRenuncia_Click(object sender, EventArgs e) - { - } - protected void DdlPersonal_SelectedIndexChanged(object sender, EventArgs e) - { - Response.Redirect($"/Nomina/Finiquito.aspx?CvePersonal={DdlPersonal.SelectedValue}"); - } - protected void DdlTipoPeriodo_SelectedIndexChanged(object sender, EventArgs e) - { - int CveTipoPeriodoactual = DdlTipoPeriodo.SelectedValue.ToEntero() > 0 ? DdlTipoPeriodo.SelectedValue.ToEntero() : CveTipoPeriodo; - string fechabaja = TxtFechaBaja.Text; - DataTable dtperiodos = new DataTable(); - ClsNominas ObjPeriodos = new ClsNominas(); - if (ObjPeriodos.GetPeriodos(-1, UsuarioActual.CveEmpresa, -1, -1, -1)) - { - dtperiodos = ObjPeriodos.DtResultados; - if (Information.IsNothing(sender) && CvePeriodoFiniquito > 0) - { - DataRow row = dtperiodos.FiltroPrimero(string.Format("CvePeriodo={0} ", CvePeriodoFiniquito)); - if (!Information.IsNothing(row)) - { - CveTipoPeriodoactual = row["CveTipoPeriodo"].ToString().ToEntero(); - DdlTipoPeriodo.SelectedValueExist(CveTipoPeriodoactual == 6 ? "6" : "-1"); - } - } - dtperiodos = ObjPeriodos.DtResultados.FiltraParametros(string.Format("(Estatus IN (1,2,3,4) AND CveTipoPeriodo={0}) ", CveTipoPeriodoactual)); - // FechaInicio, P.FechaFin - DdlPeriodo.Items.Clear(); - DdlPeriodo.Items.Add(new ListItem("Seleccione", "-1")); - DdlPeriodo.SelectedValue = "-1"; - DdlPeriodo.DataSource = dtperiodos; - } - else - DdlPeriodo.DataSource = null; - ObjPeriodos.Dispose(); - DdlPeriodo.DataBind(); - if (fechabaja.Length > 0 && dtperiodos.Rows.Count > 0) - { - if ((CvePeriodoFiniquito > 0) && Information.IsNothing(sender)) - DdlPeriodo.SelectedValueExist(CvePeriodoFiniquito); - else - { - DataRow row = dtperiodos.FiltroPrimero(string.Format("(FechaInicio<='{0:yyyy/MM/dd}' AND FechaFin>='{0:yyyy/MM/dd}') ", fechabaja.ToDate())); - if (!Information.IsNothing(row)) - DdlPeriodo.SelectedValueExist(row["CvePeriodo"]); - } - } - } - - protected void GvConceptos_RowDataBound(object sender, GridViewRowEventArgs e) - { - if (e.Row.RowType == DataControlRowType.DataRow) - { - // Datakeys - // Concepto,CveConcepto,Importe,Estatus,ConceptoD,CveConceptoD,ImporteD,EstatusD - int CveConcepto = e.Row.DataKey("CveConceptoP").ToEntero(); - int CveConceptoD = e.Row.DataKey("CveConceptoD").ToEntero(); - // Dim Importe As Decimal = e.Row.DataKey("Importe").ToDecimal() - // Dim ImporteD As Decimal = e.Row.DataKey("ImporteD").ToDecimal() - int Estatus = e.Row.DataKey("EstatusP").ToEntero(); - int EstatusD = e.Row.DataKey("EstatusD").ToEntero(); - - // Controles - Label LtlConcepto = e.Row.FCLabel("LtlConcepto"); - LinkButton LnkConcepto = e.Row.FCLinkButton("LnkConcepto"); - Label LtlConceptoD = e.Row.FCLabel("LtlConceptoD"); - LinkButton LnkConceptoD = e.Row.FCLinkButton("LnkConceptod"); - Label LtlImporte = e.Row.FCLabel("LtlImporte"); - LinkButton LnkImporte = e.Row.FCLinkButton("LnkImporte"); - Label LtlImporteD = e.Row.FCLabel("LtlImporteD"); - LinkButton LnkImporteD = e.Row.FCLinkButton("LnkImporteD"); - - if (Estatus < -1 | EstatusD < -1) - e.Row.CssClass = "ConceptosTotales"; - if (CveConcepto == 0 && (Estatus == 0 || Estatus == -1 || Estatus == -3)) - LtlImporte.Text = ""; - - if (CveConceptoD == 0 && (EstatusD == 0 || EstatusD == -1)) - LtlImporteD.Text = ""; - - if (Estatus == -1) - LtlConcepto.Visible = false; - else if (Estatus > 0) - LtlImporte.Visible = false; - - if (EstatusD == -1) - LtlConceptoD.Visible = false; - else if (EstatusD > 0) - LtlImporteD.Visible = false; - - - LnkConcepto.Visible = !LtlConcepto.Visible; - LnkConceptoD.Visible = !LtlConceptoD.Visible; - LnkImporte.Visible = !LtlImporte.Visible; - LnkImporteD.Visible = !LtlImporteD.Visible; - } - } - - protected void LnkConcepto_Click(object sender, EventArgs e) - { - GridViewRow gvRow = (GridViewRow)((LinkButton)sender).NamingContainer; - GCEstatus = gvRow.DataKey("Estatus").ToEntero(); - GCCveConcepto = gvRow.DataKey("CveConcepto").ToEntero(); - GCImporte = gvRow.DataKey("Importe").ToDecimal(); - OpenModalConceptos(1); - } - protected void LnkConceptoD_Click(object sender, EventArgs e) - { - GridViewRow gvRow = (GridViewRow)((LinkButton)sender).NamingContainer; - GCEstatus = gvRow.DataKey("Estatus").ToEntero(); - GCCveConcepto = gvRow.DataKey("CveConcepto").ToEntero(); - GCImporte = gvRow.DataKey("Importe").ToDecimal(); - OpenModalConceptos(2); - } - - private void OpenModalConceptos(int Tipo) - { - if (GCEstatus == -1) - { - } - else - { - } - RegistraScript("$('#ModalConceptos').modal();"); - } - - protected void LnkAceptarConceptos_Click(object sender, EventArgs e) - { - RegistraScript("$('#ModalConceptos').modal('hide');"); - } -} diff --git a/Nomina/FiniquitoOld.aspx.vb b/Nomina/FiniquitoOld.aspx.vb deleted file mode 100644 index 18c1cda0f..000000000 --- a/Nomina/FiniquitoOld.aspx.vb +++ /dev/null @@ -1,462 +0,0 @@ -Option Strict On - -Imports System.Data -Imports Extensiones - -Partial Class Nomina_FiniquitoVB - Inherits ClsPaginas - Private Class ConceptosPersonal - Public Sub New() - Concepto = "" - ConceptoD = "" - CveConcepto = 0 - CveConceptoD = 0 - Estatus = 0 - Estatus = 0 - End Sub - Public Property Concepto As String - Public Property CveConcepto As Integer - Public Property Importe As Decimal - Public Property Estatus As Integer - - Public Property ConceptoD As String - Public Property CveConceptoD As Integer - Public Property ImporteD As Decimal - Public Property EstatusD As Integer - End Class -#Region "Propiedades" - - Private Property CvePersonal As Integer - Get - If Not IsNothing(ViewState("CvePersonal")) Then - Return ViewState("CvePersonal").ToString().ToEntero() - Else - Return 0 - End If - End Get - Set(value As Integer) - ViewState("CvePersonal") = value - End Set - End Property - Private Property CveTipoPeriodo As Integer - Get - If Not IsNothing(ViewState("CveTipoPeriodo")) Then - Return ViewState("CveTipoPeriodo").ToString().ToEntero() - Else - Return 0 - End If - End Get - Set(value As Integer) - ViewState("CveTipoPeriodo") = value - End Set - End Property - Private Property CvePeriodoFiniquito As Integer - Get - If Not IsNothing(ViewState("CvePeriodoFiniquito")) Then - Return ViewState("CvePeriodoFiniquito").ToString().ToEntero() - Else - Return 0 - End If - End Get - Set(value As Integer) - ViewState("CvePeriodoFiniquito") = value - End Set - End Property - - Private Property GCEstatus As Integer - Get - If Not IsNothing(ViewState("GCEstatus")) Then - Return ViewState("GCEstatus").ToString().ToEntero() - Else - Return 0 - End If - End Get - Set - ViewState("GCEstatus") = Value - End Set - End Property - Private Property GCCveConcepto As Integer - Get - If Not IsNothing(ViewState("GCCveConcepto")) Then - Return ViewState("GCCveConcepto").ToString().ToEntero() - Else - Return 0 - End If - End Get - Set - ViewState("GCCveConcepto") = Value - End Set - End Property - Private Property GCImporte As Decimal - Get - If Not IsNothing(ViewState("GCImporte")) Then - Return ViewState("GCImporte").ToString().ToDecimal() - Else - Return 0 - End If - End Get - Set - ViewState("GCImporte") = Value - End Set - End Property - Private ReadOnly Property ConceptsPersonas As List(Of ConceptosPersonal) - Get - Dim listaconceptos As New List(Of ConceptosPersonal) - Dim TotalP As Decimal = 0 - Dim TotalD As Decimal = 0 - If (Not IsNothing(DTConceptosPersonal) AndAlso DTConceptosPersonal.Rows.Count > 0) Then - Dim dtP As DataTable = DTConceptosPersonal.FiltraParametros("Tipo=1") - Dim dtD As DataTable = DTConceptosPersonal.FiltraParametros("Tipo=2") - Dim noP = dtP.Rows.Count() - Dim noD = dtD.Rows.Count() - Dim max = If(noP > noD, noP, noD) - TotalP = dtP.SUM("Importe").ToString().ToDecimal() - TotalD = dtD.SUM("Importe").ToString().ToDecimal() - For index = 0 To max - Dim obj As New ConceptosPersonal() - If index < noP Then - obj.Importe = dtP.Rows(index)("Importe").ToString().ToDecimal() - obj.CveConcepto = dtP.Rows(index)("CveConcepto").ToString().ToEntero() - obj.Concepto = dtP.Rows(index)("Concepto").ToString() - obj.Estatus = dtP.Rows(index)("Estatus").ToString().ToEntero() - ElseIf index = noP Then - obj.Estatus = -1 - obj.Concepto = "Agregar" - End If - If index < noD Then - obj.ImporteD = dtD.Rows(index)("Importe").ToString().ToDecimal() - obj.CveConceptoD = dtD.Rows(index)("CveConcepto").ToString().ToEntero() - obj.ConceptoD = dtD.Rows(index)("Concepto").ToString() - obj.EstatusD = dtD.Rows(index)("Estatus").ToString().ToEntero() - ElseIf index = noD Then - obj.EstatusD = -1 - obj.ConceptoD = "Agregar" - End If - listaconceptos.Add(obj) - Next - End If - listaconceptos.Add(New ConceptosPersonal()) - - - Dim objST As New ConceptosPersonal() - objST.Importe = TotalP - objST.CveConcepto = 0 - objST.Concepto = "Total Percepciones" - objST.Estatus = -2 - objST.ImporteD = TotalD - objST.CveConceptoD = 0 - objST.ConceptoD = "Total Deducciones" - objST.EstatusD = -2 - - listaconceptos.Add(objST) - - Dim objT As New ConceptosPersonal() - - objT.CveConcepto = 0 - objT.Concepto = "" - objT.Estatus = -3 - objT.ImporteD = objST.Importe + objST.ImporteD - objT.CveConceptoD = 0 - objT.ConceptoD = "Total" - objT.EstatusD = -3 - listaconceptos.Add(objT) - Return listaconceptos - End Get - End Property - - Private Property DTConceptosPersonal As DataTable - Get - If Not IsNothing(ViewState("DTConceptosPersonal")) Then - Return DirectCast(ViewState("DTConceptosPersonal"), DataTable) - Else - Return Nothing - End If - End Get - Set - ViewState("DTConceptosPersonal") = Value - End Set - End Property - Private Property DTConceptos As DataTable - Get - If Not IsNothing(ViewState("DTConceptos")) Then - Return DirectCast(ViewState("DTConceptos"), DataTable) - Else - Return Nothing - End If - End Get - Set - ViewState("DTConceptos") = Value - End Set - End Property - - - Private Property esLiquidacion As Boolean - Get - If Not IsNothing(ViewState("esLiquidacion")) Then - Return CBool(ViewState("esLiquidacion")) - Else - Return False - End If - End Get - Set - ViewState("esLiquidacion") = Value - End Set - End Property -#End Region - Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load - If Not Page.IsPostBack Then - - CargaDdlPersonal() - CargaMotivoBaja() - CvePeriodoFiniquito = 0 - If Request("CvePersonal") IsNot Nothing AndAlso IsNumeric(Request("CvePersonal")) AndAlso Request("CvePersonal").ToEntero > 0 Then - ViewState("CvePersonal") = Request("CvePersonal") - Else - CvePersonal = -1 - End If - If Not CargaDatosFiniquito() Then - End If - RegistraScript("$('#ModalEmpleados').modal();") - - End If - - If CvePersonal > 0 And CvePeriodoFiniquito > 0 Then - LtlEmpleadoCancelar.Visible = True - End If - End Sub - - Private Sub CargaMotivoBaja() - DdlMotivoBaja.DataSource = GlobalDTMotivoBaja.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa) - DdlMotivoBaja.DataBind() - End Sub - Private Sub CargaDdlPersonal() - Dim ObjPersonal As New ClsRH - If ObjPersonal.GetPersonal(-1, UsuarioActual.CveEmpresa) Then - DdlPersonal.DataSource = ObjPersonal.DtResultados - DdlPersonal.DataBind() - End If - ObjPersonal.Dispose() - End Sub - - Private Function CargaDatosFiniquito() As Boolean - Dim retorno As Boolean = True - If CvePersonal > 0 Then - - DdlPersonal.SelectedValueExist(CvePersonal.ToString()) - Dim Nombre As String = "" - Dim FechaBaja As String = "" - Dim EstatusPersonal As String = "" - CvePeriodoFiniquito = 0 - CveTipoPeriodo = 0 - esLiquidacion = False - pnlupValoresFiniquito.Visible = False - DdlMotivoBaja.SelectedValue = "-1" - Using ObjPersonal As New ClsRH() - If ObjPersonal.GetPersonal(CvePersonal, UsuarioActual.CveEmpresa) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then - Nombre = ObjPersonal.DtResultados.Rows(0)("Nombre").ToString() - FechaBaja = String.Format("{0:dd/MM/yyyy}", ObjPersonal.FechaBaja) - EstatusPersonal = String.Format("{0}", ObjPersonal.DtResultados.Rows(0)("EstatusPersonal")) - CveTipoPeriodo = ObjPersonal.DtResultados.Rows(0)("CveTipoPeriodo").ToString().ToEntero() - End If - If ObjPersonal.GetPersonalAltas(CvePersonal) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then - CvePeriodoFiniquito = ObjPersonal.DtResultados.Rows(0)("CvePeriodoFiniquito").ToString().ToEntero() - FechaBaja = String.Format("{0:dd/MM/yyyy}", ObjPersonal.DtResultados.Rows(0)("FechaFin")) - DdlMotivoBaja.SelectedValueExist(ObjPersonal.DtResultados.Rows(0)("CveMotivoBaja").ToString().ToEntero()) - Dim stringesliquidacion = ObjPersonal.DtResultados.Rows(0)("esLiquidacion").ToString() - esLiquidacion = (stringesliquidacion = "True" OrElse stringesliquidacion = "1") - ChkesLiquidacion.Checked = esLiquidacion - End If - End Using - If DdlMotivoBaja.SelectedValue.ToEntero() > 0 Then - LblMotivoBaja.Text = DdlMotivoBaja.SelectedItem.Text - Else - LblMotivoBaja.Text = "" - End If - HypEmpleado.Text = Nombre - HypEmpleado.NavigateUrl = String.Format("/RH/Personal.aspx?CvePersonal={0}", CvePersonal) - LblFechaBaja.Text = FechaBaja - LblEstatus.Text = EstatusPersonal - TxtFechaBaja.Text = FechaBaja - DdlTipoPeriodo_SelectedIndexChanged(Nothing, Nothing) - LblPerido.Text = DdlPeriodo.SelectedItem.Text - If CvePeriodoFiniquito <= 0 Then - retorno = False - End If - pnlupValoresFiniquito.Visible = True - Using ObjNom As New ClsNominas() - 'If ObjNom.GetFiniquitosPersonal(CvePersonal, UsuarioActual.CveEmpresa) Then - ' DTConceptosPersonal = ObjNom.DtResultados - 'Autoriza nomina - 'Finiquita Liquidación - 'Rep Nomina - 'RepInversion de nomina - 'Alertas Altas /Bajas - ' - 'End If - End Using - GvConceptos.DataSource = ConceptsPersonas - GvConceptos.DataBind() - Else - retorno = False - End If - Return retorno - End Function - - - Protected Sub LnkCampiarEmpleado_Click(sender As Object, e As EventArgs) - CvePersonal = DdlPersonal.SelectedValue.ToEntero() - - - Using ObjPersonal As New ClsRH() - If ObjPersonal.UpPersonalAltas(CvePersonal, UsuarioActual.CveUsuario, "", TxtFechaBaja.Text.ToDateTime().ToString("yyyy/MM/dd"), DdlPeriodo.SelectedValue.ToEntero(), DdlMotivoBaja.SelectedValue.ToEntero(), ChkesLiquidacion.Checked) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then - - End If - End Using - If pnlupValoresFiniquito.Visible Then - - End If - If Not CargaDatosFiniquito() Then - - RegistraScript("$('#ModalEmpleados').modal('hide');") - End If - upDatos.Update() - End Sub - Protected Sub LnkCalcular_Click(sender As Object, e As EventArgs) - - End Sub - Protected Sub LnkAutorizar_Click(sender As Object, e As EventArgs) - - End Sub - Protected Sub LnkTimbrar_Click(sender As Object, e As EventArgs) - - End Sub - Protected Sub LnkFormatoRenuncia_Click(sender As Object, e As EventArgs) - - End Sub - Protected Sub DdlPersonal_SelectedIndexChanged(sender As Object, e As EventArgs) - Response.Redirect($"/Nomina/Finiquito.aspx?CvePersonal={DdlPersonal.SelectedValue}") - 'Alert($"insertParam('CvePersonal','{DdlPersonal.SelectedValue}')") - 'RegistraScript($"insertParam('CvePersonal','{DdlPersonal.SelectedValue}')") - End Sub - Protected Sub DdlTipoPeriodo_SelectedIndexChanged(sender As Object, e As EventArgs) - Dim CveTipoPeriodoactual As Integer = If(DdlTipoPeriodo.SelectedValue.ToEntero() > 0, DdlTipoPeriodo.SelectedValue.ToEntero(), CveTipoPeriodo) - Dim fechabaja As String = TxtFechaBaja.Text - Dim dtperiodos As New DataTable - Dim ObjPeriodos As New ClsNominas - If ObjPeriodos.GetPeriodos(-1, UsuarioActual.CveEmpresa, -1, -1, -1) Then - dtperiodos = ObjPeriodos.DtResultados - If IsNothing(sender) AndAlso CvePeriodoFiniquito > 0 Then - Dim row As DataRow = dtperiodos.FiltroPrimero(String.Format("CvePeriodo={0} ", CvePeriodoFiniquito)) - If Not IsNothing(row) Then - CveTipoPeriodoactual = row("CveTipoPeriodo").ToString().ToEntero() - DdlTipoPeriodo.SelectedValueExist(If(CveTipoPeriodoactual = 6, "6", "-1")) - End If - End If - dtperiodos = ObjPeriodos.DtResultados.FiltraParametros(String.Format("(Estatus IN (1,2,3,4) AND CveTipoPeriodo={0}) ", CveTipoPeriodoactual)) - 'FechaInicio, P.FechaFin - DdlPeriodo.Items.Clear() - DdlPeriodo.Items.Add(New ListItem("Seleccione", "-1")) - DdlPeriodo.SelectedValue = "-1" - DdlPeriodo.DataSource = dtperiodos - Else - DdlPeriodo.DataSource = Nothing - End If - ObjPeriodos.Dispose() - DdlPeriodo.DataBind() - If fechabaja.Length > 0 AndAlso dtperiodos.Rows.Count > 0 Then - If (CvePeriodoFiniquito > 0) AndAlso IsNothing(sender) Then - DdlPeriodo.SelectedValueExist(CvePeriodoFiniquito) - Else - Dim row As DataRow = dtperiodos.FiltroPrimero(String.Format("(FechaInicio<='{0:yyyy/MM/dd}' AND FechaFin>='{0:yyyy/MM/dd}') ", fechabaja.ToDate())) - If Not IsNothing(row) Then - DdlPeriodo.SelectedValueExist(row("CvePeriodo")) - End If - End If - - End If - End Sub - -#Region "Conceptos" - Protected Sub GvConceptos_RowDataBound(sender As Object, e As GridViewRowEventArgs) - If e.Row.RowType = DataControlRowType.DataRow Then - 'Datakeys - 'Concepto,CveConcepto,Importe,Estatus,ConceptoD,CveConceptoD,ImporteD,EstatusD - Dim CveConcepto As Integer = e.Row.DataKey("CveConcepto").ToEntero() - Dim CveConceptoD As Integer = e.Row.DataKey("CveConceptoD").ToEntero() - 'Dim Importe As Decimal = e.Row.DataKey("Importe").ToDecimal() - 'Dim ImporteD As Decimal = e.Row.DataKey("ImporteD").ToDecimal() - Dim Estatus As Integer = e.Row.DataKey("Estatus").ToEntero() - Dim EstatusD As Integer = e.Row.DataKey("EstatusD").ToEntero() - - 'Controles - Dim LtlConcepto As Label = e.Row.FCLabel("LtlConcepto") - Dim LnkConcepto As LinkButton = e.Row.FCLinkButton("LnkConcepto") - Dim LtlConceptoD As Label = e.Row.FCLabel("LtlConceptoD") - Dim LnkConceptoD As LinkButton = e.Row.FCLinkButton("LnkConceptod") - Dim LtlImporte As Label = e.Row.FCLabel("LtlImporte") - Dim LnkImporte As LinkButton = e.Row.FCLinkButton("LnkImporte") - Dim LtlImporteD As Label = e.Row.FCLabel("LtlImporteD") - Dim LnkImporteD As LinkButton = e.Row.FCLinkButton("LnkImporteD") - - If Estatus < -1 Or EstatusD < -1 Then - e.Row.CssClass = "ConceptosTotales" - End If - If CveConcepto = 0 AndAlso (Estatus = 0 OrElse Estatus = -1 OrElse Estatus = -3) Then - LtlImporte.Text = "" - End If - - If CveConceptoD = 0 AndAlso (EstatusD = 0 OrElse EstatusD = -1) Then - LtlImporteD.Text = "" - End If - - If Estatus = -1 Then - LtlConcepto.Visible = False - ElseIf Estatus > 0 Then - LtlImporte.Visible = False - End If - - If EstatusD = -1 Then - LtlConceptoD.Visible = False - ElseIf EstatusD > 0 Then - LtlImporteD.Visible = False - End If - - - LnkConcepto.Visible = Not LtlConcepto.Visible - LnkConceptoD.Visible = Not LtlConceptoD.Visible - LnkImporte.Visible = Not LtlImporte.Visible - LnkImporteD.Visible = Not LtlImporteD.Visible - - End If - End Sub - - Protected Sub LnkConcepto_Click(sender As Object, e As EventArgs) - Dim gvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) - GCEstatus = gvRow.DataKey("Estatus").ToEntero() - GCCveConcepto = gvRow.DataKey("CveConcepto").ToEntero() - GCImporte = gvRow.DataKey("Importe").ToDecimal() - OpenModalConceptos(1) - End Sub - Protected Sub LnkConceptoD_Click(sender As Object, e As EventArgs) - Dim gvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) - GCEstatus = gvRow.DataKey("Estatus").ToEntero() - GCCveConcepto = gvRow.DataKey("CveConcepto").ToEntero() - GCImporte = gvRow.DataKey("Importe").ToDecimal() - OpenModalConceptos(2) - End Sub - - Private Sub OpenModalConceptos(Tipo As Integer) - If GCEstatus = -1 Then - Else - - End If - RegistraScript("$('#ModalConceptos').modal();") - End Sub - - Protected Sub LnkAceptarConceptos_Click(sender As Object, e As EventArgs) - - RegistraScript("$('#ModalConceptos').modal('hide');") - End Sub - -#End Region -End Class