Re: Sending ESC codes to a HP5 printer

[Vernon Hamberg <hambergv@xxxxxxxxxxxxxx>]

Carl

At 09:14 PM 1/27/1998 -0500, you wrote:
>Does anyone have any experience sending ESC codes to a HP5 (PLC5) printer
>to select a bin.  I need to know how to do this in RPG.  I know what the
>esc seq should be, just don't know exactly how to send it to the printer.

We do lots of PCL to HP printers. Sending the ESC (x'1B') code causes
problems.  You can get around this by creating a WSCST (workstation
customization object) with a translation table (:EBCASCTBL) section. You
need to select one of the characters to represent your ESC code (we use
EBCDIC x'9e' or some such). You put the table after the
:ASCCPINFO.—:EASCCPINFO. section.

Use RTVWSCST to get the source. You get the same list of manufacturer/model
values you get in CRTPRTF. Then insert the table section as stated above.
Finally, use CRTWSCST to create a new one. Set mfrmdl in CRT/CHGPRTF to
*WSCST and specify your nes WSCST in the WSCST parameter.

Here's the table I'm using.

:EBCASCTBL.                                                 
:EBCASCTBLE                                                 
  EBCDICCP= 37                                              
  ASCIICP= 437                                              
  DATA=                                                     
 /* Code point x'9e' (Æ) changed from x'00' to x'1b' (Æ) */
 /* This will convert Æ to the ASCII escape code         */
 /* -0-1-2-3-4-5-6-7-8-9-A-B-C-D-E-F */
   '2020838485A0A68687A49B2E3C282B7C'X      /* 04- */
   '268288898AA18C8B8DE121242A293BAA'X      /* 05- */
   '2D2F838E85A0A68F80A57C2C255F3E3F'X      /* 06- */
   '6F9088898AA18C8B8D603A2340273D22'X      /* 07- */
   'ED616263646566676869AEAF647900F1'X      /* 08- */
   'F86A6B6C6D6E6F707172A6A791001B00'X      /* 09- */
   'E67E737475767778797A7DADA8445900'X      /* 0A- */
   '5E9C9DFA001514ACAB005B5D00DB27DD'X      /* 0B- */
   '7B41424344454647484900939495A2A7'X      /* 0C- */
   '7D4A4B4C4D4E4F50515200968197A398'X      /* 0D- */
   '5CF6535455565758595AFD939995A2DC'X      /* 0E- */
   '3031323334353637383900969A97A300'X.     /* 0F- */
 :EEBCASCTBL.

Give a holler if you need more info. Otherwise, there's a manual on
Workstation Customization, as well as the Printing III & IV redbooks.

HTH

Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN  55401-2499
(612) 371-1111 x480


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---