Pago Electronico Grupos 2020-06-12

Bancos/IE.aspx.vb

@@ -4653,6 +4653,26 @@ Partial Class Bancos_IE
                     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
+                    trCuentaDeposito.Visible = True
+                    BtnGuardar.ToolTip = ""
+
+                Else
+
+                    BtnGuardar.Enabled = False
+                    Alert("El proveedor no tiene cuentas deposito.", TipoMensaje.MsgAdvertencia)
+                    BtnGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
+
+                End If
+
+
+                UpGuardar.Update()
+
             Else
                 DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros("Estatus ='True'")
                 If Dep.DtResultados.Rows.Count > 0 Then
@@ -4663,6 +4683,19 @@ Partial Class Bancos_IE
             End If
 
 
+        Else
+
+            If DdlTipoTransaccion.SelectedValue.Contiene("9", "17") Then
+
+                BtnGuardar.Enabled = False
+                Alert("El proveedor no tiene cuentas deposito.", TipoMensaje.MsgAdvertencia)
+                BtnGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
+            Else
+                trCuentaDeposito.Visible = True
+                BtnGuardar.Enabled = True
+            End If
+
+            UpGuardar.Update()
 
 
         End If