diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx index 1fede38ff..cf02a5045 100644 --- a/Nomina/Nomina.aspx +++ b/Nomina/Nomina.aspx @@ -1441,7 +1441,13 @@ CssClass="lnkMovotPermanente" runat="server" Text='<%# Eval("Saldo", "{0:###,###.##}")%>'> - + + + + + + <%----%> @@ -5289,6 +5295,9 @@ + + + diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs index 6936779b5..98a36cbb9 100644 --- a/Nomina/Nomina.aspx.cs +++ b/Nomina/Nomina.aspx.cs @@ -16,6 +16,7 @@ using iTextSharp.text.pdf.parser; using Profact.TimbraCFDI40; using Ionic.Zip; using DocumentFormat.OpenXml.Drawing; +using System.Web; public partial class Nomina_Nomina2 : ClsPaginas { @@ -5100,6 +5101,7 @@ public partial class Nomina_Nomina2 : ClsPaginas ClosedXML.Excel.XLColor colorperp = ClosedXML.Excel.XLColor.FromArgb(51, 153, 102); ClosedXML.Excel.XLColor colorded = ClosedXML.Excel.XLColor.FromArgb(150, 54, 52); ClosedXML.Excel.XLColor colororange = ClosedXML.Excel.XLColor.FromArgb(247, 150, 70); + ClosedXML.Excel.XLColor colororangeblue = ClosedXML.Excel.XLColor.FromArgb(79, 129, 189); ClosedXML.Excel.IXLCell celda; DataTable dtConceptos = this.dtConceptos.FiltraParametros("(Tipo ='P' AND EsPadre = 1 AND EsFormula =0) OR (Tipo = 'D' AND EsPadre = 1 AND EsFormula =0) OR Tipo = 'O' AND EsPadre = 1 AND EsFormula =0"); DataTable dtFiltrado = dtConceptos.Clone(); // Clonar la estructura del DataTable @@ -5194,8 +5196,13 @@ public partial class Nomina_Nomina2 : ClsPaginas column++; - TitleRange(libro, "Incapacidad", filainicio + 2, column, filainicio + 2, column, true, false, dedcborderColor); - TitleRange(libro, "Perm. Faltas", filainicio + 3, column, filainicio + 3, column, false, true, dedcborderColor); + TitleRange(libro, "Asistencias", filainicio + 2, column, filainicio + 2, column+2, false, false, colororangeblue); + TitleRange(libro, "Incapacidad", filainicio + 3, column, filainicio + 3, column, false, false, colororangeblue); + column++; + TitleRange(libro, "Permisos", filainicio + 3, column, filainicio + 3, column, false, false, colororangeblue); + column++; + TitleRange(libro, "Faltas", filainicio + 3, column, filainicio + 3, column, false, false, colororangeblue); + column++; Titlecell(libro, "", filainicio + 4, column, true, true, dedcborderColor); libro.Column(column).Width = 15; if (dtConceptos.FiltraParametros("Tipo ='D'").Rows.Count > 0) @@ -5391,7 +5398,11 @@ public partial class Nomina_Nomina2 : ClsPaginas column++; - libro.Cell(Fila, column).Value = ""; + Titlecell(libro, erow["DiasIncapacidad"], Fila, column, false, false, dedcborderColor); + column++; + Titlecell(libro, "0", Fila, column, false, false, dedcborderColor); + column++; + Titlecell(libro, erow["DiasFaltados"], Fila, column, false, false, dedcborderColor); if (dtConceptos.FiltraParametros("Tipo ='D'").Rows.Count > 0) { @@ -9704,6 +9715,8 @@ public partial class Nomina_Nomina2 : ClsPaginas { LtlXml.Text = System.IO.File.ReadAllText(PathXML); script = string.Format("Savexml(\"{0} {1}.xml\", $('.ltlxml').html());", Xmlname, empleado); + + //System.IO.FileInfo file = new System.IO.FileInfo(PathXML); //string mimeType = "text/plain"; //try diff --git a/RH/CatPersonal.aspx.vb b/RH/CatPersonal.aspx.vb index 0dd977d87..06f8c63bf 100644 --- a/RH/CatPersonal.aspx.vb +++ b/RH/CatPersonal.aspx.vb @@ -284,6 +284,7 @@ Partial Class RH_CatPersonal Private Sub CargaEstatusPersonal() DdlEstatusPersonal.DataSource = GlobalDTEstatusPersonal DdlEstatusPersonal.DataBind() + DdlEstatusPersonal.SelectedValueExist("1") End Sub Private Sub CargaProyecto() 'DdlProyectoAsignado.DataSource = GlobalDTProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1) diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb index 1b4ca41c4..aa8effabe 100644 --- a/RH/Personal.aspx.vb +++ b/RH/Personal.aspx.vb @@ -2124,7 +2124,7 @@ Partial Class RH_Personal If TempDTCuentasBancos IsNot Nothing AndAlso TempDTCuentasBancos.Rows.Count > 0 Then For Each row As DataRow In TempDTCuentasBancos.Rows - If Not ObjCuentasDeposito.AddCuentasDepositos(row("BancoNombre").ToString(), row("Plaza").ToString(), row("Sucursal").ToString(), row("Cuenta").ToString(), row("CLABE").ToString(), row("CIE").ToString(), row("SWIFT").ToString(), row("Referencia").ToString(), "", UsuarioActual.CveUsuario, row("CveMoneda").ToString().ToEntero(), UsuarioActual.CveEmpresa, CvePersonal:=CvePersonal, CveUsuarioModifico:=UsuarioActual.CveUsuario, BBVAAlias:=row("BBVAAlias").ToString()) Then + If Not ObjCuentasDeposito.AddCuentasDepositos(row("BancoNombre").ToString(), row("Plaza").ToString(), row("Sucursal").ToString(), row("Cuenta").ToString(), row("CLABE").ToString(), row("CIE").ToString(), row("SWIFT").ToString(), row("Referencia").ToString(), "", UsuarioActual.CveUsuario, row("CveMoneda").ToString().ToEntero(), UsuarioActual.CveEmpresa, CvePersonal:=CvePersonal, CveUsuarioModifico:=UsuarioActual.CveUsuario, BBVAAlias:=row("BBVAAlias").ToString(), EstatusPagoElectronico:=True, EstatusPagoElectronicoGrupos:=True) Then TieneError = True Exit For End If