From 0d9f0112ee2698dfb6429e2b62b35f68cda21b87 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 22 Mar 2021 07:55:16 -0700
Subject: [PATCH] parametro promociones

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

diff --git a/Ashx/SIGFacturacion.ashx b/Ashx/SIGFacturacion.ashx
index cf37bb840..a47aae2e8 100644
--- a/Ashx/SIGFacturacion.ashx
+++ b/Ashx/SIGFacturacion.ashx
@@ -409,7 +409,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
 
             'VALIDA PROMOCIONES Y EXISTENCIAS
             Dim ObjVentas As New ClsVentas
-            If ObjVentas.GetPromocionesPS(-1, Now, CveSubProyecto, ObjFactura.CveCliente, ObjFactura.CveVendedor, UsuarioActual.CveEmpresa) Then
+            If ObjVentas.GetPromocionesPS(-1, Now, CveSubProyecto, ObjFactura.CveCliente, ObjFactura.CveVendedor,  1, UsuarioActual.CveEmpresa) Then
                 ObjFactura.DtPromociones = ObjVentas.DtResultados.Copy()
             End If