From baaf4e92f6ee9feb115062470038294a665c87d2 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 1 Oct 2019 11:12:41 -0700 Subject: [PATCH 1/3] --- Nomina/ReportePTU.aspx.vb | 2 +- RH/Asistencias.aspx.vb | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Nomina/ReportePTU.aspx.vb b/Nomina/ReportePTU.aspx.vb index 8df351967..b79a05002 100644 --- a/Nomina/ReportePTU.aspx.vb +++ b/Nomina/ReportePTU.aspx.vb @@ -155,7 +155,7 @@ Partial Class Nomina_ReportePTU If Not IsNothing(rowc) Then CveConcepto = rowc("CveConcepto").ToString().ToEntero() Else - CveConcepto = objNomina.AddConcepto("PTU", "Utilidades", "P", "", True, True, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 0, -1) + CveConcepto = objNomina.AddConcepto("PTU", "Utilidades", "P", "", True, True, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 0, -1, 0, 0, 0, 0) End If If CveConcepto < 1 Then continuar = False diff --git a/RH/Asistencias.aspx.vb b/RH/Asistencias.aspx.vb index f7403e7b8..4ef1af208 100644 --- a/RH/Asistencias.aspx.vb +++ b/RH/Asistencias.aspx.vb @@ -11,7 +11,7 @@ Partial Class RH_Asistencias CargaProyecto() CargaTurnos() TxtFechaAsistencia.Text = Now.ToShortDateString - If UsuarioActual.CveRol = 1 Then + If UsuarioActual.CveRol = 1 OrElse UsuarioActual.CveUsuario = 2343 Then PnlMasivo.Visible = True CargaTiposPeriodo() End If From def2fa3bc23164cec98270d914c493b21988b052 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 1 Oct 2019 11:51:17 -0700 Subject: [PATCH 2/3] add Poliza en alert --- Compras/ReembolsosComprobaciones.aspx.vb | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Compras/ReembolsosComprobaciones.aspx.vb b/Compras/ReembolsosComprobaciones.aspx.vb index 5f9f37585..21dd16117 100644 --- a/Compras/ReembolsosComprobaciones.aspx.vb +++ b/Compras/ReembolsosComprobaciones.aspx.vb @@ -1367,10 +1367,13 @@ Partial Class Compras_ReembolsosComprobaciones If CvePrePolizaExcedente > 0 Then Mensaje.AppendFormat("Abono Registrado Correctamente.

Cheque: {1}

Imprimir", CveIEExcedente, TxtFolio.Text) - Mensaje.AppendFormat("

Poliza: {1}
", ObjMov.ContaIdPoliza, ObjMov.ContaFolio) + Mensaje.AppendFormat("

Póliza: {1}
", ObjMov.ContaIdPoliza, ObjMov.ContaFolio) Alert(Mensaje.ToString, TipoMensaje.MsgInformacion) Else Mensaje.AppendFormat("Abono Registrado Correctamente.

Imprimir", CveIERegistrado) + If CvePrePolizaIERegistrado > 0 Then + Mensaje.AppendFormat("

Póliza: {1}
", CvePrePolizaIERegistrado, ObjMov.ContaFolio) + End If Alert(Mensaje.ToString, TipoMensaje.MsgInformacion) End If From 6d54ff48bd6d3a93346ac497410d9cbe04593e8f Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 1 Oct 2019 12:30:04 -0700 Subject: [PATCH 3/3] --- Compras/ReembolsosComprobaciones.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Compras/ReembolsosComprobaciones.aspx.vb b/Compras/ReembolsosComprobaciones.aspx.vb index 21dd16117..bee517f36 100644 --- a/Compras/ReembolsosComprobaciones.aspx.vb +++ b/Compras/ReembolsosComprobaciones.aspx.vb @@ -1372,7 +1372,7 @@ Partial Class Compras_ReembolsosComprobaciones Else Mensaje.AppendFormat("Abono Registrado Correctamente.

Imprimir", CveIERegistrado) If CvePrePolizaIERegistrado > 0 Then - Mensaje.AppendFormat("

Póliza: {1}
", CvePrePolizaIERegistrado, ObjMov.ContaFolio) + Mensaje.AppendFormat("

Póliza: {1}
", ObjMov.ContaIdPoliza, ObjMov.ContaFolio) End If Alert(Mensaje.ToString, TipoMensaje.MsgInformacion) End If