Article 169040 of comp.os.vms:
Are those tables printed or do you want to display them
on a terminal?
On a VT terminal, you could use the SMG$ library.
You could also use the graphics character set, as in the
DCL example below:

$ esc[0,8] = %X1B
$ say :== write sys$output
$ say "jklmopqrstuvwx"
$ say "''ESC'(0"
$ say "jklmopqrstuvwx"
$ say "lqqqqwqqqqqqqqk"
$ say "x    x        x"
$ say "tqqqqj    lqqqu"
$ say "x         x   x"
$ say "mqqqqqqqqqvqqqj"
$ say "''ESC'(B"
$ exit

Christof
cz@iName.com
Reply-Address will not work!