- mejora parametro cveempresa

This commit is contained in:
2024-08-10 14:06:04 -07:00
parent 8f34b2341c
commit 55fc50f89d

View File

@@ -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)