Xerox Printer User Manual page 81

//LOGONIDX
//*
/*JOBPARM
//STEP1
//STEPLIB
//
//
//SYSPRINT
//SYSTERM
//*
//*
//XFLOG
//*
//XFFSL
//*
//XFINP
//
//*
//XFIFF
//
//*
//*
//XFFRM
//
//XFTMP
//
//*
//*
//*
//XSFNTATT
//*
//XSFORMS
//*
//XSFRMATT
//XSSUPTAB
//*
//*
//STEP2
//STEPLIB
//
//SYSPRINT
//SYSTERM
//XSUACTL
//XSFONTS
//XSFNTATT
//XSFORMS
//XSFRMATT
//XSSUPTAB
//ddnamea
//
//XSUIN
//*
HOST FORMS DESCRIPTION LANGUAGE 3.2 FOR IBM MVS CREATING FORMS
Figure 5–10.
JOB 'RUN HFDL COMPILER',REGION=8M user job card parameters
LINE=0
EXEC PGM=HFDL32,PARM='COMPILE FSL=XFFSL(XVERL) LIST OBJECT'
DD DSN=HFDL.V3R2M00.LOAD,DISP=SHR
DD DSN=XPRM.V3R2M00.SASCRDLB.C550,DISP=SHR
DD DSN=XPRM.V3R2M00.LOAD,DISP=SHR
DD SYSOUT=*
DD SYSOUT=*
****The following data sets are specific to the form compiler
----Condition codes log for all files compiled
DD SYSOUT=*
----the fsl source file is a customer defined pds or seq
DD DSN=HFDL.SOURCE.FSL,DISP=SHR
----the inp file is a temporary file
DD DSN=&&INP,DISP=(NEW,PASS),UNIT=SYSDA,
SPACE=(TRK,(10,1)),DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
----the iff file is a temporary file
DD DSN=&&IFF,DISP=(NEW,PASS),UNIT=SYSDA,
SPACE=(TRK,(10,1)),DCB=(RECFM=FB,LRECL=320,BLKSIZE=10240)
----The compiled forms are temporary files until stored
in the database
DD DSN=&&FRM,DISP=(NEW,PASS),UNIT=SYSDA,
SPACE=(TRK,(10,10,10)),DCB=(RECFM=F,LRECL=128,BLKSIZE=128)
DD DSN=&&TMP,DISP=(NEW,PASS),UNIT=SYSDA,
SPACE=(TRK,(10,1)),DCB=(RECFM=FB,LRECL=320,BLKSIZE=10240)
****The following data sets are the resource data sets
---- XSFNTATT is a VSAM dataset containing FONT and LOGO
ATTRIBUTES
DD DSN=XPRM.V3R2M00.XSFNTATT,DISP=SHR
---- XSFORMS is a VSAM dataset containing FORMS
DD DSN=XPRM.V3R2M00..XSFORMS,DISP=SHR
---- XSFRMATT is a VSAM dataset containing FORM ATTRIBUTES
DD DSN=.XPRM.V3R2M00.XSFRMATT,DISP=SHR
DD DSN=.XPRM.V3R2M00.XSSUPTAB,DISP=SHR
****THE FOLLOWING JCL IS FOR DOWNLOAD AND SAMPLE
EXEC PGM=XPRMUTIL,COND=(8,LE,STEP1)
DD DSN=XPRM.V3R2M00.LOAD,DISP=SHR
DD DSN=XPRM.V3R2M00.SASCRDLB.C500,DISP=SHR
DD SYSOUT=*
DD SYSOUT=*
DD SYSOUT=*
DD DSN=XPRM.V3R2M00.XSFONTS,DISP=SHR
DD DSN=XPRM.V3R2M00.XSFNTATT,DISP=SHR
DD DSN=XPRM.V3R2M00.XSFORMS,DISP=SHR
DD DSN=XPRM.V3R2M00.XSFRMATT,DISP=SHR
DD DSN=XPRM.V3R2M00.XSSUPTAB,DISP=SHR
DD SYSOUT=*,DCB=(RECFM=FBA),
DEST=prtrid
DD *
REPRO FORM WHERE(NAME=XVERL) OUTDEV(HCPRNTR) SAMPLE;
MANAGING AND PRINTING SAMPLE FORMS
Downloading and printing a sample
ACTIVITY LOG
5–11