From 522ee6ec2bf52acf518b2c6a2ed67fb184586754 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Tue, 13 Feb 2024 17:47:09 -0700
Subject: [PATCH] --cambios de cuenta beneficiario

---
 Ventas/ClientesAbonar.aspx.vb | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb
index 2bcfd0459..599476524 100644
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -2415,7 +2415,11 @@ Partial Class Ventas_ClientesAbonar
         End If
 
         If DTCuentas.Rows.Count > 0 Then
-            CuentaBeneficiario = DTCuentas.Rows(0)("NumCuenta").ToString
+            If String.IsNullOrEmpty(DTCuentas.Rows(0)("CLABE").ToString) Then
+                CuentaBeneficiario = DTCuentas.Rows(0)("NumCuenta").ToString
+            Else
+                CuentaBeneficiario = DTCuentas.Rows(0)("CLABE").ToString
+            End If
         Else
             Alert("No se pudo encontrar la cuenta", TipoMensaje.MsgAdvertencia)
             Exit Sub