From 2eeccd52d1255795c2517449127841763afaf1e4 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 27 May 2024 16:02:55 -0700
Subject: [PATCH] -- filtrando solo los doc x pagar, con saldo

---
 Ventas/ClientesAbonar.aspx.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb
index 33007aedc..013fb3576 100644
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -2057,8 +2057,8 @@ Partial Class Ventas_ClientesAbonar
         Dim dtt As DataTable = Nothing
         Dim Deudores As New ClsMovimientos
         If Deudores.GetDocumentosxPagarDetalle(CveCliente, tCveMoneda, 2, UsuarioActual.CveEmpresa) Then
-            DdlPrestamo.DataSource = Deudores.DtResultados '.FiltraParametros("CveCliente > 0 AND Saldo > 0 AND CveIE > 0")
-            dtt = Deudores.DtResultados
+            dtt = Deudores.DtResultados.FiltraParametros("CveProveedor > 0 AND Saldo > 0 AND CveIE > 0", "FechaDocumento")
+            DdlPrestamo.DataSource = dtt
         End If
         Deudores.Dispose()