Re: Special char printing

In article <2h6fdk$t22@david.wheaton.edu> bernha@wheaton (Todd A Bernhardt) writes: >In article <2h4dqjINN2jm@emory.mathcs.emory.edu>, >Con Woodall <cwoodall@vth1.vth.colostate.edu> wrote: >>4gl report writing under unix-special printing to HP deskjet 500 (or >>probably any other printer). > >...stuff deleted... > >>Using 4gl output commands of >> print column 11, String 1, >> column 71, String_2 > >We have several reports in which we use embedded escapes that work great. >(We print mainly to HP Laserjets series II or greater.) I don't know >what your String_1 looks like, but the way we do it is as follows: > > print column 11, "Such and such ", > print ASCII 27, "(S3b", { Bold on } > print column 41, "on and on.", > print ASCII 27, "(S0b" { Bold off } > >These escape sequinces may or may not coorespond to actual sequences, >but proceding in this fashion has worked for us. I do the same, but define variables for the items: define variable COMPRESS char(20) variable RESET char(20) end format ... let COMPRESS = ascii 143 {more than 1 ascii code= ascii 143, ascii 144,...} let RESET = ascii 146 ... print COMPRESS; print col 1,"this and that"; print RESET Bob Beaulieu bobb@netcom.com