-- toma funcionalidad ahora, en lugar de los cveempresas

This commit is contained in:
2022-09-14 14:11:52 -07:00
parent 28ae2554d4
commit 18662507f4

View File

@@ -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