PV. mostrar solo clientes distribuidores

Ashx/SIGWeb.ashx

@@ -559,6 +559,8 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
             ColumnaNombre = "Nombre"
         End If
 
+        Dim EsDistribuidor As Integer = IfNull(context.Request("esdistribuidor"), "-1").ToString.ToEntero
+
         Dim usuario As Usuario = UsuarioActual(context)
         Dim CveEmpresa As String
         If IsNothing(usuario) Then
@@ -584,6 +586,10 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
 
             Dim dt As DataTable = DirectCast(context.Application(AppNombre), DataTable) '.FiltraParametros(String.Format("CveEmpresa = {0}", CveEmpresa))
             If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
+                If EsDistribuidor <> -1 Then
+                    dt = dt.FiltraParametros(String.Format("EsDistribuidor = {0} ", CBool(EsDistribuidor)))
+                End If
+
                 DtRetorno = dt.FiltraParametros(String.Format("NombreComercial like '%{0}%' OR Nombre like  '%{0}%'  ", Name))
             End If
             dt.Dispose()