AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

limpieza de getclientes

Browse Source
This commit is contained in:
rrene
2021-09-24 14:40:56 -07:00
parent 48c4370fa0
commit 2a4135d461
1 changed files with 10 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Ashx/SIGWeb.ashx
View File

@@ -600,6 +600,15 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
End If End If
If DtRetorno IsNot Nothing AndAlso DtRetorno.Rows.Count > 0 Then If DtRetorno IsNot Nothing AndAlso DtRetorno.Rows.Count > 0 Then
Dim i As Integer = 0 'limpieza de columnas
While i < DtRetorno.Columns.Count
If Not DtRetorno.Columns(i).ColumnName.Contiene("CveCliente", ColumnaNombre) Then
DtRetorno.Columns.RemoveAt(i)
Else
i = i + 1
End If
End While
DtRetorno.Columns("CveCliente").ColumnName = "id" DtRetorno.Columns("CveCliente").ColumnName = "id"
DtRetorno.Columns(ColumnaNombre).ColumnName = "text" DtRetorno.Columns(ColumnaNombre).ColumnName = "text"
retorno = JsonConvert.SerializeObject(DtRetorno).ToString retorno = JsonConvert.SerializeObject(DtRetorno).ToString
@@ -913,7 +922,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
DtPSRetorno = DTTmp.Copy DtPSRetorno = DTTmp.Copy
Else Else
'no regresar datos herror al consultar 'no regresar datos error al consultar
DtPSRetorno.Clear() DtPSRetorno.Clear()
End If End If
DTTmp.Dispose() DTTmp.Dispose()