filtro clientes en app gps

2019-11-26 09:27:23 -07:00
parent 80d92d887d
commit b53abc0648
1 changed files with 1 additions and 1 deletions
--- a/asmx/WSGPSApp.asmx
+++ b/asmx/WSGPSApp.asmx
@@ -128,7 +128,7 @@ Public Class WSGPSApp
                    DtModulos = Nothing
                End If
                UsuarioRetorno.Modulos = UsuariosModulos
-                Dim DtClientes As DataTable = GlobalDTUsuarios(UsuarioActual.CveUsuario).FiltraParametros("CvePlataforma = 3 AND CveCliente > 0", "Empresa")
+                Dim DtClientes As DataTable = GlobalDTUsuarios(UsuarioActual.CveUsuario).FiltraParametros("CvePlataforma = 3 AND CveCliente IS NOT NULL", "Empresa")
                If DtClientes IsNot Nothing Then
                    If DtClientes.Rows.Count > 0 Then
                        For Each Row As DataRow In DtClientes.Rows