From f53dc040c2af42edf6c6772e7f8b868058714e3e Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Tue, 29 Sep 2020 15:55:29 -0700
Subject: [PATCH] Validacion en WS

---
 asmx/WSApp.asmx | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/asmx/WSApp.asmx b/asmx/WSApp.asmx
index fa5c03748..7917b12e9 100644
--- a/asmx/WSApp.asmx
+++ b/asmx/WSApp.asmx
@@ -548,15 +548,19 @@ Public Class WSApp
                 Salida.CveSubProyecto = UsuarioActual.CveSubProyecto
                 Salida.Procesos = UsuarioActual.Procesos.Values.Cast(Of String).ToList()
 
-                If ObjClientes.GetClientes(UsuarioActual.CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
+                If UsuarioActual.CveCliente > 0 AndAlso ObjClientes.GetClientes(UsuarioActual.CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
                     If ObjClientes.DtResultados.Rows.Count > 0 Then
                         Salida.Cliente = ObjClientes.Nombre
                         Salida.CvePrecioLista = ObjClientes.CvePrecioLista
-                        Salida.CveEstatusCliente = If(ObjClientes.Estatus, 1, 0)
-                    End If
-                End If
-
-                retorno = JsonConvert.SerializeObject(Salida)
+                        Salida.CveEstatusCliente = If(ObjClientes.Estatus, 1, 0)
+
+                        retorno = JsonConvert.SerializeObject(Salida)
+                    End If
+                Else
+                    retorno = "{}"
+                End If
+
+
             Else
                 retorno = "{}"
             End If