/cambios en globalDT separados por Empresa

2019-12-26 17:30:11 -07:00
parent fdb3abf583
commit 2bb4c47c92
32 changed files with 601 additions and 482 deletions
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -7315,11 +7315,12 @@ Partial Class OC
        RecargaPSGlobal()
    End Sub
    Private Sub RecargaPSGlobal()
-        Dim ObjPS As New ClsProductosServicios
+        GlobalDTPSSimplificado(UsuarioActual.CveEmpresa) = Nothing
+        'Dim ObjPS As New ClsProductosServicios

-        If ObjPS.GetPSSimplificado(-1) Then Application("GlobalDTPSSimplificado") = ObjPS.DtResultados.AsEnumerable()
+        'If ObjPS.GetPSSimplificado(-1) Then Application("GlobalDTPSSimplificado") = ObjPS.DtResultados.AsEnumerable()

-        ObjPS.Dispose()
+        'ObjPS.Dispose()
    End Sub