cambios en global

This commit is contained in:
rrene
2020-10-16 12:52:38 -07:00
parent 40edf8879d
commit 5b230881bd

View File

@@ -215,11 +215,11 @@ Partial Class Inventarios_CatAlmacenes
Private Sub RecargaGlobalAlmacenes()
GlobalDTAlmacen(UsuarioActual.CveEmpresa) = Nothing
Dim ObjAlmacen As New ClsInventarios
If ObjAlmacen.GetAlmacenes(-1, -1, -1, -1) Then
GlobalDTAlmacen(-1) = ObjAlmacen.DtResultados
End If
ObjAlmacen.Dispose()
'Dim ObjAlmacen As New ClsInventarios
'If ObjAlmacen.GetAlmacenes(-1, -1, -1, -1) Then
' GlobalDTAlmacen(-1) = ObjAlmacen.DtResultados
'End If
'ObjAlmacen.Dispose()
End Sub
Private Sub RecargaGlobalAlmacenesUsuarios()