diff --git a/asmx/WSSIGApp.asmx b/asmx/WSSIGApp.asmx
index 71ad666ea..9aaca8891 100644
--- a/asmx/WSSIGApp.asmx
+++ b/asmx/WSSIGApp.asmx
@@ -1867,7 +1867,7 @@ Public Class WSSIGApp
 
             'VALIDA PROMOCIONES Y EXISTENCIAS
             Dim ObjVentas As New ClsVentas
-            If ObjVentas.GetPromocionesPS(-1, Now, CveSubProyecto, CveCliente, ObjFactura.CveVendedor, UsuarioActual.CveEmpresa) Then
+            If ObjVentas.GetPromocionesPS(-1, Now, CveSubProyecto, CveCliente, ObjFactura.CveVendedor, 1, UsuarioActual.CveEmpresa) Then
                 ObjFactura.DtPromociones = ObjVentas.DtResultados
             End If
             ObjVentas.Dispose()
@@ -1951,13 +1951,13 @@ Public Class WSSIGApp
                     ObjFactura.UsoCFDI = GlobalDTSATUsosCFDI.FiltroPrimeroValor("Descripcion", $"CveUsoCFDI = {ObjCliente.CveUsoCFDI}")
                     ObjFactura.ClaveUsoCFDI = GlobalDTSATUsosCFDI.FiltroPrimeroValor("UsoCFDI", $"CveUsoCFDI = {ObjCliente.CveUsoCFDI}")
 
-                    ObjFactura.CveMetodoPago = ObjCliente.CveMetodoPago
-                    If GlobalDTMetodosPago.FiltraParametros($"CveMetodoPago = {ObjCliente.CveMetodoPago}").Rows.Count > 0 Then
-                        ObjFactura.MetodoPago = GlobalDTMetodosPago.FiltraParametros($"CveMetodoPago = {ObjCliente.CveMetodoPago}").Rows(0)("MetodoPago").ToString
-                    Else
-                        ObjFactura.CveMetodoPago = 1
-                        ObjFactura.MetodoPago = "Efectivo"
-                    End If
+                    'ObjFactura.CveMetodoPago = ObjCliente.CveMetodoPago
+                    'If GlobalDTMetodosPago.FiltraParametros($"CveMetodoPago = {ObjCliente.CveMetodoPago}").Rows.Count > 0 Then
+                    '    ObjFactura.MetodoPago = GlobalDTMetodosPago.FiltraParametros($"CveMetodoPago = {ObjCliente.CveMetodoPago}").Rows(0)("MetodoPago").ToString
+                    'Else
+                    '    ObjFactura.CveMetodoPago = 1
+                    '    ObjFactura.MetodoPago = "Efectivo"
+                    'End If
 
                     ObjFactura.CveClienteSucursal = -1
                 End If