diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb index 9a5858990..cb3668154 100644 --- a/Bancos/IE.aspx.vb +++ b/Bancos/IE.aspx.vb @@ -1362,7 +1362,7 @@ Partial Class Bancos_IE Dim ObjMovtos As New ClsMovimientos() If CvemonedaInterna > 0 Then - If ObjMovtos.GetAnticiposProveedor(CveProveedor, -1, CvemonedaInterna, -1) AndAlso ObjMovtos.DtResultados.FiltraParametros("TipoDocto = 'NC'").Rows.Count > 0 Then + If ObjMovtos.GetAnticiposProveedor(CveProveedor, UsuarioActual.CveEmpresa, CveMoneda:=CvemonedaInterna, TipoDocto:="NC") AndAlso ObjMovtos.DtResultados.Rows.Count > 0 Then GvA.DataSource = ObjMovtos.DtResultados.FiltraParametros("TipoDocto = 'NC' and Saldo > 0 and CveCompra > 0") Else GvA.DataSource = Nothing @@ -1372,7 +1372,6 @@ Partial Class Bancos_IE End If ObjMovtos.Dispose() - GvA.DataBind() UpGvNotas.Update() End Sub