-- solo muestre cajas que tenga acceso el usuario
This commit is contained in:
@@ -38,10 +38,10 @@ Partial Class Bancos_DepositosCaja
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub CargaCuentas()
|
Private Sub CargaCuentas()
|
||||||
DdlCuentaDeposito.DataSource = GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(" CveTipoCuenta <> 1", "", {"CveCuenta", "NumCuentaMoneda"})
|
DdlCuentaDeposito.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(" CveTipoCuenta <> 1", "", {"CveCuenta", "NumCuentaMoneda"})
|
||||||
DdlCuentaDeposito.DataBind()
|
DdlCuentaDeposito.DataBind()
|
||||||
|
|
||||||
DdlCajaChica.DataSource = GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(" CveTipoCuenta = 1", "", {"CveCuenta", "NumCuentaMoneda"})
|
DdlCajaChica.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(" CveTipoCuenta = 1", "", {"CveCuenta", "NumCuentaMoneda"})
|
||||||
DdlCajaChica.DataBind()
|
DdlCajaChica.DataBind()
|
||||||
|
|
||||||
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
|
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
|
||||||
|
|||||||
Reference in New Issue
Block a user