- prodservSAT

Sistemas/CatSesiones.aspx.vb

@@ -107,6 +107,7 @@ Partial Class Sistemas_CatSesiones
     Private Sub CargaSATMotivoTraslado()
         Dim ObjGrales As New ClsGenerales
         If ObjGrales.GetSATMotivoTraslado Then Application("GlobalDTSATMotivoTraslado") = ObjGrales.DtResultados Else Application("GlobalDTSATMotivoTraslado") = Nothing
+        If ObjGrales.GetSATProductosServicios Then Application("GlobalDTPSATPS") = ObjGrales.DtResultados.AsEnumerable() Else Application("GlobalDTPSATPS") = Nothing
         ObjGrales.Dispose()
     End Sub