cambios de GlobalDT

Sistemas/UsuarioDetalle.aspx.vb

@@ -473,17 +473,9 @@ Partial Class Sistemas_UsuarioDetalle
             CargaEmpresasAsignaciones()
             CreaDtAsignacionesMultiEmpresa()
             CveEmpresaAnterior = DdlEmpresaAsignaciones.SelectedValue.ToEntero
-
-            Using ObjOc As New ClsOC
-
-                If ObjOc.GetEstatus() Then
-                    DTOCEstatus = ObjOc.DtResultados
-                Else
-                    DTOCEstatus = New DataTable
-                End If
-
-            End Using
-
+            DTOCEstatus = GlobalDTOCEstatus(UsuarioActual.CveEmpresa)
+
+
         End If
     End Sub
 
@@ -1371,12 +1363,10 @@ Partial Class Sistemas_UsuarioDetalle
 
         'RECARGA GLOBAL BANCOS
         'If ObjBancos.GetBancosCuentasUsuarios(-1) Then
-        GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing 'ObjBancos.DtResultados
-        ' End If
-
-        'RECARGA GLOBAL ESTATUS
-        If ObjOC.GetEstatus() Then Application("GlobalDTOCEstatus") = ObjOC.DtResultados Else Application("GlobalDTOCEstatus") = Nothing
-
+        GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing 'ObjBancos.DtResultados
+        ' End If
+
+        'RECARGA GLOBAL ESTATUS
         GlobalDTOCEstatusUsuarios(UsuarioActual.CveEmpresa) = Nothing
 
         'If ObjOC.GetEstatusUsuarios(-1, -1, -1, -1, -1) Then Application("GlobalDTOCEstatusUsuarios") = ObjOC.DtResultados Else Application("GlobalDTOCEstatusUsuarios") = Nothing