Hi John & Jim & Everyone Else :)
     I did this in a COBOL program about 7 years ago ... I wanted a nice
graphical double line box around a page header ... I believe I just loaded
variables with CHR(???) values and then moved those to the output record
buffer and printed it... I think this worked fairly well...

'course my memory seems to be failing these days and I keep trying to use
COBOL commands in Clipper programs and SuprTool commands in DOS Batch files
so... you are warned :) hehehe

Art "looking forward to the weekend :) " Bahrs




Jim,

You could try the DEL character, 127, %177 in COBOL. This is not
completely solid but might work for your application. Otherwise you can
use a PCL fill sequence.

Esc *c100a100b0P will create a solid black box, 100 x 100 pixels at the
current cursor position. You can vary the width "100a" and height "100b"
to a size that works for you.

Hope this helps
John Zoltak
North American Mfg Co

-----Original Message-----
From: Jim Gilbert [mailto:[log in to unmask]]
Sent: Friday, January 08, 1999 3:11 PM
To: [log in to unmask]
Subject: [HP3000-L] Printing block characters


Hello listers,

I need to be able to print a solid block character on an HP 4si from a
Cobol program.  The application is for filling in bubbles on a scantron
from.

Anyone done this before?

Thanks,

Jim