From d6bf4b03cad931c1e570c1b578e70cd079ea0cf7 Mon Sep 17 00:00:00 2001 From: Desarrollo2019 Date: Sat, 17 Aug 2019 11:49:02 -0700 Subject: [PATCH] Cambios Utilidad --- Ventas/RepVentasUtilidad.aspx.vb | 1 + Ventas/RepVentasUtilidadPadre.aspx.vb | 1 + 2 files changed, 2 insertions(+) diff --git a/Ventas/RepVentasUtilidad.aspx.vb b/Ventas/RepVentasUtilidad.aspx.vb index 9b9a2dabf..37669002e 100644 --- a/Ventas/RepVentasUtilidad.aspx.vb +++ b/Ventas/RepVentasUtilidad.aspx.vb @@ -41,6 +41,7 @@ Partial Class Ventas_RepVentasUtilidad Dim EsWS = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False) If EsWS Then DdlClientes.setEsWebService(True) + DdlClientes.SelectedValue = "-1" Else DdlClientes.setEsWebService(False) DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1) diff --git a/Ventas/RepVentasUtilidadPadre.aspx.vb b/Ventas/RepVentasUtilidadPadre.aspx.vb index 30b4771ed..638d8b5d5 100644 --- a/Ventas/RepVentasUtilidadPadre.aspx.vb +++ b/Ventas/RepVentasUtilidadPadre.aspx.vb @@ -46,6 +46,7 @@ Partial Class Ventas_RepVentasUtilidadPadre 'Carga Clientes If UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1" Then DdlClientesWS.setEsWebService(True) + DdlClientesWS.SelectedValue = "-1" Else DdlClientesWS.setEsWebService(False) DdlClientesWS.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1)