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)