From 3cec2b3bcc5c44e2c07672ff8ed7fde28516b237 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 19 Mar 2021 02:46:57 -0700
Subject: [PATCH] Cambio para recibir parametro de kilometraje

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

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 6cd4de4c4..990a3e2f5 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -7170,7 +7170,7 @@ Public Class ClsPaginas
             Dim rds5 As New ReportDataSource With {.Name = "DataSet5", .Value = If(Vta.DtNCVinculadas IsNot Nothing, Vta.DtNCVinculadas, New DataTable)} ' sino esta creado el objeto, lo creamos, para que no truene el reporte
             lrds.Add(rds5)
 
-            If UsuarioActual.CveEmpresa.Contiene(141, 152) AndAlso (RutaFormato.Contains("Factura") Or RutaFormato.Contains("Cotizacion")) Then
+            If UsuarioActual.CveEmpresa.Contiene(141, 152, 159, 160, 161, 162, 163) AndAlso (RutaFormato.Contains("Factura") Or RutaFormato.Contains("Cotizacion")) Then
                 params.Add(New ReportParameter("Kilometraje", Vta.Kilometraje.ToString))
             End If
             'Imprime los parametros