-- option strict on

2023-08-25 07:35:45 -07:00
parent 7789b60482
commit 6ac06a9649
21 changed files with 76 additions and 76 deletions
--- a/Sistemas/CatSesiones.aspx.vb
+++ b/Sistemas/CatSesiones.aspx.vb
@@ -545,7 +545,7 @@ Partial Class Sistemas_CatSesiones
        'Dim ObjOC As New ClsOC
        'If ObjOC.GetEstatusUsuarios(-1, -1, -1, -1, -1) Then Application("GlobalDTOCEstatusUsuarios") = ObjOC.DtResultados Else Application("GlobalDTOCEstatusUsuarios") = Nothing
        'ObjOC.Dispose()
-        GlobalDTOCEstatusUsuarios(UsuarioActual.CveEmpresa, -1, -1) = Nothing
+        GlobalDTOCEstatusUsuarios(UsuarioActual.CveEmpresa, -1, "-1") = Nothing
    End Sub

    'Compras