-columna de getcliente
This commit is contained in:
@@ -177,6 +177,11 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
|
||||
Private Function GetClientes(ByVal context As HttpContext) As String
|
||||
Dim retorno As String = ""
|
||||
Dim DtRetorno As DataTable = Nothing
|
||||
Dim ColumnaNombre As String = "NombreComercial"
|
||||
'Abreviaturas. N. Nombre, NC. NombreComercial,...
|
||||
If IfNull(context.Request("ColTexto"), "") = "N" Then
|
||||
ColumnaNombre = "Nombre"
|
||||
End If
|
||||
|
||||
Dim usuario As Usuario = UsuarioActual(context)
|
||||
Dim CveEmpresa As String
|
||||
@@ -209,7 +214,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
If DtRetorno IsNot Nothing AndAlso DtRetorno.Rows.Count > 0 Then
|
||||
DtRetorno.Columns("CveCliente").ColumnName = "id"
|
||||
DtRetorno.Columns("NombreComercial").ColumnName = "text"
|
||||
DtRetorno.Columns(ColumnaNombre).ColumnName = "text"
|
||||
retorno = JsonConvert.SerializeObject(DtRetorno).ToString
|
||||
context.Response.Write(retorno)
|
||||
Else
|
||||
|
||||
Reference in New Issue
Block a user