From 1ffb59e10f9f7feb5686abf50cbf17350d2e1864 Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Sat, 30 May 2020 14:58:17 -0700
Subject: [PATCH] - quitar globalFolios

---
 App_Code/ClsPaginas.vb |  9 +--------
 Global.asax            | 19 +++++++------------
 2 files changed, 8 insertions(+), 20 deletions(-)

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 6c1eaf2e6..fd1b013bf 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -851,14 +851,7 @@ Public Class ClsPaginas
             Application("GlobalDTLeyendasFiscales") = value
         End Set
     End Property
-    Property GlobalDTFolios() As DataTable
-        Get
-            GlobalDTFolios = DirectCast(Application("GlobalDTFolios"), DataTable)
-        End Get
-        Set(value As DataTable)
-            Application("GlobalDTFolios") = value
-        End Set
-    End Property
+
     Property GlobalDTEstatusFactura() As DataTable
         Get
             GlobalDTEstatusFactura = DirectCast(Application("GlobalDTEstatusFactura"), DataTable)
diff --git a/Global.asax b/Global.asax
index 11fea0e3e..d2a87c94f 100644
--- a/Global.asax
+++ b/Global.asax
@@ -356,18 +356,13 @@
 
         Dim ObjLeyendasFiscales As New ClsLeyendasFiscales()
         If ObjLeyendasFiscales.GetLeyendasFiscales() Then Application("GlobalDTLeyendasFiscales") = ObjLeyendasFiscales.DtResultados Else Application("GlobalDTLeyendasFiscales") = Nothing
-        ObjLeyendasFiscales.Dispose()
-
-        '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-        'C A R G A  -  F O L I O S
-
-        Dim ObjFolios As New ClsGralFolios()
-        If ObjFolios.GetFolios() Then Application("GlobalDTFolios") = ObjFolios.DtResultados Else Application("GlobalDTFolios") = Nothing
-        ObjFolios.Dispose()
-
-        '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-        'F A C T U R A S
-
+        ObjLeyendasFiscales.Dispose()
+
+        '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
+
+        '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
+        'F A C T U R A S
+
         Dim ObjEstatusFactura As New ClsEstatusFactura()
         If ObjEstatusFactura.GetEstatusFactura() Then Application("GlobalDTEstatusFactura") = ObjEstatusFactura.DtResultados Else Application("GlobalDTEstatusFactura") = Nothing
         ObjEstatusFactura.Dispose()