From 55fc50f89d0ce0b2f486d3c55f930e3a024c1b2d Mon Sep 17 00:00:00 2001 From: rrene Date: Sat, 10 Aug 2024 14:06:04 -0700 Subject: [PATCH] - mejora parametro cveempresa --- Nomina/EventoDetalle.aspx.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Nomina/EventoDetalle.aspx.vb b/Nomina/EventoDetalle.aspx.vb index 20003cb4b..b5fd4eaad 100644 --- a/Nomina/EventoDetalle.aspx.vb +++ b/Nomina/EventoDetalle.aspx.vb @@ -954,7 +954,7 @@ Partial Class OI_EventoDetalle ' End If 'End If - Dim DT As DataTable = GlobalDTUsuarios(-1, tCveEmpresa).FiltraParametros(String.Format(" Estatus = 1 {0}", FiltroAD), "Rol ASC") + Dim DT As DataTable = GlobalDTUsuarios(-1, tCveEmpresa).FiltraParametros(String.Format(" Estatus =1 {0}", FiltroAD), "Rol ASC") GVUsuarios.DataSource = AgregaGrupos(DT) DT.Dispose() @@ -1126,7 +1126,7 @@ Partial Class OI_EventoDetalle 'UsuarioPara = DdlUsuarioPara.SelectedItem.Text - Dim dru As DataRow = GlobalDTUsuarios(CveUsuarioPara, UsuarioActual.CveEmpresa).FiltroPrimero("") + Dim dru As DataRow = GlobalDTUsuarios(CveUsuarioPara, CveEmpresa).FiltroPrimero("") If dru IsNot Nothing Then CorreoPara = dru("Correo").ToString Dim RutaGuardar = "" RutaGuardar = String.Format("{0}OI\", UsuarioActual.Empresa.Ruta)