From 3715693e6f4021f15b57378cff30d9d8fd6a8f12 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Thu, 18 May 2023 11:19:17 -0700 Subject: [PATCH] --- RH/CalculoSBC.aspx | 3 ++- RH/CalculoSBC.aspx.cs | 12 ++++++++++++ RH/Personal.aspx.vb | 33 ++++++++++++++------------------- 3 files changed, 28 insertions(+), 20 deletions(-) diff --git a/RH/CalculoSBC.aspx b/RH/CalculoSBC.aspx index af9b49c14..fca73faf9 100644 --- a/RH/CalculoSBC.aspx +++ b/RH/CalculoSBC.aspx @@ -455,7 +455,8 @@ - + diff --git a/RH/CalculoSBC.aspx.cs b/RH/CalculoSBC.aspx.cs index edd3a2586..7fbdf7cf9 100644 --- a/RH/CalculoSBC.aspx.cs +++ b/RH/CalculoSBC.aspx.cs @@ -920,6 +920,18 @@ public partial class RH_CalculoSBC : ClsPaginas RegistraScript("$('#ModalDoctos').modal();"); } + + protected void GVDetalleParteVariable_RowDataBound(object sender, GridViewRowEventArgs e) + { + if(e.Row.RowType == DataControlRowType.DataRow) + { + for (int i = 0; i < e.Row.Cells.Count; i++) + { + e.Row.Cells[i].Text = Server.HtmlDecode(e.Row.Cells[i].Text); + } + } + + } } public class archivosD { diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb index 02efbc40f..f41f7417a 100644 --- a/RH/Personal.aspx.vb +++ b/RH/Personal.aspx.vb @@ -7486,25 +7486,20 @@ Partial Class RH_Personal End If End If - If continuar Then - - Using onom As ClsNominas = New ClsNominas() - onom.ValidaFechaFinPersonal(CvePersonal, UsuarioActual.CveEmpresa, fecha.ToString("yyyy/MM/dd")) - - If onom.DtResultados.Rows.Count > 0 Then - - continuar = False - Dim strbuild As StringBuilder = New StringBuilder() - strbuild.Append("No es posible desactivar con esta fecha ya que existen asistencias posteriores a la fecha fin con nominas autorizadas, es necesario desautorizar la siguientes nominas para reintentar el proceso.") - - For Each drow As DataRow In onom.DtResultados.Rows - strbuild.AppendFormat("
{0}", drow("PeriodoTexto")) - Next - Alert(strbuild.ToString(), TipoMensaje.MsgAdvertencia) - End If - - End Using - End If + 'If continuar Then + ' Using onom As ClsNominas = New ClsNominas() + ' onom.ValidaFechaFinPersonal(CvePersonal, UsuarioActual.CveEmpresa, fecha.ToString("yyyy/MM/dd")) + ' If onom.DtResultados.Rows.Count > 0 Then + ' continuar = False + ' Dim strbuild As StringBuilder = New StringBuilder() + ' strbuild.Append("No es posible desactivar con esta fecha ya que existen asistencias posteriores a la fecha fin con nominas autorizadas, es necesario desautorizar la siguientes nominas para reintentar el proceso.") + ' For Each drow As DataRow In onom.DtResultados.Rows + ' strbuild.AppendFormat("
{0}", drow("PeriodoTexto")) + ' Next + ' Alert(strbuild.ToString(), TipoMensaje.MsgAdvertencia) + ' End If + ' End Using + 'End If If continuar Then Using objrh As New ClsRH continuar = objrh.estatusPersonalUp(fecha, CvePersonal, estatus, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, DdlMotivoBaja.SelectedValue.ToEntero(), Txobservacionesbaja.Text)