Do you use QEDIT to edit the files?

I have some settigs to help me edit newlines, escape chars.
In my QEDITMGR I have these settings
  SET ENDOFLINE "^"
  SET VIS BELL "ö"
  SET VIS ESC  "Æ"

The VIS settings show those "International" chars in the vi screen
when an escape or bell appear in the file.
This allows me to enter BELL or ESCAPE using those chars in visual mode.

Just wondering if something like that is affecting you.

Keven Miller



----- Original Message ----- 
From: Tom Hula
To: [log in to unmask]
Sent: Monday, January 19, 2015 02:25 PM
Subject: [HP3000-L] HP PCL Question


This is being done on an HP3000 in Cobol.

I'm making a change to a report that prints in PCL5. The field that was 
changed was already getting bolded
and that works fine. On a programming change from our customer, I am seeing 
fields like AQ004~ and B7003~.
In the existing program where I am trying to print this data, I am getting 
things like AQ004u and B7003u where
that "u" has two dots above it. International, in other words. Looks like u 
umlaut in German. Obviously, the
"~" symbol is some sort of PCL control character, but so far, I haven't been 
able to find the secret to making
just the "~" appear or even when or why I would specify the "~" character as 
a control character. It would
be nice if it was as simple as printing ~~ to make the ~ appear.

I'm actually taking three fields and the hyphens and putting them together 
like so...the field with the ~ on the end is the 2nd field:

                INITIALIZE PCL-15-BLOCK-STK-SEQ
                STRING PB-EDI-BLOCK DELIMITED BY SPACES
                "-" DELIMITED BY SIZE
                PB-EDI-STACK-ID DELIMITED BY SPACES
                "-" DELIMITED BY SIZE
                PB-EDI-STACK-SEQ DELIMITED BY SPACES
                INTO PCL-15-BLOCK-STK-SEQ

So I actually ended up with "005-AQ004u-002" on one line (u is u umlaut)
Tom Hula
Victor Barnes Company

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html * 

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *