From a5dd057e5d2b7cdcea183149f739ea7e45f2f9ca Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 30 Dec 2024 10:06:33 -0700
Subject: [PATCH] -- cambio

---
 Ventas/PVCobranza.aspx.vb | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/Ventas/PVCobranza.aspx.vb b/Ventas/PVCobranza.aspx.vb
index 941d85578..b2cb33b4f 100644
--- a/Ventas/PVCobranza.aspx.vb
+++ b/Ventas/PVCobranza.aspx.vb
@@ -388,8 +388,8 @@ Partial Class Ventas_PVCobranza
                     e.Row.FCLinkButton("BtnPagar").Enabled = True
                 Else
                     e.Row.FCLinkButton("BtnPagar").CssClass = "btn btn-xs btn-danger"
-                    e.Row.FCLinkButton("BtnPagar").Enabled = False
-                    e.Row.FCLinkButton("BtnPagar").ToolTip = "Solicitud de crédito no autorizada."
+                    ' e.Row.FCLinkButton("BtnPagar").Enabled = False
+                    e.Row.FCLinkButton("BtnPagar").OnClientClick = "alert('La solicitud de crédito no ha sido autorizada');return false;"
                 End If
             End If
 
@@ -1878,7 +1878,7 @@ Partial Class Ventas_PVCobranza
 
         If dtt IsNot Nothing AndAlso dtt.Rows.Count > 0 Then
             For Each dr As DataRow In dtt.Rows
-                Dim NumeroTelefono = "526621143532"
+                Dim NumeroTelefono = ""
                 If EsProduccion Then
                     NumeroTelefono = String.Format("52{0}", dr("Celular").ToString())
                 End If
@@ -1892,7 +1892,6 @@ Partial Class Ventas_PVCobranza
         Else
             Alert("No se envió la solicitud de autorización", TipoMensaje.MsgAdvertencia)
         End If
-
         UpAnticipos.Update()
     End Sub
 
@@ -1918,7 +1917,6 @@ Partial Class Ventas_PVCobranza
                     e.Row.FCCheckBox("Chk").Enabled = False
                 End If
             End If
-
         End If
     End Sub