-

Sistemas/CatSesiones.aspx.vb

@@ -131,7 +131,9 @@ Partial Class Sistemas_CatSesiones
         End If
     End Sub
 
-    Private Sub CargaActivoFijos()
+    Private Sub CargaActivoFijos()
+        GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa) = Nothing
+        GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa) = Nothing
         GlobalDTActivoFijos(UsuarioActual.CveEmpresa) = Nothing
         GlobalDTModeloActivoFijo(UsuarioActual.CveEmpresa, -1) = Nothing
     End Sub