PdfPrinter

page d'accueil
Boite à outils

Cette page a été mise à jour le 20 janvier 2009
Contact

Welcome page
Tools box

Versionning 


How to create a printer that produce a PDF file ?

To be tested !

To use the PDF transform on the iSeries, you require only Infoprint Server for iSeries (5722-IP1). 

Install Infoprint Server (library QIPS)

 

a converter


CRTPSFCFG PSFCFG(JPL/JPL)
PDFGEN(*STMF)
PDFDEVTYPE(*IP40300)
PDFPPRDWR1(*A4)
PDFPPRDWR2(*A4)
PDFDIR('/jpl/pdf')
TEXT('Convertisseur Spoule en PDF')
+?
RLSTMR(*SEC15)
PDFGEN(*STMF)

a writer


CRTDEVPRT DEVD(PRTJPL)
DEVCLS(*LAN)
TYPE(*IPDS)
MODEL(0)
LANATTACH(*IP)
AFP(*YES)
PORT(11002)
FONT(11)
RMTLOCNAME('127.0.0.1')
USRDFNOBJ(JPL/JPL *PSFCFG)
TEXT('Convertisseur Spoule en PDF')
+?
FORMFEED(*AUTOCUT)
SEPDRAWER(*FILE)
PRTERRMSG(*INQ)
MSGQ(*LIBL/QSYSOPR)
ACTTMR(*NOMAX)
IMGCFG(*NONE)
MAXPNDRQS(6)
PRTCVT(*YES)
FORMDF(*LIBL/F1C10110)
CHRID(*SYSVAL)
DEPLOCNAME(*NONE)')

an exit program


ADDEXITPGM EXITPNT(QIBM_QPQ_TRANSFORM)
FORMAT(XPDF0100)
PGMNBR(9974)
PGM(QIPS/QIPSINIT)
THDSAFE(*NO)
MLTTHDACN(*MSG)
PGMDTA(*JOB *CALC 'IPDS PDF') 

a runner job


STRPRTWTR DEV(PRTJPL) FORMTYPE(*ALL *NOMSG)

As soon as I have InfoPrint, I try