From d81a1afc71b763414beaa8619c14783a2bdea9c3 Mon Sep 17 00:00:00 2001
From: Oscar Irigoyen <rakcsle@outlook.com>
Date: Thu, 12 Jun 2025 16:26:01 -0700
Subject: [PATCH] Correciones Grupos

---
 Bancos/PagoElectronicoGrupos.aspx.vb | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/Bancos/PagoElectronicoGrupos.aspx.vb b/Bancos/PagoElectronicoGrupos.aspx.vb
index d6981455e..06fabcddc 100644
--- a/Bancos/PagoElectronicoGrupos.aspx.vb
+++ b/Bancos/PagoElectronicoGrupos.aspx.vb
@@ -379,12 +379,8 @@ Partial Class Bancos_PagoElectronicoGrupos
             DTPendientes = Nothing
         End If
 
-
-
         ObjBancos.Dispose()
 
-
-
         If DTPendientes IsNot Nothing AndAlso DTPendientes.Rows.Count > 0 Then
             CargaDatosInformativos()
         Else
@@ -436,18 +432,20 @@ Partial Class Bancos_PagoElectronicoGrupos
                 '–– Determina si la cuenta ya está **habilitada** para el banco elegido en la pantalla ––'
                 Dim habilitada As Boolean
                 Select Case True
-                    Case DdlCuenta.SelectedItem.Text.ToUpper.Contains("BANCOMER") _
-                 OrElse DdlCuenta.SelectedItem.Text.ToUpper.Contains("BBVA")
+                    Case DdlCuenta.SelectedItem.Text.ToUpper.Contains("BANCOMER") OrElse DdlCuenta.SelectedItem.Text.ToUpper.Contains("BBVA")
+
                         habilitada = (dr("EstatusPagoElectronicoGrupos").ToString = "True")
 
                     Case DdlCuenta.SelectedItem.Text.ToUpper.Contains("BAJIO")
+
                         habilitada = (dr("EstatusPagoElectronicoGruposBajio").ToString = "True")
 
                     Case DdlCuenta.SelectedItem.Text.ToUpper.Contains("SCOTIA")
+
                         habilitada = (dr("EstatusPagoElectronicoGruposScotia").ToString = "True")
 
                     Case Else
-                        habilitada = False   'Otros bancos → sin bandera propia
+                        habilitada = False   'Otros bancos sin bandera propia
                 End Select
 
                 If Not habilitada Then
@@ -468,6 +466,8 @@ Partial Class Bancos_PagoElectronicoGrupos
                         Case Else
                             Interbancarias += 1
                     End Select
+                Else
+                    Movimientos += 1
                 End If
 
                 ' 3. MOVIMIENTOS de cuentas ya existentes