Recarga global de usos cfdi

Sistemas/CatSesiones.aspx

@@ -63,7 +63,8 @@
         <asp:ListItem Text="GlobalSATGenerales" Value="GlobalSATGenerales"></asp:ListItem> 
         <asp:ListItem Text="GlobalDTActivoFijos" Value="GlobalDTActivoFijos"></asp:ListItem> 
         <asp:ListItem Text="GlobalDTVendedoresOld" Value="GlobalDTVendedoresOld"></asp:ListItem> 
-         <asp:ListItem Text="GlobalDTAC" Value="GlobalDTAC"></asp:ListItem> 
+        <asp:ListItem Text="GlobalDTAC" Value="GlobalDTAC"></asp:ListItem> 
+        <asp:ListItem Text="GlobalDTSATUsosCFDI" Value="GlobalDTSATUsosCFDI"></asp:ListItem> 
 
     </asp:DropDownList>&nbsp;&nbsp; 
       

Sistemas/CatSesiones.aspx.vb

@@ -106,12 +106,16 @@ Partial Class Sistemas_CatSesiones
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTVendedoresOld" Then
             CargaActivoFijos()
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTAC" Then
-            cargaAC()
+            cargaAC()
+        ElseIf DdlVariable.SelectedItem.Value = "GlobalDTSATUsosCFDI" Then
+            CargaUsosCFDI()
         End If
 
 
     End Sub
-
+    Private Sub CargaUsosCFDI()
+        HttpContext.Current.Application("GlobalDTSATUsosCFDI") = Nothing
+    End Sub
     Private Sub CargaGlobalDTVendedoresOld()
         Dim AppNombre As String = $"GlobalDTVendedores-{-1}"
         If HttpContext.Current.Application(AppNombre) Is Nothing Then