diff --git a/Sistemas/CatSesiones.aspx.vb b/Sistemas/CatSesiones.aspx.vb
index b024433df..ef6bbf838 100644
--- a/Sistemas/CatSesiones.aspx.vb
+++ b/Sistemas/CatSesiones.aspx.vb
@@ -267,6 +267,7 @@ Partial Class Sistemas_CatSesiones
         If ObjVentas.GetCondicionesEntrega(-1) Then Application("GlobalDTVtaCondicionesEntrega") = ObjVentas.DtResultados Else Application("GlobalDTVtaCondicionesEntrega") = Nothing
 
         ObjVentas.Dispose()
+        GlobalDTTipoVenta(-1) = Nothing
     End Sub
 
     Private Sub CargaProductosServicios()