[progress Communities] [progress Openedge Abl] Forum Post: Re: Method Add-fields-from...

[Dileep Dasa]

Try removing space between comma and column name when you define cSkipList variable. This should work. Code after removing space: DEF VAR hTempTable AS HANDLE NO-UNDO. DEF VAR cTableName AS CHAR NO-UNDO INIT "Customer". DEF VAR cSkipList AS CHAR NO-UNDO INIT "Fax,Comments". DEF VAR hBuffer AS HANDLE NO-UNDO. DEF VAR lii AS INT NO-UNDO. /* Create TEMP-TABLE */ CREATE TEMP-TABLE hTempTable. hTempTable:ADD-FIELDS-FROM(cTableName, cSkipList). hTempTable:TEMP-TABLE-PREPARE(cTableName). hBuffer = hTemptableEFAULT-BUFFER-HANDLE. REPEAT lii = 1 TO hBuffer:NUM-FIELDS: DISP SUBST("&1. &2", lii, hBuffer:BUFFER-FIELD (lii):NAME). END.

Continue reading...