diff --git a/Sistemas/Empresa.aspx.vb b/Sistemas/Empresa.aspx.vb
index 3b0e210b9..4fc40d192 100644
--- a/Sistemas/Empresa.aspx.vb
+++ b/Sistemas/Empresa.aspx.vb
@@ -655,7 +655,7 @@ Partial Class Sistemas_Empresa
         'RECARGA EMPRESA
         If TextoError = "" Then
             If ObjEmpresas.GetEmpresas(CveEmpresa, "-1", "-1", "-1", "-1") Then
-                GlobalDTEmpresas(CveEmpresa) = ObjEmpresas.DtResultados
+                GlobalDTEmpresas(CveEmpresa) = Nothing
 
                 'verifico si existe la carpeta de la empresa, sino la crea
                 For Each dr As Data.DataRow In ObjEmpresas.DtResultados.Rows
@@ -665,9 +665,8 @@ Partial Class Sistemas_Empresa
                 Next
             End If
 
-            If ObjGral.GetClasificacionPorcentaje(CveEmpresa) Then
-                GlobalDTClasificacionPorcentaje(CveEmpresa) = ObjGral.DtResultados
-            End If
+            GlobalDTClasificacionPorcentaje(CveEmpresa) = Nothing
+
         End If
 
         'AGREGAR FUNCIONALIDADES