diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 4e6967359..65e819be0 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -10591,7 +10591,7 @@ Public Class ClsPaginas
             PaginaDict.Add("/CxC/RepCxCPeriodo.aspx".ToUpper(), 887)
 #End Region
 #Region "Exportaciones"
-            PaginaDict.Add("/Export/RepExportaciones.aspx".ToUpper(), 77)
+            'PaginaDict.Add("/Export/RepExportaciones.aspx".ToUpper(), 77)
             PaginaDict.Add("/Export/ExpDetalle.aspx".ToUpper(), 77)
 #End Region
 #Region "Finanzas"
@@ -11362,6 +11362,12 @@ Public Class ClsPaginas
                 Case Else : Retorno = 9
             End Select
         End If
+        If Pagina.ToUpper() = ("/Export/RepExportaciones.aspx").ToUpper() Then
+            Select Case Request("Opcion")
+                Case "I" : Retorno = 85
+                Case Else : Retorno = 77
+            End Select
+        End If
         Return Retorno
     End Function
 #End Region