Xerox Xerox Printer Access Facility (XPAF) Support & Software Guía Del Usuario
XFG compiler JCL
Figure 6–1 shows an example of the JCL you use to compile a form and store it in
the database. This JCL may be found in the XPFSAMP library as member
XOAFSAMP.
XOAFSAMP.
Figure 6–1. Invoking the XFG compiler
//user$XO JOB (D498,340),'XOAF BATCH',CLASS=S,MSGCLASS=Y,
// REGION=4000K,NOTIFY=&SYSUID
//*
//* THIS JOB EXECUTES A BATCH XOAF JOB
//*
//XOAFBAT PROC
//*
//* RUN XOAF
//XOAF EXEC PGM=XOASUP00,REGION=2048K,PARM=&SYSUID
//STEPLIB DD DISP=SHR,DSN=your.hlq.XPFLOAD
//XINPARM DD DISP=SHR,DSN=your.hlq.XINPARM
//TABLELIB DD DISP=SHR,DSN=your.hlq.TABLELIB
//XOAPRINT DD SYSOUT=X,DCB=(RECFM=FB,LRECL=121,BLKSIZE=6050)
//UJLLIST DD SYSOUT=X
//SYSPRINT DD SYSOUT=X
//XPAFXLOG DD DISP=SHR,DSN=your.hlq.xoaf.XLOG
//SYSABEND DD SYSOUT=*
//*
//* ***** FOLLOWING FOR XPDL *****
//CON DD DISP=SHR,DSN=your.hlq.XPDLCNF
//MSG DD DISP=SHR,DSN=your.hlq.XPDLMSG
//INVXLT DD DISP=SHR,DSN=your.hlq.INVXLT
//PCCFIL DD DISP=SHR,DSN=your.hlq.PCCFIL
//TYPFIL DD DISP=SHR,DSN=your.hlq.TYPFIL
//XPDLDFT DD DISP=SHR,DSN=your.hlq.XPDLDFT
// PEND
//*
//* ========> RUN XOAF <========
//*
//XOAF EXEC XOAFBAT
//XOAF.CFONTLIB DD DISP=SHR,DSN=your.hlq.CFONTLIB
//XOAF.CLOGOLIB DD DISP=SHR,DSN=your.hlq.LOGOLIB
//XOAF.XOAIN DD *
COMPILE FORM('xxx.FSLLIB(BANF)') TO('your.hlq.CFORMLIB')
/*
//*
//* THIS JOB EXECUTES A BATCH XOAF JOB
//*
//XOAFBAT PROC
//*
//* RUN XOAF
//XOAF EXEC PGM=XOASUP00,REGION=2048K,PARM=&SYSUID
//STEPLIB DD DISP=SHR,DSN=your.hlq.XPFLOAD
//XINPARM DD DISP=SHR,DSN=your.hlq.XINPARM
//TABLELIB DD DISP=SHR,DSN=your.hlq.TABLELIB
//XOAPRINT DD SYSOUT=X,DCB=(RECFM=FB,LRECL=121,BLKSIZE=6050)
//UJLLIST DD SYSOUT=X
//SYSPRINT DD SYSOUT=X
//XPAFXLOG DD DISP=SHR,DSN=your.hlq.xoaf.XLOG
//SYSABEND DD SYSOUT=*
//*
//* ***** FOLLOWING FOR XPDL *****
//CON DD DISP=SHR,DSN=your.hlq.XPDLCNF
//MSG DD DISP=SHR,DSN=your.hlq.XPDLMSG
//INVXLT DD DISP=SHR,DSN=your.hlq.INVXLT
//PCCFIL DD DISP=SHR,DSN=your.hlq.PCCFIL
//TYPFIL DD DISP=SHR,DSN=your.hlq.TYPFIL
//XPDLDFT DD DISP=SHR,DSN=your.hlq.XPDLDFT
// PEND
//*
//* ========> RUN XOAF <========
//*
//XOAF EXEC XOAFBAT
//XOAF.CFONTLIB DD DISP=SHR,DSN=your.hlq.CFONTLIB
//XOAF.CLOGOLIB DD DISP=SHR,DSN=your.hlq.LOGOLIB
//XOAF.XOAIN DD *
COMPILE FORM('xxx.FSLLIB(BANF)') TO('your.hlq.CFORMLIB')
/*
XPAF Forms Generator
59
User Guide and Reference