From 33eec22d4719708cf5333b784f792fed643179d1 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 5 Apr 2023 14:33:18 -0700 Subject: [PATCH] -- que no muestre alert a U100 --- Sistemas/UsuarioDetalle.aspx.vb | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) diff --git a/Sistemas/UsuarioDetalle.aspx.vb b/Sistemas/UsuarioDetalle.aspx.vb index 8f39f2c0a..8cdcf4ad9 100644 --- a/Sistemas/UsuarioDetalle.aspx.vb +++ b/Sistemas/UsuarioDetalle.aspx.vb @@ -1383,14 +1383,12 @@ Partial Class Sistemas_UsuarioDetalle GlobalDTAlmacenUsuarios(-1, UsuarioActual.CveEmpresa) = Nothing GlobalDTUsuarioResponsable(UsuarioActual.CveEmpresa) = Nothing GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing - GlobalDTUsuarios(CveEmpresa:=-1) = Nothing - If UsuarioActual.CveUsuario = 100 Or UsuarioActual.CveRol = 1 Then - Alert("Globals Recargados " & UsuarioActual.CveEmpresa) - End If - 'If ObjUsuarios.GetUsuariosEmpresas(-1, UsuarioActual.CveEmpresa) Then - ' Application("GlobalDTUsuarios") = ObjUsuarios.DtResultados - ' Application("GlobalDTUsuarioResponsable") = ObjUsuarios.DtResultados.FiltraParametros("ProveedoresResponsables > 0") - 'End If + GlobalDTUsuarios(CveEmpresa:=-1) = Nothing + + 'If ObjUsuarios.GetUsuariosEmpresas(-1, UsuarioActual.CveEmpresa) Then + ' Application("GlobalDTUsuarios") = ObjUsuarios.DtResultados + ' Application("GlobalDTUsuarioResponsable") = ObjUsuarios.DtResultados.FiltraParametros("ProveedoresResponsables > 0") + 'End If End Sub Private Sub EnviaCorreo()