[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: Initial value for a longchar to contain a json

[OctavioOlguin]

Neither, using oposite thick and quotes, would succed DEFINE TEMP-TABLE ttEncoder FIELD valor AS INTEGER FIELD coded AS CHAR. DEFINE VARIABLE lcTable AS LONGCHAR NO-UNDO INITIAL "{'ttEncoder':[ {'valor':1 ,'coded':'um'}, {'valor':2 ,'coded':'xy'}, {'valor':3 ,'coded':'st'}, {'valor':4 ,'coded':'et'}, {'valor':5 ,'coded':'eg'}, {'valor':6 ,'coded':'ue'}, {'valor':7 ,'coded':'fy'}, {'valor':102 ,'coded':'hy'}, {'valor':103 ,'coded':'fz'}]}". TEMP-TABLE ttEncoder:READ-JSON('LONGCHAR', lcTable). FOR EACH ttEncoder: DISPLAY ttEncoder. END.

Continue reading...