HOST FORMS DESCRIPTION LANGUAGE
Figure 5–9 shows an example of the JCL you use to compile a
form and store it in the database.
Figure 5–9. Invoking the HFDL compiler
//LOGONIDX JOB ’RUN HFDL COMPILER’,REGION=8M user job card parameters
//*
/*JOBPARM LINE=0
//STEP1 EXEC PGM=HFDL32,PARM=’COMPILE FSL=XFFSL(XVERL) LIST OBJECT’
//STEPLIB DD DSN=HFDL.V3R2M00.LOAD,DISP=SHR
// DD DSN=XPRM.V3R2M00.SASCRDLB.C550,DISP=SHR
// DD DSN=XPRM.V3R2M00.LOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//* ****The following data sets are specific to the form compiler
//* ----Condition codes log for all files compiled
//XFLOG DD SYSOUT=*
//* ----The fsl source file is a customer defined pds or seq
//XFFSL DD DSN=HFDL.SOURCE.FSL,DISP=SHR
//* ----The inp file is a temporary file
//XFINP 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
//XFIFF 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
//XFFRM DD DSN=&&FRM,DISP=(NEW,PASS),UNIT=SYSDA,
// SPACE=(TRK,(10,10,10)),DCB=(RECFM=F,LRECL=128,BLKSIZE=128)
//XFTMP 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
//XSFNTATT DD DSN=XPRM.V3R2M00.XSFNTATT,DISP=SHR
//* ---- XSFORMS is a VSAM dataset containing FORMS
//XSFORMS DD DSN=XPRM.V3R2M00.XSFORMS,DISP=SHR
//* ---- XSFRMATT is a VSAM dataset containing FORM ATTRIBUTES
//XSFRMATT DD DSN=XPRM.V3R2M00.XSFRMATT,DISP=SHR
//XSSUPTAB DD DSN=XPRM.V3R2M00.XSSUPTAB,DISP=SHR
//*
//* *****THE JCL FOR DOWNLOAD AND SAMPLE VIA XPRMUTIL GOES HERE
Downloading and printing a sample
If you want to download and print a sample of the form, run the
XPRMUTIL job step immediately following the compile step.
Figure 5–10 shows an example of a JCL you use to compile,
store, download, and sample a form on the printer.
5–10 HOST FORMS DESCRIPTION LANGUAGE 3.2 FOR IBM MVS CREATING FORMS