From 4c12c860b112c2d9ceae9a57c49f00f92fc6267c Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Tue, 10 Aug 2021 21:12:48 -0700
Subject: [PATCH] validacion de timbrado  producto SAT  84111506 se agrega
 empresa 144 a

---
 App_Code/Timbrado.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb
index 9ddfc1944..25ac07be4 100644
--- a/App_Code/Timbrado.vb
+++ b/App_Code/Timbrado.vb
@@ -813,7 +813,7 @@ Public Class Timbrado
         'validación especial. 
         If Ventas.TipoDocto.Contiene("Ing", "Dev") Then
 
-            Dim CodigoIncorrecto = (From c In Ventas.Timbre.Conceptos Where (c.ClaveProdServ = "01010101") OrElse (c.ClaveProdServ = "84111506" AndAlso Not UsuarioActual.CveEmpresa.Contiene(2, 70))
+            Dim CodigoIncorrecto = (From c In Ventas.Timbre.Conceptos Where (c.ClaveProdServ = "01010101") OrElse (c.ClaveProdServ = "84111506" AndAlso Not UsuarioActual.CveEmpresa.Contiene(2, 70, 144))
                                     Select c.ClaveProdServ, c.Descripcion)
             Dim Str As New StringBuilder
             Str.Append("Los siguentes productos tienen especificado un código no permitido por el SAT: <br/>")