ASCII table in Progress…

DEFINE VARIABLE i_cont AS INTEGER.
DEFINE VARIABLE c_character AS CHARACTER FORMAT “x(10)” EXTENT 255.

DO i_cont = 1 TO 255:
ASSIGN c_character[i_cont] = STRING(i_cont) + ‘ – ‘ + CHR(i_cont).
END.

DISPLAY c_character WITH NO-LABELS TITLE ” ASCII Table “.

see u…