From f4394b90bed8658154178cf0041a496abcb99ae7 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Fri, 1 Mar 2024 23:46:31 -0700 Subject: [PATCH 1/8] modificar salario detectar cambios --- RH/CalculoSBC.aspx.cs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/RH/CalculoSBC.aspx.cs b/RH/CalculoSBC.aspx.cs index 75e090f23..5f0c0dddc 100644 --- a/RH/CalculoSBC.aspx.cs +++ b/RH/CalculoSBC.aspx.cs @@ -947,7 +947,10 @@ public partial class RH_CalculoSBC : ClsPaginas if (e.Row.RowType == DataControlRowType.DataRow) { - e.Row.FCCheckBox("chkUpdate").Checked = !(string.Format("{0:N2}", e.Row.DBCampo("SalarioDiarioSSNuevo")) == string.Format("{0:N2}", e.Row.DBCampo("SalarioDiarioSS"))); + decimal valueold = e.Row.DBCampo("SalarioDiarioSS").ToString().ToDecimal(); + decimal valuenew = e.Row.DBCampo("SalarioDiarioSSNuevo").ToString().ToDecimal(); + decimal diferencia = Math.Abs(valueold - valuenew); + e.Row.FCCheckBox("chkUpdate").Checked = diferencia > 0.01M; e.Row.FCLabel("lblsalarioDiarioSSf").Text = e.Row.FCCheckBox("chkUpdate").Checked ? "Si" : "No"; } From 37635a919b69abdcc4818e0be0b984e9929af4d5 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Mon, 11 Mar 2024 07:28:15 -0700 Subject: [PATCH 2/8] --- App_Code/ClsNominas.vb | 3 ++- Nomina/CalculoISRAnual.aspx.cs | 16 ++++++++++++++-- 2 files changed, 16 insertions(+), 3 deletions(-) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 587854f03..0e34fcd2f 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -308,7 +308,7 @@ Public Class ClsNominas End Try Return retorno End Function - Public Function AutorizaCalculoAnual(CveEmpresa As Integer, CveUsuario As Integer, PersonalXml As String, Optional Numpagos As Integer = 1) As Boolean + Public Function AutorizaCalculoAnual(CveEmpresa As Integer, CveUsuario As Integer, PersonalXml As String, Optional Numpagos As Integer = 1, Optional Ejercicio As Integer = 2023) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Nom_AutorizaCalculoAnual", CommandType.StoredProcedure) With SqlAdapter.SelectCommand.Parameters @@ -316,6 +316,7 @@ Public Class ClsNominas .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@PersonalXml", SqlDbType.Xml).Value = If(String.IsNullOrEmpty(PersonalXml), DBNull.Value, DirectCast(PersonalXml, Object)) .Add("@Numpagos", SqlDbType.Int).Value = Numpagos + .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio End With Try diff --git a/Nomina/CalculoISRAnual.aspx.cs b/Nomina/CalculoISRAnual.aspx.cs index 5202f795a..82dd5049d 100644 --- a/Nomina/CalculoISRAnual.aspx.cs +++ b/Nomina/CalculoISRAnual.aspx.cs @@ -7,10 +7,21 @@ using System.Web.UI; using System.Web.UI.WebControls; using System.Xml.Linq; using Extensiones; +using Profact.TimbraCFDI40; public partial class Nomina_CalculoISRAnual : ClsPaginas { + + protected int Ejercicio + { + get + { + if (ViewState["Ejercicio"] == null) { return 0; } + else { return ViewState["Ejercicio"].ToString().ToEntero(); } + } + set { ViewState["Ejercicio"] = value; } + } protected int CvePersonal { get @@ -51,7 +62,8 @@ public partial class Nomina_CalculoISRAnual : ClsPaginas { using (ClsNominas onom = new ClsNominas()) { - onom.CalculoISRAnual(DdlEjercicios.SelectedValue.ToEntero(), UsuarioActual.Empresa.CveEmpresa); + Ejercicio = DdlEjercicios.SelectedValue.ToEntero(); + onom.CalculoISRAnual(Ejercicio, UsuarioActual.Empresa.CveEmpresa); GVCalculoISRAnual.DataSource = onom.DtResultados; } @@ -250,7 +262,7 @@ public partial class Nomina_CalculoISRAnual : ClsPaginas using (ClsNominas onom = new ClsNominas()) { - continuar = onom.AutorizaCalculoAnual(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, xmlpeople, numpagos); + continuar = onom.AutorizaCalculoAnual(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, xmlpeople, numpagos, Ejercicio); } if (continuar) { From 9a62c8ba735b741f452d653ddff3513956a0af4d Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 2 Apr 2024 12:16:16 -0700 Subject: [PATCH 3/8] nominas --- App_Code/ClsRH.vb | 10 +- Nomina/Nomina.aspx | 1 + Nomina/Nomina.aspx.cs | 165 ++++++++++++++++++++++++- RH/CatAsistenciasInasistencias.aspx | 17 ++- RH/CatAsistenciasInasistencias.aspx.vb | 11 +- RH/Personal.aspx | 1 + 6 files changed, 189 insertions(+), 16 deletions(-) diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb index e0ee2474c..8ef0812c4 100644 --- a/App_Code/ClsRH.vb +++ b/App_Code/ClsRH.vb @@ -340,7 +340,7 @@ Public Class ClsRH Public Function AddAsistenciasInasistencias(Tipo As String, AplicaFalta As Boolean, AplicaAsistencia As Boolean, CveUsuario As Integer, CveEmpresa As Integer, chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo As Boolean, chkAplicaAguinaldo As Boolean, - chkAplicaUtilidades As Boolean, aplicaPago As Integer, aplicaPagoDoble As Integer, aplicaPrimaVac As Integer, Optional TipoCorto As String = "-1") As Boolean + chkAplicaUtilidades As Boolean, aplicaPago As Integer, aplicaPagoDoble As Integer, aplicaPrimaVac As Integer, Optional TipoCorto As String = "-1", Optional AplicaPrimaDominical As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_RH_AsistenciasInasistenciasAdd") @@ -361,6 +361,7 @@ Public Class ClsRH .Add("@AplicaPago", SqlDbType.Int).Value = aplicaPago .Add("@AplicaPagoDoble", SqlDbType.Int).Value = aplicaPagoDoble .Add("@AplicaPrimaVac", SqlDbType.Int).Value = aplicaPrimaVac + .Add("@AplicaPrimaDominical", SqlDbType.Int).Value = AplicaPrimaDominical End With @@ -382,7 +383,7 @@ Public Class ClsRH Public Function UpdateAsistenciasInasistencias(Tipo As String, AplicaFalta As Boolean, AplicaAsistencia As Boolean, Estatus As Boolean, CveAI As Integer, chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo As Boolean, chkAplicaAguinaldo As Boolean, chkAplicaUtilidades As Boolean, - aplicaPago As Integer, aplicaPagoDoble As Integer, aplicaPrimaVac As Integer, Optional TipoCorto As String = "-1") As Boolean + aplicaPago As Integer, aplicaPagoDoble As Integer, aplicaPrimaVac As Integer, Optional TipoCorto As String = "-1", Optional AplicaPrimaDominical As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_RH_AsistenciasInasistenciasUpdate") @@ -403,8 +404,9 @@ Public Class ClsRH .Add("@AplicaPago", SqlDbType.Int).Value = aplicaPago .Add("@AplicaPagoDoble", SqlDbType.Int).Value = aplicaPagoDoble .Add("@AplicaPrimaVac", SqlDbType.Int).Value = aplicaPrimaVac - End With - + .Add("@AplicaPrimaDominical", SqlDbType.Int).Value = AplicaPrimaDominical + End With + Try SqlAdapter.Fill(Data) Retorno = True diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx index 187ee7301..57d521871 100644 --- a/Nomina/Nomina.aspx +++ b/Nomina/Nomina.aspx @@ -1132,6 +1132,7 @@ + diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs index 9285ca71e..18ab63109 100644 --- a/Nomina/Nomina.aspx.cs +++ b/Nomina/Nomina.aspx.cs @@ -749,6 +749,16 @@ public partial class Nomina_Nomina2 : ClsPaginas GvNominas.Columns[CurrentColumn].Visible = true; CurrentColumn++; + field = (BoundField)GvNominas.Columns[CurrentColumn]; + field.HeaderText = "Especie"; + field.DataField = "SumaEspecie"; + field.ItemStyle.BackColor = System.Drawing.Color.LightGray; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM("SumaEspecie") != 0); + CurrentColumn++; + + field = (BoundField)GvNominas.Columns[CurrentColumn]; field.HeaderText = "Total"; field.DataField = "Total"; @@ -1118,6 +1128,8 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["SubProyecto"] = drow["SubProyecto"]; dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); + dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -1142,6 +1154,8 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["Departamento"] = drow["Departamento"]; dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); + dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -1166,6 +1180,8 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["Turno"] = drow["Turno"]; dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); + dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -4338,6 +4354,12 @@ public partial class Nomina_Nomina2 : ClsPaginas SubTotales.EstatusD = -2; SubTotales.ImporteD = dtPerEmpleados.SUM("SumaDeducciones", string.Format("CvePersonal = {0}", SRCvePersonal)); + + NConcepto especie = new NConcepto(); + especie.CveConceptoD = 0; + especie.ConceptoD = "Especie"; + especie.EstatusD = -3; + especie.ImporteD = dtPerEmpleados.SUM("SumaEspecie", string.Format("CvePersonal = {0}", SRCvePersonal)); NConcepto Totales = new NConcepto(); Totales.CveConceptoD = 0; Totales.ConceptoD = "Total"; @@ -4345,6 +4367,10 @@ public partial class Nomina_Nomina2 : ClsPaginas Totales.ImporteD = dtPerEmpleados.SUM("Total", string.Format("CvePersonal = {0}", SRCvePersonal)); lconc.Add(SubTotales); + if (especie.ImporteD > 0) + { + lconc.Add(especie); + } lconc.Add(Totales); GvConceptos.DataSource = lconc; GvConceptos.DataBind(); @@ -4455,6 +4481,12 @@ public partial class Nomina_Nomina2 : ClsPaginas SubTotales.EstatusD = -2; SubTotales.ImporteD = dtPerEmpleados.SUM("SumaDeducciones", string.Format("CvePersonal = {0}", SRCvePersonal)); + NConcepto especie = new NConcepto(); + especie.CveConceptoD = 0; + especie.ConceptoD = "Especie"; + especie.EstatusD = -3; + especie.ImporteD = dtPerEmpleados.SUM("SumaEspecie", string.Format("CvePersonal = {0}", SRCvePersonal)); + NConcepto Totales = new NConcepto(); Totales.CveConceptoD = 0; Totales.ConceptoD = "Total"; @@ -4462,6 +4494,10 @@ public partial class Nomina_Nomina2 : ClsPaginas Totales.ImporteD = dtPerEmpleados.SUM("Total", string.Format("CvePersonal = {0}", SRCvePersonal)); lconc.Add(SubTotales); + if (especie.ImporteD > 0) + { + lconc.Add(especie); + } lconc.Add(Totales); DataTable dtCon = new DataTable(); @@ -4969,6 +5005,10 @@ public partial class Nomina_Nomina2 : ClsPaginas libro.Range(filainicio + 1, iniciotipe + 1, filainicio + 1, column).Merge().Value = "Deducciones"; } + column++; + libro.Cell(filainicio + 1, column).Value = " "; + libro.Range(filainicio + 2, column, filainicio + 3, column).Merge().Value = "Despensa"; + libro.Column(column).Width = 15; column++; libro.Cell(filainicio + 1, column).Value = " "; libro.Range(filainicio + 2, column, filainicio + 3, column).Merge().Value = "Total"; @@ -5084,7 +5124,13 @@ public partial class Nomina_Nomina2 : ClsPaginas { libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaDeducciones", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); } - + column++; + libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); + libro.Cell(Fila, column).Value = erow["SumaEspecie"]; + if (newsubproyecto) + { + libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaEspecie", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); + } column++; libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); libro.Cell(Fila, column).Value = erow["Total"]; @@ -5352,7 +5398,14 @@ public partial class Nomina_Nomina2 : ClsPaginas { libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaDeducciones", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); } - + column++; + libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); + libro.Cell(Fila, column).Value = erow["SumaEspecie"]; + if (newsubproyecto) + { + libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaEspecie", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); + } + column++; libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); libro.Cell(Fila, column).Value = erow["Total"]; @@ -5898,8 +5951,51 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", drow2["SumaDeducciones"])); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; + + } + } + if(drow2["SumaEspecie"].ToString().ToDecimal()>0) + { + rowx = new GemBox.Document.Tables.TableRow(document); + tconeptos.Rows.Add(rowx); + { + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(3, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(30, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(6, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; } + + { + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(3, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(30, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, "Especie"); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(6, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilostrong; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", drow2["SumaEspecie"])); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilostrong; + } } { rowx = new GemBox.Document.Tables.TableRow(document); @@ -6225,10 +6321,60 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaDeducciones", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)))); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; - + } } + if(dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto))>0) + { + rowx = new GemBox.Document.Tables.TableRow(document); + tconeptos.Rows.Add(rowx); + { + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(3, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(30, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(6, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + + } + + { + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(3, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); + paragraphh.ParagraphFormat.Style = styilostrong; + + + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(30, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, "Especie"); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilo; + + + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(6, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, ""); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilostrong; + + + cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); + cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); + paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)) )); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh.ParagraphFormat.Style = styilostrong; + //SumaEspecie + } + } //no empleados { @@ -6579,7 +6725,7 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaDeducciones", "CvePersonal > 0 "))); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; - + //SumaEspecie } } { @@ -7918,7 +8064,12 @@ public partial class Nomina_Nomina2 : ClsPaginas SubTotales.ConceptoD = "Total Deducciones"; SubTotales.EstatusD = -2; SubTotales.ImporteD = dtempleadosSimula.SUM("SumaDeducciones", string.Format("CvePersonal = {0}", SRCvePersonal)); - + + NConcepto especie = new NConcepto(); + especie.CveConceptoD = 0; + especie.ConceptoD = "Especie"; + especie.EstatusD = -3; + especie.ImporteD = dtempleadosSimula.SUM("SumaEspecie", string.Format("CvePersonal = {0}", SRCvePersonal)); NConcepto Totales = new NConcepto(); Totales.CveConceptoD = 0; Totales.ConceptoD = "Total"; @@ -7926,6 +8077,10 @@ public partial class Nomina_Nomina2 : ClsPaginas Totales.ImporteD = dtempleadosSimula.SUM("Total", string.Format("CvePersonal = {0}", SRCvePersonal)); lconc.Add(SubTotales); + if (especie.ImporteD > 0) + { + lconc.Add(especie); + } lconc.Add(Totales); DataTable dtCon = new DataTable(); diff --git a/RH/CatAsistenciasInasistencias.aspx b/RH/CatAsistenciasInasistencias.aspx index 4b27fd759..9a89935e4 100644 --- a/RH/CatAsistenciasInasistencias.aspx +++ b/RH/CatAsistenciasInasistencias.aspx @@ -31,7 +31,7 @@ - + @@ -95,6 +95,11 @@ + + + + + a @@ -200,7 +205,7 @@
-
+

@@ -211,8 +216,12 @@
-
- +
+ +
+
+
+
diff --git a/RH/CatAsistenciasInasistencias.aspx.vb b/RH/CatAsistenciasInasistencias.aspx.vb index 6f2ff753a..e280abb9a 100644 --- a/RH/CatAsistenciasInasistencias.aspx.vb +++ b/RH/CatAsistenciasInasistencias.aspx.vb @@ -69,6 +69,9 @@ Partial Class RH_CatAsistenciasInasistencias AplicaRetardo.Checked = False AplicaAguinaldo.Checked = False AplicaUtilidades.Checked = False + ChkAplicaPagoDoble.Checked = False + ChkAplicaPrimaDominical.Checked = False + TipoTxt.Text = "" TxtTipoCorto.Text = "" UpModalTiposD.Update() @@ -88,10 +91,11 @@ Partial Class RH_CatAsistenciasInasistencias Dim aplicaPago As Integer = If(ChkAplicaPago.Checked, 1, 0) Dim aplicaPagoDoble As Integer = If(ChkAplicaPagoDoble.Checked, 1, 0) Dim aplicaPrimaVac As Integer = If(ChkAplicaPrimaVac.Checked, 1, 0) + Dim AplicaPrimaDominical As Integer = If(ChkAplicaPrimaDominical.Checked, 1, 0) If ObjAsistenciasInasistencias.AddAsistenciasInasistencias(TipoTxt.Text.Trim, chkAplicaFalta, chkAplicaNoAplica, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, - chkAplicaVacacion, chkAplicaIncapacidad, chkAplicaRetardo, chkAplicaAguinaldo, chkAplicaUtilidades, aplicaPago, aplicaPagoDoble, aplicaPrimaVac, TxtTipoCorto.Text) Then + chkAplicaVacacion, chkAplicaIncapacidad, chkAplicaRetardo, chkAplicaAguinaldo, chkAplicaUtilidades, aplicaPago, aplicaPagoDoble, aplicaPrimaVac, TxtTipoCorto.Text, AplicaPrimaDominical) Then TipoTxt.Text = "" Alert("El nuevo Tipo Asistencias/Inasistencias se guardó correctamente.", TipoMensaje.MsgInformacion) UpTitulos.Update() @@ -136,7 +140,7 @@ Partial Class RH_CatAsistenciasInasistencias ChkAplicaPago.Checked = If(GvRow.DataKey("AplicaPago") = "Aplica", True, False) ChkAplicaPagoDoble.Checked = If(GvRow.DataKey("AplicaPagoDoble") = "Aplica", True, False) ChkAplicaPrimaVac.Checked = If(GvRow.DataKey("AplicaPrimaVac") = "Aplica", True, False) - + ChkAplicaPrimaDominical.Checked = If(GvRow.DataKey("AplicaPrimaDominical") = "Aplica", True, False) ChkEstatus.Checked = If(GvRow.DataKey("Estatus") = "Activo", True, False) CveTipoAsisAEditar = Convert.ToInt32(GvRow.DataKey("CveAsistenciasInasistencias")) 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating" @@ -170,12 +174,13 @@ Partial Class RH_CatAsistenciasInasistencias Dim aplicaPagoDoble As Integer = If(ChkAplicaPagoDoble.Checked, 1, 0) Dim aplicaPrimaVac As Integer = If(ChkAplicaPrimaVac.Checked, 1, 0) + Dim AplicaPrimaDominical As Integer = If(ChkAplicaPrimaDominical.Checked, 1, 0) If ObjAsistenciasInasistencias.UpdateAsistenciasInasistencias(Tipo, ckAplicaFalta, AplicaAsistencia, Estatus, CveAsistenciasInasistencias, chkAplicaVacacion, chkAplicaIncapacidad, chkAplicaRetardo, chkAplicaAguinaldo, chkAplicaUtilidades, aplicaPago, aplicaPagoDoble, - aplicaPrimaVac, TxtTipoCorto.Text) Then + aplicaPrimaVac, TxtTipoCorto.Text, AplicaPrimaDominical) Then GvDatos.EditIndex = -1 ViewState("DTAsistenciasInasistencias") = ObjAsistenciasInasistencias.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa) GlobalDTAsistenciasInasistencias(UsuarioActual.CveEmpresa) = Nothing diff --git a/RH/Personal.aspx b/RH/Personal.aspx index 9053f04f4..eeef32c5e 100644 --- a/RH/Personal.aspx +++ b/RH/Personal.aspx @@ -2177,6 +2177,7 @@ +
From 5c1030a7c15cc1a79a826f1300bedca98a0af855 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Wed, 10 Apr 2024 06:28:02 -0700 Subject: [PATCH 4/8] --- App_Code/ClsNominas.vb | 11 +- App_Code/ClsPaginas.vb | 6 +- Nomina/Nomina.aspx | 182 +++++++- Nomina/Nomina.aspx.cs | 942 ++++++++++++++++++++++++----------------- 4 files changed, 753 insertions(+), 388 deletions(-) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 0e34fcd2f..418df87c3 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -372,7 +372,16 @@ Public Class ClsNominas SqlAdapter.Fill(DTSetResultados) retorno = True Catch ex As Exception - OnError("Ocurrió un error al actualizar forma de pago.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + Dim msgerror As String = "Ocurrió un error al actualizar forma de pago." + If String.IsNullOrEmpty(BancoNumCuenta) Then + msgerror = "El campo numero de cuenta es necesario" + + End If + If String.IsNullOrEmpty(CLABE) Then + msgerror = "El campo numero de CLABE es necesario" + + End If + OnError(msgerror, ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) End Try Return retorno End Function diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index b433d440c..487f2a677 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -8267,9 +8267,9 @@ Public Class ClsPaginas filtrop = "AND CveSistema IN(10,11,32)" friltrod = " AND CveSistema =47" End If - DTPercepciones = ObjNomina.DtResultados.FiltraParametros($"((Tipo = 'P' OR (Tipo = 'D' AND Importe <0)) AND Importe <>0 AND EsPadre = 1 AND SoloVisible =0) {filtrop}") - DTDeducciones = ObjNomina.DtResultados.FiltraParametros($"(Tipo = 'D' AND Importe >0 AND EsPadre = 1 AND SoloVisible =0) {friltrod}") - DTDeducciones2 = ObjNomina.DtResultados.FiltraParametros($"((Tipo = 'D' AND Importe >0 AND EsPadre = 1 AND SoloVisible =0) OR CveSistema IN (20,21) OR CveConcepto =4714){friltrod}") + DTPercepciones = ObjNomina.DtResultados.FiltraParametros($"((Tipo = 'P' OR (Tipo = 'D' AND Importe <0)) AND ((Importe <>0 AND EsPadre = 1 AND SoloVisible =0) OR Imprimir =1)) {filtrop}") + DTDeducciones = ObjNomina.DtResultados.FiltraParametros($"(Tipo = 'D' AND ((Importe >0 AND EsPadre = 1 AND SoloVisible =0) OR Imprimir =1) ) {friltrod}") + DTDeducciones2 = ObjNomina.DtResultados.FiltraParametros($"(Tipo = 'D' AND (( Importe >0 AND EsPadre = 1 AND SoloVisible =0) OR Imprimir =1) ){friltrod}") ajusteindemnizacion = ObjNomina.DtResultados.FiltraParametros($"((Tipo = 'P' OR (Tipo = 'D' AND Importe <0)) AND Importe <>0 AND EsPadre = 1 AND SoloVisible =0) AND CveSistema IN(10,11,32)").SUM("Importe") - ObjNomina.DtResultados.FiltraParametros($"(Tipo = 'D' AND Importe >0 AND EsPadre = 1 AND SoloVisible =0) AND CveSistema =47").SUM("Importe") For Each row As DataRow In DTPercepciones.Rows diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx index 57d521871..1abdbca12 100644 --- a/Nomina/Nomina.aspx +++ b/Nomina/Nomina.aspx @@ -216,6 +216,15 @@ +
  • + Ordenar +
    • +
  • + Ocultar / Mostrar +
    • +
  • + Ordenar +
  • Autorizar
    • @@ -3948,6 +3957,8 @@ Cargar + + @@ -4728,8 +4739,6 @@
    - -
    @@ -4795,6 +4804,7 @@ +
    @@ -5039,14 +5049,182 @@
    done_all Guardar + +
    + + + + + + diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs index 18ab63109..7b7a2f3ff 100644 --- a/Nomina/Nomina.aspx.cs +++ b/Nomina/Nomina.aspx.cs @@ -22,7 +22,24 @@ public partial class Nomina_Nomina2 : ClsPaginas { get { return 5; } } - + private DataTable DtNomOrden + { + get + { + if (ViewState["DtNomOrden"] == null) { return null; } + else { return (DataTable)ViewState["DtNomOrden"]; } + } + set { ViewState["DtNomOrden"] = value; } + } + private DataTable DtNomOcultarMostrar + { + get + { + if (ViewState["DtNomOcultarMostrar"] == null) { return null; } + else { return (DataTable)ViewState["DtNomOcultarMostrar"]; } + } + set { ViewState["DtNomOcultarMostrar"] = value; } + } private DateTime FechaInicioPeriodo { get @@ -309,6 +326,30 @@ public partial class Nomina_Nomina2 : ClsPaginas if (!IsPostBack) { + { + + DtNomOrden = new DataTable(); + DtNomOrden.Columns.Add("Columna"); + DtNomOrden.Columns.Add("Tipo"); + DtNomOrden.Columns.Add("TipoDB"); + DtNomOrden.Columns.Add("ColumnaDB"); + + { + DataRow drorden = DtNomOrden.NewRow(); + drorden["Columna"] = "Código"; + drorden["Tipo"] = "Ascendente"; + drorden["ColumnaDB"] ="Codigo"; + drorden["TipoDB"] = "ASC"; + DtNomOrden.Rows.Add(drorden); + } + DtNomOcultarMostrar = new DataTable(); + DtNomOcultarMostrar.Columns.Add("Columna"); + DtNomOcultarMostrar.Columns.Add("Tipo"); + DtNomOcultarMostrar.Columns.Add("TipoDB"); + DtNomOcultarMostrar.Columns.Add("ColumnaDB"); + + } + TxtEjercicioFiltroVacaciones.Text = "2023"; TxtejerciciotablasSubsidio.Text = DateTime.Now.Year.ToString(); enviarCorreoEnTimbrado = (UsuarioActual.CveEmpresa == 141 ? true : true); @@ -517,8 +558,8 @@ public partial class Nomina_Nomina2 : ClsPaginas { if (objperiodos.DtResultados.Rows.Count == 0) { - - Alert("No existen periodos registrados en este año y tipo de periodo,¿desea registrarlos masivamente?",TipoMensaje.MsgConfirmacion, "$(\"#divCargaMasiva\").modal(\"show\");",TextoConfirmacion:"Aceptar",TextoSegundoBoton:"No"); + + Alert("No existen periodos registrados en este año y tipo de periodo,¿desea registrarlos masivamente?", TipoMensaje.MsgConfirmacion, "$(\"#divCargaMasiva\").modal(\"show\");", TextoConfirmacion: "Aceptar", TextoSegundoBoton: "No"); } dtPeriodos = objperiodos.DtResultados.FiltraParametros("Estatus IN (1,2,3,4,5)"); } @@ -531,13 +572,13 @@ public partial class Nomina_Nomina2 : ClsPaginas } protected void DdlEjercicios_SelectedIndexChanged(object sender, EventArgs e) - { - cargaPeriodos(); + { + cargaPeriodos(); } protected void DdlTipoPeriodo_SelectedIndexChanged(object sender, EventArgs e) { - cargaPeriodos(); + cargaPeriodos(); } protected void DdlPeriodo_SelectedIndexChanged(object sender, EventArgs e) @@ -671,353 +712,8 @@ public partial class Nomina_Nomina2 : ClsPaginas #region CargaGrid if (continuar) { + cargarGrid(); - //string ctipo = "P"; - /* - while (GvNominas.Columns.Count > 3) - { - GvNominas.Columns.RemoveAt(2); - //GvNominas.Columns.sa(); - }*/ - - int CurrentColumn = 2; - BoundField bf; - foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P') AND EsPadre = 1 ").Rows) - { - int CveConcepto = row["CveConcepto"].ToString().ToEntero(); - int SoloVisible = row["SoloVisible"].ToString().ToEntero(); - string Concepto = row["Concepto"].ToString(); - GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - if (SoloVisible == 1) - { - - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; - } - GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0); - bf = (BoundField)GvNominas.Columns[CurrentColumn]; - bf.DataField = string.Format("V_{0}", CveConcepto); - bf.HeaderText = Concepto; - if (GvNominas.Columns[CurrentColumn].Visible) - { - CurrentColumn++; - } - } - if (true) - { - BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; - - field.HeaderText = "Percepciones"; - field.DataField = "SumaPercepciones"; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - GvNominas.Columns[CurrentColumn].Visible = true; - CurrentColumn++; - } - - foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('D') AND EsPadre = 1 ").Rows) - { - int CveConcepto = row["CveConcepto"].ToString().ToEntero(); - int CveSistema = row["CveSistema"].ToString().ToEntero(); - int SoloVisible = row["SoloVisible"].ToString().ToEntero(); - string Concepto = row["Concepto"].ToString(); - GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - if (SoloVisible == 1) - { - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; - } - GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0) && CveSistema != 101; - bf = (BoundField)GvNominas.Columns[CurrentColumn]; - bf.DataField = string.Format("V_{0}", CveConcepto); - bf.HeaderText = Concepto; - if (GvNominas.Columns[CurrentColumn].Visible) - { - CurrentColumn++; - } - } - - if (true) - { - BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; - field.HeaderText = "Deducciones"; - field.DataField = "SumaDeducciones"; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].Visible = true; - CurrentColumn++; - - field = (BoundField)GvNominas.Columns[CurrentColumn]; - field.HeaderText = "Especie"; - field.DataField = "SumaEspecie"; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM("SumaEspecie") != 0); - CurrentColumn++; - - - field = (BoundField)GvNominas.Columns[CurrentColumn]; - field.HeaderText = "Total"; - field.DataField = "Total"; - field.ItemStyle.BackColor = System.Drawing.Color.DarkGray; - field.ItemStyle.CssClass = "TotalWhite"; - field.HeaderStyle.CssClass = "TotalWhite"; - - GvNominas.Columns[CurrentColumn].Visible = true; - CurrentColumn++; - } - if (Chkobligaciones.Checked) - { - foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('O') AND EsPadre = 1 ").Rows) - { - int CveConcepto = row["CveConcepto"].ToString().ToEntero(); - int SoloVisible = row["SoloVisible"].ToString().ToEntero(); - string Concepto = row["Concepto"].ToString(); - GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - if (SoloVisible == 1) - { - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; - } - GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0); - bf = (BoundField)GvNominas.Columns[CurrentColumn]; - bf.DataField = string.Format("V_{0}", CveConcepto); - bf.HeaderText = Concepto; - - if (GvNominas.Columns[CurrentColumn].Visible) - { - CurrentColumn++; - } - } - if (true) - { - BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; - field.HeaderText = "Obligaciones"; - field.DataField = "SumaObligaciones"; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].Visible = true; - CurrentColumn++; - } - - - } - for (int i = CurrentColumn; i < 102; i++) - { - bf = (BoundField)GvNominas.Columns[i]; - bf.DataField = ""; - bf.HeaderText = ""; - GvNominas.Columns[i].ItemStyle.BackColor = System.Drawing.Color.Transparent; - GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; - GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; - GvNominas.Columns[i].Visible = false; - - } - bool tr = false; - if (tr) - { - /* - bool sumaPercepciones = false; - bool sumaDeducciones = false; - if (GvNominas.Columns.Count > 3) - { - - foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P','D','O') AND EsPadre = 1 ").Rows) - { - int CveConcepto = row["CveConcepto"].ToString().ToEntero(); - string Concepto = row["Concepto"].ToString(); - string Tipo = row["Tipo"].ToString(); - - if (Tipo != ctipo) - { - if (ctipo == "P") - { - CurrentColumn++; - if (Tipo != "D") - { - CurrentColumn++; - CurrentColumn++; - } - } - else if (ctipo == "D") - { - - CurrentColumn++; - CurrentColumn++; - } - ctipo = Tipo; - } - CurrentColumn++; - } - } - else - { - - foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P','D','O') AND EsPadre = 1 ").Rows) - { - int CveConcepto = row["CveConcepto"].ToString().ToEntero(); - string Concepto = row["Concepto"].ToString(); - string Tipo = row["Tipo"].ToString(); - - if (Tipo != ctipo) - { - if (ctipo == "P") - { - - BoundField field = new BoundField(); - field.HeaderText = "Percepciones"; - field.DataField = "SumaPercepciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - GvNominas.Columns.Insert(CurrentColumn++, field); - sumaPercepciones = true; - if (Tipo != "D") - { - field = new BoundField(); - field.HeaderText = "Deducciones"; - field.DataField = "SumaDeducciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - field = new BoundField(); - field.HeaderText = "Total"; - field.DataField = "Total"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - sumaDeducciones = true; - } - } - else if (ctipo == "D") - { - - BoundField field = new BoundField(); - if (!sumaPercepciones) - { - - field.HeaderText = "Percepciones"; - field.DataField = "SumaPercepciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - field = new BoundField(); - sumaPercepciones = true; - } - field.HeaderText = "Deducciones"; - field.DataField = "SumaDeducciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - - field = new BoundField(); - field.HeaderText = "Total"; - field.DataField = "Total"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = "TotalWhite "; - field.HeaderStyle.CssClass = "TotalWhite "; - GvNominas.Columns.Insert(CurrentColumn++, field); - sumaDeducciones = true; - } - ctipo = Tipo; - } - if (true) - { - BoundField field = new BoundField(); - field.Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) > 0); - field.HeaderText = Concepto; - field.DataField = string.Format("V_{0}", CveConcepto); - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(80); - GvNominas.Columns.Insert(CurrentColumn++, field); - } - } - - if (true) - { - - BoundField field = new BoundField(); - if (!sumaPercepciones) - { - - field.HeaderText = "Percepciones"; - field.DataField = "SumaPercepciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - field = new BoundField(); - sumaPercepciones = true; - } - if (!sumaDeducciones) - { - field.HeaderText = "Deducciones"; - field.DataField = "SumaDeducciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - - field = new BoundField(); - field.HeaderText = "Total"; - field.DataField = "Total"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - sumaDeducciones = true; - field = new BoundField(); - } - field.HeaderText = "Obligaciones"; - field.DataField = "SumaObligaciones"; - field.DataFormatString = "{0:N2}"; - field.ItemStyle.Width = Unit.Pixel(120); - field.ItemStyle.HorizontalAlign = HorizontalAlign.Right; - field.ItemStyle.BackColor = System.Drawing.Color.LightGray; - field.ItemStyle.CssClass = " "; - field.HeaderStyle.CssClass = " "; - GvNominas.Columns.Insert(CurrentColumn++, field); - } - - - } - */ - } - setGVNominas(); } else { @@ -1109,10 +805,182 @@ public partial class Nomina_Nomina2 : ClsPaginas } + + private void cargarGrid() + { + + int CurrentColumn = 2; + BoundField bf; + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P') AND EsPadre = 1 ").Rows) + { + int CveConcepto = row["CveConcepto"].ToString().ToEntero(); + int SoloVisible = row["SoloVisible"].ToString().ToEntero(); + string Concepto = row["Concepto"].ToString(); + GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + if (SoloVisible == 1) + { + + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; + } + GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0); + bf = (BoundField)GvNominas.Columns[CurrentColumn]; + bf.DataField = string.Format("V_{0}", CveConcepto); + DataRow colrow = DtNomOcultarMostrar.FiltroPrimero(string.Format("ColumnaDB= '{0}'", bf.DataField)); + if (colrow != null) + { + GvNominas.Columns[CurrentColumn].Visible = (colrow["TipoDB"].ToString() == "1"); + } + bf.HeaderText = Concepto; + if (GvNominas.Columns[CurrentColumn].Visible) + { + CurrentColumn++; + } + } + if (true) + { + BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; + + field.HeaderText = "Percepciones"; + field.DataField = "SumaPercepciones"; + field.ItemStyle.BackColor = System.Drawing.Color.LightGray; + GvNominas.Columns[CurrentColumn].Visible = true; + CurrentColumn++; + } + + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('D') AND EsPadre = 1 ").Rows) + { + int CveConcepto = row["CveConcepto"].ToString().ToEntero(); + int CveSistema = row["CveSistema"].ToString().ToEntero(); + int SoloVisible = row["SoloVisible"].ToString().ToEntero(); + string Concepto = row["Concepto"].ToString(); + GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + if (SoloVisible == 1) + { + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; + } + GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0) && CveSistema != 101; + bf = (BoundField)GvNominas.Columns[CurrentColumn]; + bf.DataField = string.Format("V_{0}", CveConcepto); + DataRow colrow = DtNomOcultarMostrar.FiltroPrimero(string.Format("ColumnaDB= '{0}'", bf.DataField)); + if (colrow != null) + { + GvNominas.Columns[CurrentColumn].Visible = (colrow["TipoDB"].ToString() == "1"); + } + bf.HeaderText = Concepto; + if (GvNominas.Columns[CurrentColumn].Visible) + { + CurrentColumn++; + } + } + + if (true) + { + BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; + field.HeaderText = "Deducciones"; + field.DataField = "SumaDeducciones"; + field.ItemStyle.BackColor = System.Drawing.Color.LightGray; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].Visible = true; + CurrentColumn++; + + field = (BoundField)GvNominas.Columns[CurrentColumn]; + field.HeaderText = "Especie"; + field.DataField = "SumaEspecie"; + field.ItemStyle.BackColor = System.Drawing.Color.LightGray; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM("SumaEspecie") != 0); + CurrentColumn++; + + + field = (BoundField)GvNominas.Columns[CurrentColumn]; + field.HeaderText = "Total"; + field.DataField = "Total"; + field.ItemStyle.BackColor = System.Drawing.Color.DarkGray; + field.ItemStyle.CssClass = "TotalWhite"; + field.HeaderStyle.CssClass = "TotalWhite"; + + GvNominas.Columns[CurrentColumn].Visible = true; + CurrentColumn++; + } + if (Chkobligaciones.Checked) + { + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('O') AND EsPadre = 1 ").Rows) + { + int CveConcepto = row["CveConcepto"].ToString().ToEntero(); + int SoloVisible = row["SoloVisible"].ToString().ToEntero(); + string Concepto = row["Concepto"].ToString(); + GvNominas.Columns[CurrentColumn].ItemStyle.BackColor = System.Drawing.Color.Transparent; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + if (SoloVisible == 1) + { + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = "isOnlyVisible "; + } + GvNominas.Columns[CurrentColumn].Visible = (dtempleados.SUM(string.Format("[V_{0}]", CveConcepto)) != 0); + bf = (BoundField)GvNominas.Columns[CurrentColumn]; + bf.DataField = string.Format("V_{0}", CveConcepto); + bf.HeaderText = Concepto; + + DataRow colrow = DtNomOcultarMostrar.FiltroPrimero(string.Format("ColumnaDB= '{0}'", bf.DataField)); + if (colrow != null) + { + GvNominas.Columns[CurrentColumn].Visible = (colrow["TipoDB"].ToString() == "1"); + } + if (GvNominas.Columns[CurrentColumn].Visible) + { + CurrentColumn++; + } + } + if (true) + { + BoundField field = (BoundField)GvNominas.Columns[CurrentColumn]; + field.HeaderText = "Obligaciones"; + field.DataField = "SumaObligaciones"; + field.ItemStyle.BackColor = System.Drawing.Color.LightGray; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].Visible = true; + CurrentColumn++; + } + + + } + for (int i = CurrentColumn; i < 102; i++) + { + bf = (BoundField)GvNominas.Columns[i]; + bf.DataField = ""; + bf.HeaderText = ""; + GvNominas.Columns[i].ItemStyle.BackColor = System.Drawing.Color.Transparent; + GvNominas.Columns[CurrentColumn].ItemStyle.CssClass = " "; + GvNominas.Columns[CurrentColumn].HeaderStyle.CssClass = " "; + GvNominas.Columns[i].Visible = false; + + } + setGVNominas(); + } private void setGVNominas() { string filtrogrupo = ""; - DataTable dt = dtempleados.Copy(); + string Orderby = "EsTotal"; + string separator = ","; + foreach (DataRow item in DtNomOrden.Rows ) + { + Orderby = string.Format("{0} {1} {2} {3}", Orderby, separator, item["ColumnaDB"], item["TipoDB"]); + separator = ","; + } + + + + DataTable dt = dtempleados.Copy().FiltraParametros("", Orderby); + + + if (DdlAgrupadorB.SelectedValue == "1") { foreach (DataRow drow in dtempleados.FiltraParametros("CvePersonal > 0", "", new string[] { "CveSubProyecto", "SubProyecto" }).Rows) @@ -1129,7 +997,7 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); - + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -1155,7 +1023,7 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); - + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -1181,7 +1049,7 @@ public partial class Nomina_Nomina2 : ClsPaginas dr["SumaPercepciones"] = dtempleados.SUM("SumaPercepciones", filtrogrupo); dr["SumaDeducciones"] = dtempleados.SUM("SumaDeducciones", filtrogrupo); dr["SumaEspecie"] = dtempleados.SUM("SumaEspecie", filtrogrupo); - + dr["Total"] = dtempleados.SUM("Total", filtrogrupo); dr["SumaObligaciones"] = dtempleados.SUM("SumaObligaciones", filtrogrupo); @@ -2654,7 +2522,7 @@ public partial class Nomina_Nomina2 : ClsPaginas { if (!dontsaveconcepto)//el usuario definira si desea actualizar o no el concepto en el periodo { - if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor,false)) + if (!objNomina.AddUPNom_NominasDetalles(objNomina.CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, Importe, ImporteGravado, ImporteExento, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor, false)) { rollback = true; } @@ -3045,7 +2913,7 @@ public partial class Nomina_Nomina2 : ClsPaginas { if (ObjPersonal.AddAsistencia(SRCvePersonal, -2, -2, TxtFechaAsistencia.Text.Trim().ToDate(), DdlTipoAsistenciasB.SelectedValue.ToEntero(), TxtPorPago.Text.Trim().ToDouble(), TxtHorasDobles.Text.Trim().ToDouble(), - TxtHorasTriples.Text.Trim().ToDouble(), DdlMotivoHoraExtra.SelectedValue.ToEntero(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa,"N")) + TxtHorasTriples.Text.Trim().ToDouble(), DdlMotivoHoraExtra.SelectedValue.ToEntero(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "N")) { Alert("La Asistencia se guardó correctamente.", TipoMensaje.MsgInformacion); continuar = true; @@ -3960,7 +3828,7 @@ public partial class Nomina_Nomina2 : ClsPaginas if (continuar) { - if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor,false)) + if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, true, chkImporte, chkImporteGravado, chkImporteValor, false)) { continuar = false; } @@ -4354,7 +4222,7 @@ public partial class Nomina_Nomina2 : ClsPaginas SubTotales.EstatusD = -2; SubTotales.ImporteD = dtPerEmpleados.SUM("SumaDeducciones", string.Format("CvePersonal = {0}", SRCvePersonal)); - + NConcepto especie = new NConcepto(); especie.CveConceptoD = 0; especie.ConceptoD = "Especie"; @@ -4370,7 +4238,7 @@ public partial class Nomina_Nomina2 : ClsPaginas if (especie.ImporteD > 0) { lconc.Add(especie); - } + } lconc.Add(Totales); GvConceptos.DataSource = lconc; GvConceptos.DataBind(); @@ -5130,7 +4998,7 @@ public partial class Nomina_Nomina2 : ClsPaginas if (newsubproyecto) { libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaEspecie", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); - } + } column++; libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); libro.Cell(Fila, column).Value = erow["Total"]; @@ -5405,7 +5273,7 @@ public partial class Nomina_Nomina2 : ClsPaginas { libro.Cell(Fila - 3, column).Value = dtempleados.SUM("SumaEspecie", string.Format("CveSubProyecto ={0} AND CvePersonal > 0 ", oldcveSupProyecto)); } - + column++; libro.Cell(Fila, column).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(166, 166, 166)); libro.Cell(Fila, column).Value = erow["Total"]; @@ -5481,14 +5349,14 @@ public partial class Nomina_Nomina2 : ClsPaginas GVVigSubEmpMensual.DataBind(); } UpModalTablas.Update(); - } + } } protected void LnkconsultartablasISR_Click(object sender, EventArgs e) { - + loadtablas(Txtejerciciotablasisr.Text.Trim().ToEntero()); } - public void loadtablas(int Ejercicio =-1) + public void loadtablas(int Ejercicio = -1) { CargaVacacionesEmpresas(); using (ClsNominas objnom = new ClsNominas()) @@ -5505,7 +5373,7 @@ public partial class Nomina_Nomina2 : ClsPaginas GVVigISRQuincenal.DataSource = objnom.DTSetResultados.Tables[9]; GVVigISRAnual.DataSource = objnom.DTSetResultados.Tables[10]; } - if (objnom.GetFistablasValues(UsuarioActual.CveEmpresa,2, TxtejerciciotablasSubsidio.Text.Trim().ToEntero()) ) + if (objnom.GetFistablasValues(UsuarioActual.CveEmpresa, 2, TxtejerciciotablasSubsidio.Text.Trim().ToEntero())) { GVVigSubEmpMensual.DataSource = objnom.DtResultados; } @@ -5589,7 +5457,7 @@ public partial class Nomina_Nomina2 : ClsPaginas DataTable dtquin = null; using (ClsNominas objnom = new ClsNominas()) { - if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa, DateTime.Now.Year ) && objnom.DTSetResultados.Tables.Count > 1) + if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa, DateTime.Now.Year) && objnom.DTSetResultados.Tables.Count > 1) { //GVFactorDesctInfonavit.DataSource = objnom.DTSetResultados.Tables[0]; //GVSalariosMinimos.DataSource = objnom.DTSetResultados.Tables[1]; @@ -5951,10 +5819,10 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", drow2["SumaDeducciones"])); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; - + } } - if(drow2["SumaEspecie"].ToString().ToDecimal()>0) + if (drow2["SumaEspecie"].ToString().ToDecimal() > 0) { rowx = new GemBox.Document.Tables.TableRow(document); tconeptos.Rows.Add(rowx); @@ -6321,10 +6189,10 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaDeducciones", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)))); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; - + } } - if(dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto))>0) + if (dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)) > 0) { rowx = new GemBox.Document.Tables.TableRow(document); @@ -6370,7 +6238,7 @@ public partial class Nomina_Nomina2 : ClsPaginas cellx = new GemBox.Document.Tables.TableCell(document); rowx.Cells.Add(cellx); cellx.CellFormat.PreferredWidth = new GemBox.Document.Tables.TableWidth(11, GemBox.Document.Tables.TableWidthUnit.Percentage); - paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)) )); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; + paragraphh = new GemBox.Document.Paragraph(document, string.Format("${0:N2}", dtempleados.SUM("SumaEspecie", string.Format("CvePersonal > 0 AND CveSubProyecto={0}", CveSubProyecto)))); cellx.Blocks.Add(paragraphh); paragraphh.ParagraphFormat.Alignment = GemBox.Document.HorizontalAlignment.Right; paragraphh.ParagraphFormat.Style = styilostrong; //SumaEspecie } @@ -7487,7 +7355,7 @@ public partial class Nomina_Nomina2 : ClsPaginas if (continuar) { - if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, false, chkImporte, chkImporteGravado, chkImporteValor,true)) + if (!objNomina.AddUPNom_NominasDetalles(CveNomina, CvePeriodoSeleccionado, CvePersonal, CveConcepto, ImporteConcepto, ImporteGravadoConcepto, ImporteExentoConcepto, ImporteValor, UsuarioActual.CveUsuario, false, chkImporte, chkImporteGravado, chkImporteValor, true)) { continuar = false; } @@ -7584,6 +7452,11 @@ public partial class Nomina_Nomina2 : ClsPaginas } } + RegistraScript(string.Format("$('#DModalCargaASistenciaMasiva').modal('hide');")); + if (chhkCargarSistenciaMasiva.Checked) + { + cargaDatos(true); + } } @@ -8064,7 +7937,7 @@ public partial class Nomina_Nomina2 : ClsPaginas SubTotales.ConceptoD = "Total Deducciones"; SubTotales.EstatusD = -2; SubTotales.ImporteD = dtempleadosSimula.SUM("SumaDeducciones", string.Format("CvePersonal = {0}", SRCvePersonal)); - + NConcepto especie = new NConcepto(); especie.CveConceptoD = 0; especie.ConceptoD = "Especie"; @@ -9202,10 +9075,10 @@ public partial class Nomina_Nomina2 : ClsPaginas protected void LnkGuardarConceptosProvision_Click(object sender, EventArgs e) { - bool continuar = true; + bool continuar = true; using (ClsContabilidad ObjConta = new ClsContabilidad()) - { - int CveClasificacion = -1; + { + int CveClasificacion = -1; ObjConta.IniciaTransacSQL(); foreach (GridViewRow gvrow in GVProvision.Rows) { @@ -9214,11 +9087,11 @@ public partial class Nomina_Nomina2 : ClsPaginas { int CvePersonal = gvrow.DataKey("CvePersonal").ToEntero(); int CveconceptosContables = gvrow.FCDropDownList("DdlCconceptosContables").SelectedValue.ToEntero(); - int CveCuenta = gvrow.FCDropDownList("Ddlcuentassd").SelectedValue.ToEntero(); + int CveCuenta = gvrow.FCDropDownList("Ddlcuentassd").SelectedValue.ToEntero(); if (CveconceptosContables > 0 && CveCuenta > 0) { - if (!ObjConta.AddCuentasAsignaciones(CveconceptosContables, UsuarioActual.CveEmpresa, CveCuenta, - CvePersonal: CvePersonal, CveClasificacion: CveClasificacion, CveConceptoNomina: CveConceptoNomina)) + if (!ObjConta.AddCuentasAsignaciones(CveconceptosContables, UsuarioActual.CveEmpresa, CveCuenta, + CvePersonal: CvePersonal, CveClasificacion: CveClasificacion, CveConceptoNomina: CveConceptoNomina)) { continuar = false; } } else { continuar = false; } @@ -9878,7 +9751,7 @@ public partial class Nomina_Nomina2 : ClsPaginas } protected void CargaVacacionesEmpresas() { - int ejercicio = TxtEjercicioFiltroVacaciones.Text.Trim() == "" ? -1: TxtEjercicioFiltroVacaciones.Text.Trim().ToEntero(); + int ejercicio = TxtEjercicioFiltroVacaciones.Text.Trim() == "" ? -1 : TxtEjercicioFiltroVacaciones.Text.Trim().ToEntero(); using (ClsRH ObjVaca = new ClsRH()) { ObjVaca.VacacionesEmpresasGet(UsuarioActual.CveEmpresa, -1, -1, ejercicio); @@ -11119,9 +10992,314 @@ public partial class Nomina_Nomina2 : ClsPaginas if (onom.CargaPeriodosEjercicio(ejercicio, cveTipoPeriodo, cveSubTipoPeriodo, numero, fechaInicio, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario)) { Alert("Se cargo satisfactoriamente."); + + RegistraScript(string.Format("$('#divCargaMasiva').modal('hide');")); + if (ChkCargaMasivaRecalcularNomina.Checked) + { + cargaDatos(true); + + } + // } } } + //cargarGrid + + private DataTable GetTablaColumnas() + { + DataTable dtColumnas = new DataTable(); + + dtColumnas.Columns.Add("Columna"); + dtColumnas.Columns.Add("ColumnaDB"); + //Campos Fijos + { + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Clave Personal"; + dtcampos["ColumnaDB"] = "CvePersonal"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Código"; + dtcampos["ColumnaDB"] = "Codigo"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Nombre"; + dtcampos["ColumnaDB"] = "Nombre"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Clave SubProyecto"; + dtcampos["ColumnaDB"] = "CveSubProyecto"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "SubProyecto"; + dtcampos["ColumnaDB"] = "SubProyecto"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Deducciones"; + dtcampos["ColumnaDB"] = "SumaDeducciones"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Especie"; + dtcampos["ColumnaDB"] = "SumaEspecie"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Percepciones"; + dtcampos["ColumnaDB"] = "SumaPercepciones"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Fecha Ingreso"; + dtcampos["ColumnaDB"] = "FechaIngreso"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Salario Diario Integrado"; + dtcampos["ColumnaDB"] = "SalarioDiarioIntegrado"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Salario Diario IMSS"; + dtcampos["ColumnaDB"] = "SalarioDiarioIMSS"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Salario Diario"; + dtcampos["ColumnaDB"] = "SalarioDiario"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Clave Departamento"; + dtcampos["ColumnaDB"] = "CveDepartamento"; + dtColumnas.Rows.Add(dtcampos); + } + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = "Departamento"; + dtcampos["ColumnaDB"] = "Departamento"; + dtColumnas.Rows.Add(dtcampos); + } + } + //Conceptos + if (dtConceptos != null && dtConceptos.Rows.Count > 0) + { + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("P - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('D') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("D - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('O') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("O - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + } + + return dtColumnas; + } + + protected void LnkMostrarOrdenadores_Click(object sender, EventArgs e) + { + GvOrdenEmpleados.DataSource = DtNomOrden; + GvOrdenEmpleados.DataBind(); + DataTable dtColumnas = GetTablaColumnas(); + DdlOrdenColumna.DataSource = dtColumnas; + DdlOrdenColumna.DataBind(); + upModalOrdenEmpleados.Update(); + RegistraScript(string.Format("$('#divdOrdenempleados').modal();")); + } + protected void LnkAgregarOrden_Click(object sender, EventArgs e) + { + + { + DataRow drorden = DtNomOrden.NewRow(); + drorden["Columna"] = DdlOrdenColumna.SelectedItem.Text; + drorden["Tipo"] = DDlOrdenTipo.SelectedItem.Text; + drorden["ColumnaDB"] = DdlOrdenColumna.SelectedItem.Value; + drorden["TipoDB"] = DDlOrdenTipo.SelectedItem.Value; + DtNomOrden.Rows.Add(drorden); + } + GvOrdenEmpleados.DataSource = DtNomOrden; + GvOrdenEmpleados.DataBind(); + upModalOrdenEmpleados.Update(); + } + //divdOrdenempleados + protected void LnkEliminarOrden_Click(object sender, EventArgs e) + { + GridViewRow gvRow = (GridViewRow)((LinkButton)sender).NamingContainer; + string ColumnaDB = gvRow.DataKey("ColumnaDB"); + string TipoDB = gvRow.DataKey("TipoDB"); + DataRow dr = null; + foreach (DataRow item in DtNomOrden.Rows) + { + if (item["ColumnaDB"].ToString() == ColumnaDB && item["TipoDB"].ToString() == TipoDB) + { + dr = item; + } + } + if (dr != null) + { + dr.Delete(); + DtNomOrden.AcceptChanges(); + } + GvOrdenEmpleados.DataSource = DtNomOrden; + GvOrdenEmpleados.DataBind(); + upModalOrdenEmpleados.Update(); + } + + protected void LnkReordenaGridEmpleados_Click(object sender, EventArgs e) + { + + RegistraScript(string.Format("$('#divdOrdenempleados').modal('hide');")); + setGVNominas(); + UpDatos.Update(); + } + + private DataTable GetTablaColumnasConceptos() + { + DataTable dtColumnas = new DataTable(); + + dtColumnas.Columns.Add("Columna"); + dtColumnas.Columns.Add("ColumnaDB"); + //Campos Fijos + //{ + // { + // DataRow dtcampos = dtColumnas.NewRow(); + // dtcampos["Columna"] = "Percepciones"; + // dtcampos["ColumnaDB"] = "SumaPercepciones"; + // dtColumnas.Rows.Add(dtcampos); + // } + // { + // DataRow dtcampos = dtColumnas.NewRow(); + // dtcampos["Columna"] = "Deducciones"; + // dtcampos["ColumnaDB"] = "SumaDeducciones"; + // dtColumnas.Rows.Add(dtcampos); + // } + // { + // DataRow dtcampos = dtColumnas.NewRow(); + // dtcampos["Columna"] = "Especie"; + // dtcampos["ColumnaDB"] = "SumaEspecie"; + // dtColumnas.Rows.Add(dtcampos); + // } + //} + //Conceptos + if (dtConceptos != null && dtConceptos.Rows.Count > 0) + { + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('P') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("P - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('D') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("D - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + foreach (DataRow row in dtConceptos.FiltraParametros("Tipo IN ('O') AND EsPadre = 1 ").Rows) + { + DataRow dtcampos = dtColumnas.NewRow(); + dtcampos["Columna"] = string.Format("O - {0} {1}", row["Codigo"], row["Concepto"]); + dtcampos["ColumnaDB"] = string.Format("V_{0}", row["CveConcepto"]); + dtColumnas.Rows.Add(dtcampos); + } + } + + return dtColumnas; + } + protected void LnkMostrarOcultarMostrar_Click(object sender, EventArgs e) + { + + GvOrdenEmpleados.DataSource = DtNomOcultarMostrar; + GvOrdenEmpleados.DataBind(); + DataTable dtColumnas = GetTablaColumnasConceptos(); + DdlMOColumna.DataSource = dtColumnas; + DdlMOColumna.DataBind(); + UpMostrarOcultarConceptos.Update(); + RegistraScript(string.Format("$('#divdMostrarOcultarConceptos').modal();")); + // + } + + + protected void LnkMoAgregar_Click(object sender, EventArgs e) + { + + { + DataRow drorden = DtNomOcultarMostrar.NewRow(); + drorden["Columna"] = DdlMOColumna.SelectedItem.Text; + drorden["Tipo"] = DdlMOTipo.SelectedItem.Text; + drorden["ColumnaDB"] = DdlMOColumna.SelectedItem.Value; + drorden["TipoDB"] = DdlMOTipo.SelectedItem.Value; + DtNomOcultarMostrar.Rows.Add(drorden); + } + GVShowHideCol.DataSource = DtNomOcultarMostrar; + GVShowHideCol.DataBind(); + UpMostrarOcultarConceptos.Update(); + } + + protected void LnkEliminarShowHide_Click(object sender, EventArgs e) + { + GridViewRow gvRow = (GridViewRow)((LinkButton)sender).NamingContainer; + string ColumnaDB = gvRow.DataKey("ColumnaDB"); + string TipoDB = gvRow.DataKey("TipoDB"); + DataRow dr = null; + foreach (DataRow item in DtNomOcultarMostrar.Rows) + { + if (item["ColumnaDB"].ToString() == ColumnaDB && item["TipoDB"].ToString() == TipoDB) + { + dr = item; + } + } + if (dr != null) + { + dr.Delete(); + DtNomOcultarMostrar.AcceptChanges(); + } + GVShowHideCol.DataSource = DtNomOcultarMostrar; + GVShowHideCol.DataBind(); + UpMostrarOcultarConceptos.Update(); + + } + + protected void LnkReShowHide_Click(object sender, EventArgs e) + { + + RegistraScript(string.Format("$('#divdMostrarOcultarConceptos').modal('hide');")); + cargarGrid(); + UpDatos.Update(); + } } \ No newline at end of file From f4a5119a60f3d2b4f0431502810b625c5307aafe Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 10 Apr 2024 08:53:04 -0700 Subject: [PATCH 5/8] - mejora --- Bancos/RepCortes.aspx | 4 ++-- Bancos/RepCortes.aspx.vb | 7 +++++++ 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/Bancos/RepCortes.aspx b/Bancos/RepCortes.aspx index c173f0204..445b67a16 100644 --- a/Bancos/RepCortes.aspx +++ b/Bancos/RepCortes.aspx @@ -385,7 +385,7 @@

    - Depositos Caja + Depósitos Caja
    @@ -406,7 +406,7 @@

    - Anexo + Contabilidad
    diff --git a/Bancos/RepCortes.aspx.vb b/Bancos/RepCortes.aspx.vb index 399bfd788..472b87af2 100644 --- a/Bancos/RepCortes.aspx.vb +++ b/Bancos/RepCortes.aspx.vb @@ -227,6 +227,13 @@ Partial Class Bancos_RepCortes UpAcciones.Update() End Sub + Private Sub GvDep_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDep.RowDataBound + If e.Row.RowType = DataControlRowType.DataRow Then + e.Row.FCHyperLink("HplImpPol").NavigateUrl = $"/Compras/PopUpVerFactura.aspx?P={Encripta($"OP=PREPO&CvePrePoliza={ e.Row.DBCampo("CvePrePoliza")}")}" + End If + + End Sub + #End Region From a3f7ad70cd063bd55c4a21b86a016f65200fec3c Mon Sep 17 00:00:00 2001 From: rakcsle Date: Wed, 10 Apr 2024 09:26:09 -0700 Subject: [PATCH 6/8] GDiaz - Compras Prontos Pagos --- App_Code/ClsPaginas.vb | 16 ++++ Bancos/PopIECompras.aspx | 2 +- Bancos/PopIECompras.aspx.vb | 14 +-- Bancos/ProveedoresAbonar.aspx | 6 ++ Bancos/ProveedoresAbonar.aspx.vb | 89 +++++++++++++++++-- Compras/Compras.aspx.vb | 38 +++++--- Inventarios/Kardex.aspx | 17 +++- Inventarios/Kardex.aspx.vb | 146 ++++++++++++++++++++++++++++++- 8 files changed, 293 insertions(+), 35 deletions(-) diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index 3fc7edff6..f6868d9ec 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -9010,6 +9010,22 @@ Public Class ClsPaginas If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, ConPrepAplicacion.CveConcepto, Pago.Referencia, Concepto, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True End If End If + + If Pago.TipoPago.Contiene("RNC") AndAlso Not ErrorMovtos Then ' R E M I S I Ó N D E N O T A D E C R E D I T O + '371 + Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(15, Pago.CveMonedaPago, True, CompraActual.CveTipoConceptoProveedor) + + If Pago.CveMonedaPago > 1 Then + 'Agregamos la Extranjera + If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, 371, Pago.Referencia, Concepto, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, ImporteME:=Pago.ImportePago, TipoCambio:=TCValuacionPago, CveSubProyecto:=CompraActual.CveSubProyecto) Then ErrorMovtos = True + ImporteMN = (Pago.ImportePago * TCValuacionPago - Pago.ImportePago).RoundSQL + If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, ImporteMN, ConPrepAplicacion.CveConceptoComplementario, Pago.Referencia, Concepto, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, ImporteME:=Pago.ImportePago, TipoCambio:=TCValuacionPago, CveSubProyecto:=CompraActual.CveSubProyecto) Then ErrorMovtos = True + Else + 'Agregamos Nacional + If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, 371, Pago.Referencia, Concepto, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True + End If + End If + If Pago.TipoPago = "DD" AndAlso Not ErrorMovtos Then ' D E U D O R D I V E R S O Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(17, Pago.CveMonedaPago, True, CompraActual.CveTipoConceptoProveedor) If Pago.CveMonedaPago > 1 Then diff --git a/Bancos/PopIECompras.aspx b/Bancos/PopIECompras.aspx index 9b31ac375..94086dd01 100644 --- a/Bancos/PopIECompras.aspx +++ b/Bancos/PopIECompras.aspx @@ -524,7 +524,7 @@
    - +
    diff --git a/Bancos/PopIECompras.aspx.vb b/Bancos/PopIECompras.aspx.vb index 43e4d2d87..0ecfd9ef6 100644 --- a/Bancos/PopIECompras.aspx.vb +++ b/Bancos/PopIECompras.aspx.vb @@ -1679,13 +1679,6 @@ Partial Class Bancos_PopIECompras UpGuardar.Update() End Sub - Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init - RVTxtFechaDocumento.MaximumValue = NowADS().ToShortDateString - Calendario.EndDate = NowADS() - - End Sub - - Protected Sub CVTxtImporte_ServerValidate(source As Object, args As ServerValidateEventArgs) @@ -1721,15 +1714,22 @@ Partial Class Bancos_PopIECompras End Sub + Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString + Calendario.EndDate = NowADS().AddDays(2) + + End Sub Private Sub ValidaFechaDocumentoDiasPosteriores() RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString Calendario.EndDate = NowADS().AddDays(2) + RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior a 6 meses de la fecha actual" If DdlTipoTransaccion.SelectedValue.ToEntero.Contiene(1, 16) Then RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(30).ToShortDateString + RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior a 6 meses de la fecha actual" Calendario.EndDate = NowADS().AddDays(30) End If diff --git a/Bancos/ProveedoresAbonar.aspx b/Bancos/ProveedoresAbonar.aspx index cdadcb7d9..1b1028021 100644 --- a/Bancos/ProveedoresAbonar.aspx +++ b/Bancos/ProveedoresAbonar.aspx @@ -338,7 +338,13 @@ + + + + + + diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb index 8e8952fee..f4c14812e 100644 --- a/Bancos/ProveedoresAbonar.aspx.vb +++ b/Bancos/ProveedoresAbonar.aspx.vb @@ -317,6 +317,9 @@ Partial Class Bancos_ProveedoresAbonar chkaplicaDescuento.Visible = True End If + + tmpValida() + End If End Sub @@ -1607,10 +1610,10 @@ Partial Class Bancos_ProveedoresAbonar #End Region Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init - RVTxtFechaDocumento.MaximumValue = NowADS().ToShortDateString + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString RVTxtFechaDocumentoMenor.MinimumValue = NowADS().AddMonths(-38).ToShortDateString - RVTxtFechaDocumentoMenor.MaximumValue = NowADS().ToShortDateString - Calendario.EndDate = NowADS() + RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(2).ToShortDateString + Calendario.EndDate = NowADS().AddDays(2) End Sub @@ -1620,17 +1623,17 @@ Partial Class Bancos_ProveedoresAbonar RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(2).ToShortDateString - RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior 2 días de la fecha actual" + RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior a 6 meses de la fecha actual" Calendario.EndDate = NowADS().AddDays(2) If DdlTipoTransaccion.SelectedValue.ToEntero.Contiene(1, 16) Then - RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(30).ToShortDateString - RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(30).ToShortDateString - RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior 30 días de la fecha actual" + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(182).ToShortDateString + RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(182).ToShortDateString + RVTxtFechaDocumento.ErrorMessage = "ERROR:
    La fecha del documento no puede ser superior a 6 meses de la fecha actual" - Calendario.EndDate = NowADS().AddDays(30) + Calendario.EndDate = NowADS().AddDays(182) End If UpDatos.Update() @@ -1645,5 +1648,75 @@ Partial Class Bancos_ProveedoresAbonar UPCompras.Update() End Sub + + + + Private Sub tmpValida() + + Dim ValidaSAT As Boolean = True + Dim ImporteSeleccionado As Decimal = 0 + 'If UsuarioActual.Empresa.Funcionalidad(529) = "1" OrElse ChkNoValidaSAT.Checked Then ValidaSAT = False + + If ValidaSAT Then + Dim Validada As Boolean = False + Dim MsgValidadas As New StringBuilder + Dim Valida As New ClsValidaCFDi() + 'verifico ante el SAT las compras que voy a pagar + For Each gvr As GridViewRow In GvCxP.Rows + If gvr.FCCheckBox("Chk").Checked Then + + ImporteSeleccionado += gvr.FCTextBox("TxtAbonar").Text.ToDecimal + If gvr.DataKey("UUID") <> "" Then + + Valida.Verificar(gvr.DataKey("UUID"), gvr.DataKey("RFC"), UsuarioActual.Empresa.RFC, gvr.DataKey("TotalOriginal").ToDecimal) + + If Not UsuarioActual.Empresa.FacturaProduccion OrElse UsuarioActual.CveEmpresa < 2 Then + Valida.EsValida = 1 + End If + + If Valida.EsValida <> 1 Then + + Validada = False + If Valida.EsValida = 2 Then 'Cancelada + 'estatus inventario, no surtida + If gvr.DataKey("EstatusInventario") = "1" Then + MsgValidadas.AppendFormat("Factura Cancelada: {0} - {1} , relacione su factura nueva para descontar saldo
    ", gvr.DataKey("SerieFolio"), gvr.DataKey("Descripcion")) + Else + MsgValidadas.AppendFormat("Factura Cancelada: {0} - {1} con movimientos de almacen, relacione su factura nueva para descontar saldo
    ", gvr.DataKey("SerieFolio"), gvr.DataKey("Descripcion")) + End If + Else + MsgValidadas.AppendFormat("Factura No se pudo Validar: {0} - {1}
    ", gvr.DataKey("SerieFolio"), gvr.DataKey("Descripcion")) + End If + End If + End If + End If + Next + + Valida.Dispose() + + 'verificacion doble, si no la han cancelado, ya tiene una validaci[on para que llegue aqui + + If MsgValidadas.Length > 0 Then + Alert(String.Format("
    Las Facturas presentan la siguiente situación ante el SAT.
    {0}", MsgValidadas.ToString), TipoMensaje.MsgAdvertencia) + Exit Sub + End If + Else + For Each gvr As GridViewRow In GvCxP.Rows + If gvr.FCCheckBox("Chk").Checked Then + ImporteSeleccionado += gvr.FCTextBox("TxtAbonar").Text.ToDecimal + End If + Next + End If + + If ImporteSeleccionado <= 0 Then + Alert("Seleccione facturas", TipoMensaje.MsgAdvertencia) + Exit Sub + End If + End Sub + + + Protected Sub Button1_Click(sender As Object, e As EventArgs) + tmpValida() + End Sub End Class diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index aeb94a329..10ff8bcbb 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -1511,6 +1511,11 @@ Partial Class Compras_Compras ElseIf Request("CveCompra") IsNot Nothing AndAlso IsNumeric(Request("CveCompra")) AndAlso Request("CveCompra").ToEntero > 0 Then + If UsuarioActual.Empresa.Funcionalidad(574).ToEntero = 1 Then + DdlTipoComprobante.Items.Clear() + DdlTipoComprobante.Items.Add(New ListItem("Remisión de Nota de Crédito", "RNC")) + End If + ViewState("CveCompra") = Request("CveCompra") CargaCompra() BtnGuardar.Enabled = False @@ -3235,6 +3240,13 @@ Partial Class Compras_Compras BtnRegenerarPrePolizaAlmacen_Click(Nothing, Nothing) End If + If DdlTipoComprobante.SelectedValue = "RNC" And CompraSaldo <> TxtTotal.Text.ToDecimal Then + BtnCancelarCompra.Visible = False + BtnEliminarCompra.Visible = False + End If + + + Else Alert("La compra solicitada no se encontró. Por favor rectifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia) End If @@ -7012,7 +7024,7 @@ Partial Class Compras_Compras Pago.Referencia = CompraActual.SerieFolio Pago.TCPago = CompraActual.TC Pago.AplicaAcreditable = False - Pago.TipoPago = "NC" + Pago.TipoPago = "RNC" Pago.Fecha = CompraActual.Fecha 'toma la misma fecha de la provisión en el pago de NC Dim CompraPago As New Compra @@ -7029,19 +7041,19 @@ Partial Class Compras_Compras ErrorPrepoliza = AplicaPrePolizaPagoCompra(CompraPago, Pago, CvePrePoliza, ObjConta) - If Not ErrorPrepoliza Then - If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteRNCSaldar, ImporteRNCSaldar, 371, Referencia, Concepto, CveCompra:=DdlRemisionNotaCredito.SelectedValue.ToEntero, CveProveedor:=Me.CveProveedor, ImporteME:=If(TipoCambio = 1, 0, ImporteRNCSaldar), TipoCambio:=TipoCambio, - CveClasificacion:=-1, CveSubProyecto:=CompraActual.CveSubProyecto, Contabilizable:=True) Then - ErrorPrepoliza = True - End If + 'If Not ErrorPrepoliza Then + ' If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteRNCSaldar, ImporteRNCSaldar, 371, Referencia, Concepto, CveCompra:=DdlRemisionNotaCredito.SelectedValue.ToEntero, CveProveedor:=Me.CveProveedor, ImporteME:=If(TipoCambio = 1, 0, ImporteRNCSaldar), TipoCambio:=TipoCambio, + ' CveClasificacion:=-1, CveSubProyecto:=CompraActual.CveSubProyecto, Contabilizable:=True) Then + ' ErrorPrepoliza = True + ' End If - If Not ErrorPrepoliza Then - If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteRNCSaldar, ImporteRNCSaldar, 372, Referencia, Concepto, CveCompra:=DdlRemisionNotaCredito.SelectedValue.ToEntero, CveProveedor:=Me.CveProveedor, ImporteME:=If(TipoCambio = 1, 0, ImporteRNCSaldar), TipoCambio:=TipoCambio, - CveClasificacion:=-1, CveSubProyecto:=CompraActual.CveSubProyecto, Contabilizable:=True) Then - ErrorPrepoliza = True - End If - End If - End If + ' If Not ErrorPrepoliza Then + ' If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteRNCSaldar, ImporteRNCSaldar, 372, Referencia, Concepto, CveCompra:=DdlRemisionNotaCredito.SelectedValue.ToEntero, CveProveedor:=Me.CveProveedor, ImporteME:=If(TipoCambio = 1, 0, ImporteRNCSaldar), TipoCambio:=TipoCambio, + ' CveClasificacion:=-1, CveSubProyecto:=CompraActual.CveSubProyecto, Contabilizable:=True) Then + ' ErrorPrepoliza = True + ' End If + ' End If + 'End If End If diff --git a/Inventarios/Kardex.aspx b/Inventarios/Kardex.aspx index 35f2e4e57..7fb29e832 100644 --- a/Inventarios/Kardex.aspx +++ b/Inventarios/Kardex.aspx @@ -172,9 +172,9 @@
    <%----%> - - +
    +
    @@ -192,6 +192,7 @@
    +
    @@ -254,6 +255,18 @@
    + +
    +
    +
    + < +
    +
    + > +
    +
    +
    +
    diff --git a/Inventarios/Kardex.aspx.vb b/Inventarios/Kardex.aspx.vb index 514f2022a..e12f8af7a 100644 --- a/Inventarios/Kardex.aspx.vb +++ b/Inventarios/Kardex.aspx.vb @@ -25,10 +25,60 @@ Partial Class Inventarios_Kardex ViewState("CveMovimiento") = Value End Set End Property + + + Private Property IndiceNavegacionActual As Integer + Get + + If ViewState("IndiceNavegacionActual") Is Nothing Then + ViewState("IndiceNavegacionActual") = 0 + End If + Return ViewState("IndiceNavegacionActual").ToString.ToEntero + End Get + Set + ViewState("IndiceNavegacionActual") = Value + End Set + End Property + + Private Property DTPSNavegacion As DataTable + Get + If ViewState("DTPSNavegacion") Is Nothing Then + ViewState("DTPSNavegacion") = New DataTable + End If + + Return DirectCast(ViewState("DTPSNavegacion"), DataTable) + + End Get + Set(value As DataTable) + ViewState("DTPSNavegacion") = value + End Set + End Property + + Private Property NavegacionTieneDatos As Boolean + Get + + If ViewState("NavegacionTieneDatos") Is Nothing Then + ViewState("NavegacionTieneDatos") = False + End If + Return Boolean.Parse(ViewState("NavegacionTieneDatos").ToString) + End Get + Set(value As Boolean) + ViewState("NavegacionTieneDatos") = value + End Set + End Property + + + #End Region Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load If Not IsPostBack Then + + If UsuarioActual.CveRol = 1 Then + CreaDTPSNavegacion() + DVNavegar.Visible = True + End If + TxtFechaI.Text = NowADS().AddMonths(-1).ToShortDateString TxtFechaF.Text = NowADS().ToShortDateString CargaCombos() @@ -200,7 +250,7 @@ Partial Class Inventarios_Kardex #Region " CARGA DATOS " Protected Sub btConsultar_Click(sender As Object, e As EventArgs) Handles btConsultar.Click - CargaDatos() + CargaDatos(True) Dim almacenes As String = ddlAlmacen.GetSelectedValues() If almacenes = "" Then almacenes = "-1" @@ -208,12 +258,25 @@ Partial Class Inventarios_Kardex ImprimirQR.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=Etiqueta2&CvePS={0}&PS={1}&CveAlmacen={2}&Modalidad={3}", ddlProducto2.SelectedValue.ToEntero, ddlProducto2.SelectedText.ToString, almacenes, "Individual"))) End Sub - Private Sub CargaDatos() + Private Sub CargaDatos(Optional validaInidiceActual As Boolean = False) + + NavegacionTieneDatos = False Dim CveProducto As Integer = ddlProducto2.SelectedValue.ToEntero + If validaInidiceActual Then + EstablecerIndiceActaual(CveProducto) + End If + + If CveProducto > 0 Then Dim DtTemp = CargarKardex(CveProducto) + + If DtTemp IsNot Nothing AndAlso DtTemp.Rows.Count > 1 Then + NavegacionTieneDatos = True + End If + If DtTemp IsNot Nothing AndAlso DtTemp.Rows.Count > 0 Then + Dim AplicaSeccion, AplicaLote, AplicaCaducidad, AplicaSerie As Boolean AplicaSerie = DtTemp.MAX("Serie") <> "" AplicaSeccion = DtTemp.MAX("SeccionAlmacen") <> "" @@ -370,8 +433,8 @@ Partial Class Inventarios_Kardex Dim ObjInventarios As New ClsInventarios If ObjInventarios.GetExistenciasCaducidad(ddlProducto2.SelectedValue.ToEntero(), -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, almacenes) Then GvProductoCaducidad.DataSource = ObjInventarios.DtResultados - GvProductoCaducidad.columns(2).visible = ObjInventarios.DtResultados.max("Serie") <> "" - GvProductoCaducidad.columns(3).visible = ObjInventarios.DtResultados.max("Lote") <> "" + GvProductoCaducidad.Columns(2).Visible = ObjInventarios.DtResultados.MAX("Serie") <> "" + GvProductoCaducidad.Columns(3).Visible = ObjInventarios.DtResultados.MAX("Lote") <> "" GvProductoCaducidad.Columns(4).Visible = ObjInventarios.DtResultados.MAX("FechaCaducidad").ToDate > MinFecha If Not String.IsNullOrWhiteSpace(UsuarioActual.Empresa.Funcionalidad(147)) Then GvProductoCaducidad.Columns(4).HeaderText = UsuarioActual.Empresa.Funcionalidad(147) @@ -535,6 +598,81 @@ Partial Class Inventarios_Kardex End Sub #End Region + Private Sub EstablecerIndiceActaual(CveProducto As Integer) + + IndiceNavegacionActual = 0 + For Each drow As DataRow In DTPSNavegacion.Rows + If drow("CvePS").ToString.ToEntero = CveProducto Then + Exit Sub + End If + IndiceNavegacionActual = IndiceNavegacionActual + 1 + Next + + End Sub + + Private Sub CreaDTPSNavegacion() + DTPSNavegacion = GlobalDTPS(UsuarioActual.CveEmpresa).FiltraParametros("", "Codigo", {"CvePS", "CodigoPS", "Codigo"}) + End Sub + + Protected Sub LnkPSAntyerior_Click(sender As Object, e As EventArgs) + + NavegacionTieneDatos = False + + For x As Integer = IndiceNavegacionActual - 1 To 0 Step -1 + If x <= 0 Or NavegacionTieneDatos Then + IndiceNavegacionActual = x + UPFiltros.Update() + End If + + ddlProducto2.SelectedValue = DTPSNavegacion.Rows(x)("CvePS").ToString + ddlProducto2.SelectedText = DTPSNavegacion.Rows(x)("CodigoPS").ToString + ddlProducto2.txtValue.Value = DTPSNavegacion.Rows(x)("CvePS").ToString + ddlProducto2.txtText.Value = DTPSNavegacion.Rows(x)("CodigoPS").ToString + CargaDatos() + + If x <= 0 Or NavegacionTieneDatos Then + IndiceNavegacionActual = x + UPFiltros.Update() + UPDatos.Update() + Exit Sub + + End If + + + Next + + End Sub + + Protected Sub LnkPSSiguiente_Click(sender As Object, e As EventArgs) + + NavegacionTieneDatos = False + + For x As Integer = IndiceNavegacionActual + 1 To DTPSNavegacion.Rows.Count - 1 Step 1 + + + If x >= DTPSNavegacion.Rows.Count - 1 Or NavegacionTieneDatos Then + IndiceNavegacionActual = x + UPFiltros.Update() + End If + + ddlProducto2.SelectedValue = DTPSNavegacion.Rows(x)("CvePS").ToString + ddlProducto2.SelectedText = DTPSNavegacion.Rows(x)("CodigoPS").ToString + ddlProducto2.txtValue.Value = DTPSNavegacion.Rows(x)("CvePS").ToString + ddlProducto2.txtText.Value = DTPSNavegacion.Rows(x)("CodigoPS").ToString + CargaDatos() + + If x >= DTPSNavegacion.Rows.Count - 1 Or NavegacionTieneDatos Then + IndiceNavegacionActual = x + UPFiltros.Update() + UPDatos.Update() + Exit Sub + + End If + + + Next + + End Sub End Class From c1d75cc8f115c235b3b2cbc5f2ba1965339602f3 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Wed, 10 Apr 2024 11:03:12 -0700 Subject: [PATCH 7/8] =?UTF-8?q?Agregar=20logo=20a=20formato=20de=20p=C3=B3?= =?UTF-8?q?lizas?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Compras/PopUpVerFactura.aspx.vb | 5 +++++ Empresas/13/Formatos/CartaPorteTimbrado.rdlc | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 5810f81d3..119fcbcb2 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -6309,6 +6309,11 @@ Partial Class PopUpVerFactura params.Add(New ReportParameter("Numero", FolioPoliza)) params.Add(New ReportParameter("Moneda", If(CveMonedaImp = 2, "Dolar", "Peso Mexicano"))) params.Add(New ReportParameter("CodigoPostal", "")) + + If RutaReporte.Contains("Grales\Formatos\") Then + params.Add(New ReportParameter("LogoPath", RutaImagenLogo)) + End If + If UsuarioActual.CveEmpresa.Contiene(141) Then params.Add(New ReportParameter("Fecha", Fecha.ToString("dd/MM/yyyy hh:mm:ss"))) Else diff --git a/Empresas/13/Formatos/CartaPorteTimbrado.rdlc b/Empresas/13/Formatos/CartaPorteTimbrado.rdlc index c0af07228..cf3392514 100644 --- a/Empresas/13/Formatos/CartaPorteTimbrado.rdlc +++ b/Empresas/13/Formatos/CartaPorteTimbrado.rdlc @@ -4119,7 +4119,7 @@ - Carta Porte 2.0 + Carta Porte 3.0