From f5f11a026a650a7d0610cec4e383867736aab849 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 14 Dec 2021 13:07:48 -0700
Subject: [PATCH] =?UTF-8?q?direcciones=20env=C3=ADo=20E140?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/Ventas.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 3ce4c3d19..6ad1a74ea 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -5766,7 +5766,7 @@ Partial Class Ventas
                 End If
 
                 'HABILITA LA OPCION DE DIRECCION DE ENVIO
-                If UsuarioActual.CveEmpresa.Contiene(1, 72, 119) Then
+                If UsuarioActual.CveEmpresa.Contiene(1, 72, 119, 140) Then
                     trDireccionEnvio.Visible = True
                     CargaDireccionesEnvio()
                 End If