From 6050c2b9cc2012abb443eda68fb6836cc78603ab Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Thu, 25 Mar 2021 10:01:15 -0700
Subject: [PATCH] Cambio para poder mostrar el nombre de empresaCRM en reporte
 de cotizacion

---
 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 990a3e2f5..ccf04fdcb 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -6617,7 +6617,7 @@ Public Class ClsPaginas
 
 
             'CLIENTE 
-            If Vta.CveCliente.ToEntero > 0 Then
+            If Vta.CveCliente.ToEntero > 0 Or Vta.CveEmpresaCRM.ToEntero > 0 Then
                 params.Add(New ReportParameter("ClienteCodigo", Vta.Cliente.Codigo))
                 params.Add(New ReportParameter("ClienteNombre", If(Vta.ClienteSucursal.ImprimeNombreSucursal = "True", If(Vta.CveClienteSucursal > 0, Vta.ClienteSucursal.Sucursal, Vta.Cliente.Nombre), If(Vta.AtencionA <> "" AndAlso Vta.TipoDocto.Contiene("Ing", "Rem") AndAlso Vta.Cliente.RFC = "XAXX010101000", $"{Vta.Cliente.Nombre}({Vta.AtencionA})", Vta.Cliente.Nombre))))
                 params.Add(New ReportParameter("ClienteDireccion", ClienteDireccion))