From 3ca1573f40158c46630e9b0619db0cfd6476ad9a Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 23 Jul 2021 18:46:32 -0700
Subject: [PATCH] funcionalidad Llantera

---
 Ventas/Ventas.aspx.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index b7f318e2b..9b8ada6eb 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -2150,7 +2150,7 @@ Partial Class Ventas
                 DdlTipoComprobante.Items.Insert(DdlTipoComprobante.Items.Count, New ListItem("Autorización", "PA"))
             End If
 
-            If Not UsuarioActual.CveEmpresa.Contiene(141, 152, 159, 160, 161, 162, 163) Then
+            If Not UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
                 LnkAgregarCliente.Visible = False
             End If
 
@@ -2991,7 +2991,7 @@ Partial Class Ventas
         'UNA VEZ CARGADA LAS CONDICIONES DE PAGO INICIALMENTE, NO VUELVE A SOBREESCRIBIR EL VALOR
         CveFormaPago33Cliente = -1
 
-        If UsuarioActual.CveEmpresa.Contiene(141, 152, 159, 160, 161, 162, 163) Then
+        If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
             trRotacion.Visible = True
             trRotacionlbl.Visible = True
             trAlineacion.Visible = True