From bcd5b0102c531d2d36f481e93e0035eef096ea6e Mon Sep 17 00:00:00 2001
From: Rakcsle Supertramp <rakcsle@outlook.com>
Date: Wed, 20 May 2020 10:48:00 -0700
Subject: [PATCH] Mensajes  layout cuentas deposito  bancomer , Proveedores
 abonar, Ie, PopIeCompras

---
 Bancos/IE.aspx.vb                | 17 ++---------------
 Bancos/PopIECompras.aspx.vb      |  2 +-
 Bancos/ProveedoresAbonar.aspx.vb | 15 +++------------
 3 files changed, 6 insertions(+), 28 deletions(-)

diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 7e142edeb..b27cfb067 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -4660,7 +4660,7 @@ Partial Class Bancos_IE
                     trCuentaDeposito.Visible = True
                     DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
                 Else
-                    Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
+                    Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
                 End If
 
             Else
@@ -4668,25 +4668,12 @@ Partial Class Bancos_IE
                 If Dep.DtResultados.Rows.Count > 0 Then
                     trCuentaDeposito.Visible = True
                     DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
+
                 End If
             End If
 
 
-            ''ANTIGUO
-            'GVCuentasPago.DataSource = Dep.DtResultados
-            'If Dep.DtResultados.Rows.Count > 1 Then
-            '    trCuentaDeposito.Visible = True
-            '    DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
 
-            '    'Si tiene seleccionado Tipo Mov: Layout y no tiene cuenta deposito
-            'ElseIf DdlTipoTransaccion.SelectedValue = "9" AndAlso Not Dep.DtResultados.Rows.Count > 0 Then
-            '    trCuentaDeposito.Visible = True
-            '    DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
-
-            '    BtnIEGuardar.Enabled = False
-            '    UpGuardar.Update()
-            '    Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
-            'End If
 
         End If
         Dep.Dispose()
diff --git a/Bancos/PopIECompras.aspx.vb b/Bancos/PopIECompras.aspx.vb
index c608e31d7..e1909a2b2 100644
--- a/Bancos/PopIECompras.aspx.vb
+++ b/Bancos/PopIECompras.aspx.vb
@@ -942,7 +942,7 @@ Partial Class Bancos_PopIECompras
                         DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
                     Else
                         BtnGuardar.Enabled = False
-                        Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
+                        Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
                     End If
 
                 Else
diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb
index 1f79da289..6ca16c29c 100644
--- a/Bancos/ProveedoresAbonar.aspx.vb
+++ b/Bancos/ProveedoresAbonar.aspx.vb
@@ -2515,33 +2515,24 @@ Partial Class Bancos_ProveedoresAbonar
                         DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
                     Else
                         BtnIEGuardar.Enabled = False
-                        Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
+                        Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
                     End If
 
                 ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
 
 
                     If Dep.DtResultados.Rows.Count > 0 Then
-                        DdlCuentaDeposito.DataSource = Dep.DtResultados  '.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'")
+                        DdlCuentaDeposito.DataSource = Dep.DtResultados
                         trCuentaDeposito.Visible = True
                         BtnIEGuardar.ToolTip = ""
                     Else
-                        'Alert("El proveedor no tiene cuentas deposito registradas.")
 
                         BtnIEGuardar.Enabled = False
                         BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
 
-
-
                     End If
 
-                    'If Dep.DtResultados.FiltraParametros("EstatusPagoElectronicoGrupos = 'True'  AND Estatus ='True'").Rows.Count > 0 Then
-                    '    trCuentaDeposito.Visible = True
-                    '    DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
-                    'Else
-                    '    BtnIEGuardar.Enabled = False
-                    '    Alert("El proveedor no tiene ninguna cuenta deposito registrada ", TipoMensaje.MsgAdvertencia)
-                    'End If
+
                     UpGuardar.Update()
                 Else
                     DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros("Estatus ='True'")