From c1efca70a7c9f88bc8dfa158f2d98f8e0fd0392b Mon Sep 17 00:00:00 2001
From: Antonio Gonzalez <jose_antony11@hotmail.com>
Date: Tue, 27 Aug 2019 12:42:53 -0500
Subject: [PATCH] cambio de GlobalDTEstatusIE a GlobalDTBancosEstatusIE

---
 App_Code/ClsPaginas.vb            |  6 +++---
 Bancos/CatBancosEstatusIE.aspx.vb | 16 ++++++++--------
 Bancos/CatEstatusIE.aspx.vb       |  4 ++--
 Bancos/RepIE.aspx.vb              |  2 +-
 4 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 04ad93303..a643b79af 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -1355,12 +1355,12 @@ Public Class ClsPaginas
             Application("GlobalDTTipoTransacciones") = value
         End Set
     End Property
-    Property GlobalDTEstatusIE() As DataTable
+    Property GlobalDTBancosEstatusIE() As DataTable
         Get
-            GlobalDTEstatusIE = DirectCast(Application("GlobalDTEstatusIE"), DataTable)
+            GlobalDTBancosEstatusIE = DirectCast(Application("GlobalDTBancosEstatusIE"), DataTable)
         End Get
         Set(value As DataTable)
-            Application("GlobalDTEstatusIE") = value
+            Application("GlobalDTBancosEstatusIE") = value
         End Set
     End Property
     Property GlobalDTBancosIE() As DataTable
diff --git a/Bancos/CatBancosEstatusIE.aspx.vb b/Bancos/CatBancosEstatusIE.aspx.vb
index e1fc26f75..c82dab5bd 100644
--- a/Bancos/CatBancosEstatusIE.aspx.vb
+++ b/Bancos/CatBancosEstatusIE.aspx.vb
@@ -25,8 +25,8 @@ Partial Class Bancos_CatBancosEstatusIE
 		Dim ObjEstatusIE As New ClsBancos
 		If ObjEstatusIE.GetBancos_EstatusIE() Then
 			ViewState("DTEstatusIE") = ObjEstatusIE.DtResultados
-			GlobalDTEstatusIE = ObjEstatusIE.DtResultados
-		Else
+            GlobalDTBancosEstatusIE = ObjEstatusIE.DtResultados
+        Else
 			Me.GvDatos.DataSource = Nothing
 		End If
 
@@ -47,9 +47,9 @@ Partial Class Bancos_CatBancosEstatusIE
 			Alert("El nuevo Estatus de Ingresos y Egresos se guardó correctamente.", TipoMensaje.MsgInformacion)
 			UpTitulos.Update()
 			ViewState("DTEstatusIE") = ObjEstatusIE.DtResultados
-			GlobalDTEstatusIE = ObjEstatusIE.DtResultados
+            GlobalDTBancosEstatusIE = ObjEstatusIE.DtResultados
 
-			If ViewState("Orden").ToString() <> String.Empty Then
+            If ViewState("Orden").ToString() <> String.Empty Then
 				CargaGrid(ViewState("Orden").ToString())
 			Else
 				CargaGrid("")
@@ -145,8 +145,8 @@ Partial Class Bancos_CatBancosEstatusIE
 			TxtCveEstatusIE.Text = ""
 			GvDatos.EditIndex = -1
 			ViewState("DTEstatusIE") = ObjEstatusIE.DtResultados
-			GlobalDTEstatusIE = ObjEstatusIE.DtResultados
-			Alert("El Estatus de Ingresos y Egresos se eliminó correctamente.", TipoMensaje.MsgInformacion)
+            GlobalDTBancosEstatusIE = ObjEstatusIE.DtResultados
+            Alert("El Estatus de Ingresos y Egresos se eliminó correctamente.", TipoMensaje.MsgInformacion)
 		End If
 
 		ObjEstatusIE.Dispose()
@@ -178,8 +178,8 @@ Partial Class Bancos_CatBancosEstatusIE
 		If ObjEstatusIE.UpdateBancos_EstatusIE(EstatusIE, Estatus, CveEstatusIE) Then
 			GvDatos.EditIndex = -1
 			ViewState("DTEstatusIE") = ObjEstatusIE.DtResultados
-			GlobalDTEstatusIE = ObjEstatusIE.DtResultados
-			Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
+            GlobalDTBancosEstatusIE = ObjEstatusIE.DtResultados
+            Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
 		End If
 
 		ObjEstatusIE.Dispose()
diff --git a/Bancos/CatEstatusIE.aspx.vb b/Bancos/CatEstatusIE.aspx.vb
index d639e2a0a..9950ba678 100644
--- a/Bancos/CatEstatusIE.aspx.vb
+++ b/Bancos/CatEstatusIE.aspx.vb
@@ -42,8 +42,8 @@ Partial Class Bancos_CatEstatusIE
         Dim ObjEstatusIE As New ClsBancos
         If ObjEstatusIE.GetBancos_EstatusIE() Then
             ViewState("DTEstatusIE") = ObjEstatusIE.DtResultados
-            GlobalDTEstatusIE = ObjEstatusIE.DtResultados
-            GvDatos.DataSource = GlobalDTEstatusIE
+            GlobalDTBancosEstatusIE = ObjEstatusIE.DtResultados
+            GvDatos.DataSource = GlobalDTBancosEstatusIE
         Else
             GvDatos.DataSource = Nothing
         End If
diff --git a/Bancos/RepIE.aspx.vb b/Bancos/RepIE.aspx.vb
index 35516d24a..0f11dd4a5 100644
--- a/Bancos/RepIE.aspx.vb
+++ b/Bancos/RepIE.aspx.vb
@@ -423,7 +423,7 @@ Partial Class Bancos_RepIE
         DdlMoneda.Items.Insert(0, New ListItem("Todas", "-1"))
     End Sub
     Private Sub CargaEstatusIE()
-        DdlEstatusIE.DataSource = GlobalDTEstatusIE
+        DdlEstatusIE.DataSource = GlobalDTBancosEstatusIE
         DdlEstatusIE.DataBind()
     End Sub
     Private Sub CargaUsuarioConcilio()