--actvacón para visualza cuenta de caja chica, cuando tiene funcionaldad de cobro en caja.

This commit is contained in:
2024-04-02 13:28:36 -07:00
parent 15b9466d57
commit 881f4a80b3

View File

@@ -1637,7 +1637,7 @@ Partial Class Bancos_IE
DdlCuenta.Items.Clear()
Dim dt As DataTable
If UsuarioActual.Empresa.Funcionalidad(127) = "1" Then
If UsuarioActual.Empresa.Funcionalidad(127) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
dt = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa)
Else
dt = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("CveTipoCuenta <> 1") ' quito las cajas chicas