--- parametro de empresa
This commit is contained in:
@@ -439,7 +439,7 @@ Partial Class Portal_PortalProveedor
|
||||
Private Sub CargaBancos(SerieSucursal As String, SelectTop As Integer)
|
||||
Dim ObjMovtos As New ClsMovimientos()
|
||||
'CxC Activas
|
||||
If ObjMovtos.GetProveedorBancos(CveProveedor, CveProveedorSucursal:=-1, SelectTop:=SelectTop) AndAlso ObjMovtos.DtResultados.Rows.Count > 0 Then
|
||||
If ObjMovtos.GetProveedorBancos(CveProveedor, UsuarioActual.CveEmpresa, CveProveedorSucursal:=-1, SelectTop:=SelectTop) AndAlso ObjMovtos.DtResultados.Rows.Count > 0 Then
|
||||
GvBancos.DataSource = ObjMovtos.DtResultados
|
||||
BtnVerMasBancos.Visible = ObjMovtos.DtResultados.Rows.Count > 19
|
||||
DtBancos = ObjMovtos.DtResultados
|
||||
|
||||
Reference in New Issue
Block a user