-- agregado de activos fijos

Sistemas/CatSesiones.aspx.vb

@@ -101,12 +101,18 @@ Partial Class Sistemas_CatSesiones
             CargaGlobalDTTipoTransacciones()
         ElseIf DdlVariable.SelectedItem.Value = "GlobalSATGenerales" Then
             CargaSATGenerales()
+        ElseIf DdlVariable.SelectedItem.Value = "GlobalDTActivoFijos" Then
+            CargaActivoFijos()
         End If
 
 
-
-
     End Sub
+
+    Private Sub CargaActivoFijos()
+        GlobalDTActivoFijos(UsuarioActual.CveEmpresa) = Nothing
+        GlobalDTModeloActivoFijo(UsuarioActual.CveEmpresa, -1) = Nothing
+    End Sub
+
     Private Sub CargaSATGenerales()
         Using ObjGrales As New ClsGenerales
             If ObjGrales.GetSATUsosCFDI Then Application("GlobalDTSATUsosCFDI") = ObjGrales.DtResultados