I found out why my overlay did not print. The PCL commands that set the
page length, size or orientation turn off the automatic overlay. I added
the command to reactivate the overlay in the WSCST and now it works. It
even adds this overlay if you have a printer file with an *OVL and you get
both.

Here is an example that prints "TEST TEST TEST" at right angle to the
spool text. I'll probably create a nicer background in my real macro.

Retrieve your current Host Print Transform configuration using the
RTVWSCST command.
Ex: RTVWSCST DEVTYPE(*TRANSFORM) MFRTYPMDL(*HP4) SRCMBR(HP4TEST)
SRCFILE(MYLIB/QTXTSRC)

Modify the generated WSCST source as follows:

:INITPRT
DATA ='1B451B26663058'X
'1B2A70307930581B266132373050'X
'544553542054455354205445535420'X
'1B266631783458'X.

First data line has tthe usual 1B45 to reset, the rest is the start macro
command.
Next two lines are the macro content:
first: set cursor to 0,0 and rotate print direction 270 degrees.
second: the text "TEST TEST TEST"
Last line ends the macro definition and activates it as an overlay.

Then modify the page tags to include the macro reactivation. In my test, I
changed only the page length command as it was the one HPT was generating,
but the page size tags probably need to be changed as well.

:PAGLENL
VAROFFSET= 3
VARLEN= 3
VARTYPE=CHRDEC
DATA ='1B266C00000050'X
'1B26663458'X.

The first line of data is the original config, I removed the period at the
end and added the second line that reactivates the macro as an overlay.

Create the WSCST object:
CRTWSCST WSCST(MYLIB/HP4TEST) SRCFILE(MYLIB/QTXTSRC)

Set the WSCST as a customization object for your printer (depends on how
you create the printer).

Now, when you print though that printer you should have TEST TEST TEST in
the upper left corner on the side.

Have a nice day.
Thierry.

AVERTISSEMENT CONCERNANT LA CONFIDENTIALITE

Ce message, incluant ses pieces jointes, est strictement reserve a l'usage de l'individu ou de l'entite a qui il est
adresse et contient de l'information privilegiee et confidentielle. La dissemination, distribution ou copie de cette
communication est strictement prohibee. Si vous n'etes pas le destinataire projete veuillez retourner
immediatement un courrier electronique a l'expediteur et effacez toutes les copies.


CONFIDENTIALITY WARNING

This message, including its attachments, is strictly intended for the use of the individual or the entity to which it is addressed
and contains privileged and confidential information. Disclosure, distribution or copy of this communication is strictly
prohibited. If you are not the intended recipient please notify us immediately by returning the e-mail to the originator and
deleting all copies.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].