From f62c3aa9ebb25c75ca2aa32fb0998c17dfb63556 Mon Sep 17 00:00:00 2001
From: Desarrollo2019 <Desarrollo2019@DESKTOP-F7RCSVR>
Date: Sat, 17 Aug 2019 11:45:03 -0700
Subject: [PATCH] DropDownLost Cliente Utilidad Padre

---
 Ventas/RepVentasUtilidadPadre.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ventas/RepVentasUtilidadPadre.aspx.vb b/Ventas/RepVentasUtilidadPadre.aspx.vb
index 83458643a..30b4771ed 100644
--- a/Ventas/RepVentasUtilidadPadre.aspx.vb
+++ b/Ventas/RepVentasUtilidadPadre.aspx.vb
@@ -44,7 +44,7 @@ Partial Class Ventas_RepVentasUtilidadPadre
         txtFechaF.Text = Now.LastDayOfMonth.ToShortDateString
 
         'Carga Clientes
-        If UsuarioActual.CveEmpresa = 119 Then
+        If UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1" Then
             DdlClientesWS.setEsWebService(True)
         Else
             DdlClientesWS.setEsWebService(False)