Correcion en UsurioDetalle , getAlamcen() se agrego parametro CveCompra
This commit is contained in:
@@ -1323,7 +1323,7 @@ Partial Class Sistemas_UsuarioDetalle
|
|||||||
|
|
||||||
|
|
||||||
'RECARGA GLOBAL ALMACEN
|
'RECARGA GLOBAL ALMACEN
|
||||||
If ObjUsuarios.GetAlmacen(-1) Then Application("GlobalDTAlmacenUsuarios") = ObjUsuarios.DtResultados Else Application("GlobalDTAlmacenUsuarios") = Nothing
|
If ObjUsuarios.GetAlmacen(-1, UsuarioActual.CveEmpresa) Then Application("GlobalDTAlmacenUsuarios") = ObjUsuarios.DtResultados Else Application("GlobalDTAlmacenUsuarios") = Nothing
|
||||||
|
|
||||||
|
|
||||||
'RECARGA GLOBAL EMPRESAS USUARIOS
|
'RECARGA GLOBAL EMPRESAS USUARIOS
|
||||||
@@ -2068,7 +2068,7 @@ Partial Class Sistemas_UsuarioDetalle
|
|||||||
Private Sub CargaDtAlmacen()
|
Private Sub CargaDtAlmacen()
|
||||||
Dim ClsUsuarios As New ClsSisUsuarios
|
Dim ClsUsuarios As New ClsSisUsuarios
|
||||||
|
|
||||||
If ClsUsuarios.GetAlmacen(CveUsuario) Then
|
If ClsUsuarios.GetAlmacen(CveUsuario, UsuarioActual.CveEmpresa) Then
|
||||||
DtAlmacenes = ClsUsuarios.DtResultados.FiltraParametros(String.Format("CveUsuario = {0}", CveUsuario))
|
DtAlmacenes = ClsUsuarios.DtResultados.FiltraParametros(String.Format("CveUsuario = {0}", CveUsuario))
|
||||||
Else
|
Else
|
||||||
DtAlmacenes = Nothing
|
DtAlmacenes = Nothing
|
||||||
|
|||||||
Reference in New Issue
Block a user