diff --git a/Proveedores/PortalProveedor.aspx.vb b/Proveedores/PortalProveedor.aspx.vb
index 48f866941..f38214abf 100644
--- a/Proveedores/PortalProveedor.aspx.vb
+++ b/Proveedores/PortalProveedor.aspx.vb
@@ -124,7 +124,7 @@ Partial Class Portal_PortalProveedor
 #Region "C A R G A - D A T O S"
 
     Protected Sub CargaDatos()
-        GlobalDTCompProveedores(UsuarioActual.CveEmpresa).FiltroPrimero($"CveProveedor = {CveProveedor}")
+
         Dim ObjProveedor As New ClsCompProveedores()
         If ObjProveedor.GetProveedores(ClsCompProveedores.TipoConsulta.ParaUsoEnEmpresa, CveProveedor, "-1", "-1", "-1", "-1", "-1", "-1", "-1", 1, UsuarioActual.CveEmpresa) Then
             If ObjProveedor.DtResultados.Rows.Count > 0 Then
@@ -259,7 +259,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