From 18662507f442c7a73ff1c18ea4c476a8d52bb556 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 14 Sep 2022 14:11:52 -0700
Subject: [PATCH] -- toma funcionalidad ahora, en lugar de los cveempresas

---
 Ashx/SIGWeb.ashx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx
index 9afe72256..b78140971 100644
--- a/Ashx/SIGWeb.ashx
+++ b/Ashx/SIGWeb.ashx
@@ -959,7 +959,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
             Dim UsaGlobal As Boolean = True
 
             'verifica existencias
-            If Pagina.Contiene("ventas/ventas", "oc/oc", "inv/traspaso") AndAlso CveEmpresa.Contiene(72, 80, 119, 140, 141, 152, 153, 159, 160, 161, 162, 163, 166) Then
+            If Pagina.Contiene("ventas/ventas", "oc/oc", "inv/traspaso") AndAlso usuario.Empresa.Funcionalidad(141) = "1" Then
                 UsaGlobal = False
 
                 'If CveEmpresa.Contiene(140, 141) And Pagina.Contiene("ventas/ventas") Then