-- parametro de moneda en acreedoressaldos

2023-07-26 16:27:45 -07:00
parent 1600cb86f3
commit 56f65a816e
4 changed files with 7 additions and 5 deletions
--- a/Bancos/PopIECompras.aspx.vb
+++ b/Bancos/PopIECompras.aspx.vb
@@ -798,7 +798,7 @@ Partial Class Bancos_PopIECompras
    Protected Sub CargaAcreedores(Optional CveMoneda As Integer = 1)
        Dim ObjMov As New ClsMovimientos

-        If ObjMov.GetAcreedoresSaldos(-1, UsuarioActual.CveEmpresa) Then
+        If ObjMov.GetAcreedoresSaldos(-1, CveMoneda, UsuarioActual.CveEmpresa) Then
            DtAcreedores = ObjMov.DtResultados.FiltraParametros($"CveProveedor > 0 AND CveMoneda = {CveMoneda}")
            DdlAcreedor.DataSource = DtAcreedores
            DdlAcreedor.DataBind()