From fc067ce69d3c525f176ce5b1cfedbf0f2e173f2e Mon Sep 17 00:00:00 2001 From: Hector Date: Mon, 9 Aug 2021 15:17:16 -0700 Subject: [PATCH 1/5] Cambios para tipo conta --- Contabilidad/ContabilidadElectronica.aspx.vb | 21 ++++++++++++++------ 1 file changed, 15 insertions(+), 6 deletions(-) diff --git a/Contabilidad/ContabilidadElectronica.aspx.vb b/Contabilidad/ContabilidadElectronica.aspx.vb index e59728d33..a33545fc8 100644 --- a/Contabilidad/ContabilidadElectronica.aspx.vb +++ b/Contabilidad/ContabilidadElectronica.aspx.vb @@ -185,7 +185,7 @@ Partial Class Contabilidad_ContabilidadElectronica Dim DtCuentas As New DataTable If UsuarioActual.Empresa.TipoContabilidad = 1 Then Dim objconta As New ClsContabilidad - If objconta.GetBalanzaComprobacion(FechaI, FechaF, UsuarioActual.CveEmpresa) Then + If objconta.GetBalanzaComprobacion(FechaI, FechaF, 1, -1, "-1", UsuarioActual.CveEmpresa, 0) Then DtCuentas = objconta.DtResultados End If objconta.Dispose() @@ -218,11 +218,20 @@ Partial Class Contabilidad_ContabilidadElectronica 'DETALLES For Each Dr As DataRow In DtCuentas.Rows Str.Append("") Next From b0c26ae15584cf8680be8866163ae8b4d4c8a600 Mon Sep 17 00:00:00 2001 From: Hector Date: Mon, 9 Aug 2021 15:18:00 -0700 Subject: [PATCH 2/5] Tags para remplazar en word --- App_Code/ClsRH.vb | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb index 502e985bb..8949803ec 100644 --- a/App_Code/ClsRH.vb +++ b/App_Code/ClsRH.vb @@ -6692,8 +6692,8 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo ListaTagsDocumentost.Add(New TagsDocumentos("{Estatura}", DtResultados(0)("Estatura").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{Peso}", DtResultados(0)("Peso").ToString)) - ListaTagsDocumentost.Add(New TagsDocumentos("{LugarNacimiento}", DtResultados(0)("LugarNacimiento").ToString)) - ListaTagsDocumentost.Add(New TagsDocumentos("{Edad}", DtResultados(0)("Edad").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{LugarNacimiento}", DtResultados(0)("LugarNacimiento").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{Edad}", If(DtResultados(0)("Edad").ToString = "", If(DtResultados(0)("FechaNacimiento").ToString = "", "", DateDiff(DateInterval.Year, DtResultados(0)("FechaNacimiento").ToString.ToDate, Now.Date).ToString), DtResultados(0)("Edad").ToString))) ListaTagsDocumentost.Add(New TagsDocumentos("{NombreTelEmergencia}", DtResultados(0)("NombreTelEmergencia").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{TipoSangre}", DtResultados(0)("TipoSangre").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{SubProyecto}", DtResultados(0)("SubProyecto").ToString)) @@ -6712,8 +6712,13 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo ListaTagsDocumentost.Add(New TagsDocumentos("{AcusadoDelitoObservaciones}", DtResultados(0)("AcusadoDelitoObservaciones").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{Calle}", DtResultados(0)("Calle").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{NumInt}", DtResultados(0)("NumInt").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{NumExt}", DtResultados(0)("NumExt").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{Colonia}", DtResultados(0)("Colonia").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{CP}", DtResultados(0)("CP").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{Ciudad}", DtResultados(0)("Ciudad").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{Estado}", DtResultados(0)("Estado").ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{Telefono}", DtResultados(0)("Telefono").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{Celular}", DtResultados(0)("Celular").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{Correo}", DtResultados(0)("Correo").ToString)) @@ -6727,6 +6732,12 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo ListaTagsDocumentost.Add(New TagsDocumentos("{CredencialElector}", DtResultados(0)("CredencialElector").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{FechaIngreso}", DtResultados(0)("FechaIngreso").ToString.ToDate.ToShortDateString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{DiaIngreso}", DtResultados(0)("FechaIngreso").ToString.ToDate.Day.ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{MesIngreso}", DtResultados(0)("FechaIngreso").ToString.ToDate.Month.ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{MesLetraIngreso}", MesTexto(DtResultados(0)("FechaIngreso").ToString.ToDate.Month.ToEntero))) + + ListaTagsDocumentost.Add(New TagsDocumentos("{AñoIngreso}", DtResultados(0)("FechaIngreso").ToString.ToDate.Year.ToString)) + ListaTagsDocumentost.Add(New TagsDocumentos("{Puesto}", DtResultados(0)("Puesto").ToString)) ListaTagsDocumentost.Add(New TagsDocumentos("{CUIP}", "")) From 217ec16f643c86816a884079981a19a88f7907d7 Mon Sep 17 00:00:00 2001 From: Hector Date: Tue, 10 Aug 2021 00:22:52 -0700 Subject: [PATCH 3/5] --- Inventarios/InventarioFisicoDetalle.aspx | 268 +++++++------------- Inventarios/InventarioFisicoDetalle.aspx.vb | 40 +-- 2 files changed, 112 insertions(+), 196 deletions(-) diff --git a/Inventarios/InventarioFisicoDetalle.aspx b/Inventarios/InventarioFisicoDetalle.aspx index 7fde8403c..b44053b71 100644 --- a/Inventarios/InventarioFisicoDetalle.aspx +++ b/Inventarios/InventarioFisicoDetalle.aspx @@ -1,98 +1,6 @@ <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="InventarioFisicoDetalle.aspx.vb" Inherits="Inventarios_InventarioFisicoDetalle" %> - @@ -342,7 +250,8 @@
- + @@ -367,98 +276,103 @@
-
-
- Número de registros: +
+
+
+ Número de registros: +
+
- - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + - - - - - - - - - + + + + + + + + - - - + -
-
- Forma de pago
- +
+ Forma de pago
+ @@ -1374,7 +1374,7 @@
- + Días extras
@@ -1382,27 +1382,28 @@
- + Ejercicio
- +
¿Prima Vacacional?
-
- -
- ¿Cobrar IMSS? +
+ +
+ ¿Cobrar IMSS? +
+
- -
+
Actualizar @@ -1687,20 +1688,45 @@
-
- - - +
+
+
Calcular automatico
-
- - - +
+
+
+ + + +
+
+
+ +
-
- - - +
+
+
+ + + +
+
+
+ +
+
+
+
+
+ + + +
+
+
+ +
@@ -2257,17 +2283,16 @@ Tipo Periodo:
- +
Salario Diario
-
+
-
-
+
<%--
--%> diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs index 5f0143d8c..14750421c 100644 --- a/Nomina/Nomina.aspx.cs +++ b/Nomina/Nomina.aspx.cs @@ -1823,11 +1823,33 @@ public partial class Nomina_Nomina2 : ClsPaginas TxtmcImporte.Text = ""; TxtmcImporteGrabado.Text = ""; Txtmcvalor.Text = ""; + ChkCalAutomaticoG.Checked = false; + ChkCalAutomatico.Checked = false; + ChkCalAutomaticoV.Checked = false; if (CveConcepto > 0) { DataRow drow = dtempleadosConceptos.FiltroPrimero(string.Format("CveConcepto={0} AND CvePersonal ={1}", CveConcepto, CvePersonal)); if (drow != null) { + int TipoCalculo = drow["Estatus"].ToString().ToEntero(); + ChkCalAutomaticoG.Checked = true; + ChkCalAutomatico.Checked = true; + ChkCalAutomaticoV.Checked = true; + if (TipoCalculo >= 5) + { + TipoCalculo -= 5; + ChkCalAutomaticoG.Checked = false; + } + if (TipoCalculo >= 3) + { + TipoCalculo -= 3; + ChkCalAutomatico.Checked = false; + } + if (TipoCalculo >= 1) + { + ChkCalAutomaticoV.Checked = false; + + } TxtmcImporte.Text = string.Format("{0:N2}", drow["Importe"]); TxtmcImporteGrabado.Text = string.Format("{0:N2}", drow["ImporteGravado"]); Txtmcvalor.Text = string.Format("{0:N2}", drow["Valor"]); @@ -1841,12 +1863,30 @@ public partial class Nomina_Nomina2 : ClsPaginas } } UPpanelModalUpConcepto.Update(); + ChkCalAutomaticoV_CheckedChanged(ChkCalAutomaticoV, null); + ChkCalAutomatico_CheckedChanged(ChkCalAutomatico, null); + ChkCalAutomaticoG_CheckedChanged(ChkCalAutomaticoG, null); + } + protected void ChkCalAutomaticoV_CheckedChanged(object sender, EventArgs e) + { + + Txtmcvalor.Enabled = !ChkCalAutomaticoV.Checked; + } + protected void ChkCalAutomatico_CheckedChanged(object sender, EventArgs e) + { + + TxtmcImporte.Enabled = !ChkCalAutomatico.Checked; + } + protected void ChkCalAutomaticoG_CheckedChanged(object sender, EventArgs e) + { + TxtmcImporteGrabado.Enabled = !ChkCalAutomaticoG.Checked; + } protected void BtnAceptarMC_Click(object sender, EventArgs e) { - int chkImporte = 1; - int chkImporteGravado = 1; - int chkImporteValor = 1; + int chkImporte = ChkCalAutomatico.Checked? 0:1; + int chkImporteGravado = ChkCalAutomaticoG.Checked ? 0 : 1; + int chkImporteValor = ChkCalAutomaticoV.Checked ? 0 : 1; bool continuar = true; int CveNomina = 0; double Total = 0; @@ -1858,12 +1898,15 @@ public partial class Nomina_Nomina2 : ClsPaginas CvePersonal = DdlmcPersonal.SelectedValue.ToEntero(); } int CveConcepto = DdlmcConceptos.SelectedValue.ToEntero(); - if (CveConcepto > 0 && CvePersonal > 0) - { decimal ImporteConcepto = TxtmcImporte.Text.Replace("$", "").Replace(",", "").ToDecimal(); - decimal ImporteGravadoConcepto = TxtmcImporteGrabado.Text.Replace("$", "").Replace(",", "").ToDecimal(); + decimal ImporteGravadoConcepto = ChkCalAutomaticoG.Checked ? 0.0m : TxtmcImporteGrabado.Text.Replace("$", "").Replace(",", "").ToDecimal(); decimal ImporteExentoConcepto = ImporteConcepto - ImporteGravadoConcepto; decimal ImporteValor = Txtmcvalor.Text.Replace("$", "").Replace(",", "").ToDecimal(); + if ((ImporteConcepto>= 0 && ImporteGravadoConcepto<= ImporteConcepto)|| (ImporteConcepto < 0 && ImporteGravadoConcepto >= ImporteConcepto)) + { + + if (CveConcepto > 0 && CvePersonal > 0) + { using (ClsNominas objNomina = new ClsNominas()) { @@ -1933,6 +1976,11 @@ public partial class Nomina_Nomina2 : ClsPaginas { Alert("Debe seleccionar un concepto.", TipoMensaje.MsgAdvertencia); } + } + } + else + { + Alert("el importe gravado no puede ser mayor al importe total, en caso de que el importe total sea negativo no puede ser menor.",TipoMensaje.MsgAdvertencia ); } } @@ -5728,7 +5776,8 @@ public partial class Nomina_Nomina2 : ClsPaginas VacFolioActual = VacFolioActual + 1; ClsRH objRH = new ClsRH(); // Dim continuar As Boolean = objRH.SolicitudVacacionesAdd(CvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual, motivoVacaciones) - bool continuar = objRH.SolicitudVacacionesAdd(SRCvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual, FechaPago: fechapago, diasinabiles: diasinhabil, CveTipoPago: DdlFormapagovacaciones.SelectedValue.ToEntero(), diasExtras: TxtVacDiasExtra.Text.ToEntero());// + bool continuar = objRH.SolicitudVacacionesAdd(SRCvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual, FechaPago: fechapago, + diasinabiles: diasinhabil, CveTipoPago: DdlFormapagovacaciones.SelectedValue.ToEntero(), diasExtras: TxtVacDiasExtra.Text.ToEntero()); if (objRH.DtResultados.Rows.Count > 0) { string ShowError = objRH.DtResultados.Rows[0]["ShowError"].ToString(); @@ -6733,4 +6782,5 @@ public partial class Nomina_Nomina2 : ClsPaginas LnkSRVacacionesADD.Visible = true; } + } diff --git a/RH/CatPersonal.aspx b/RH/CatPersonal.aspx index 3f6a9d946..656147974 100644 --- a/RH/CatPersonal.aspx +++ b/RH/CatPersonal.aspx @@ -939,7 +939,16 @@
-