Hi,
I want to print reports and redirect output to a file or a PDF file using special characters to draw a box,
for example chr(218) for left upper corner, chr(191) right upper corner,chr(217) right lower corner, etc.
┌───┐
└───┘
I already found here that these special characters should be found in the IBM850 codepage, i try with the following code but it does't work.
DEF VAR ttt AS INTEGER.
Repeat ttt = 191 to 218:
DISP ttt CHR(ttt,"ibm850").
End.
Please, help.
I want to print reports and redirect output to a file or a PDF file using special characters to draw a box,
for example chr(218) for left upper corner, chr(191) right upper corner,chr(217) right lower corner, etc.
┌───┐
└───┘
I already found here that these special characters should be found in the IBM850 codepage, i try with the following code but it does't work.
DEF VAR ttt AS INTEGER.
Repeat ttt = 191 to 218:
DISP ttt CHR(ttt,"ibm850").
End.
Please, help.