Xerox Printer manual Downloading and printing a sample, Xsuin

			MANAGING AND PRINTING SAMPLE FORMS
		Figure 5±10.	Downloading and printing a sample
	//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 FOLLOWING JCL IS FOR DOWNLOAD AND SAMPLE
//STEP2	EXEC PGM=XPRMUTIL,COND=(8,LE,STEP1)
//STEPLIB	DD	DSN=XPRM.V3R2M00.LOAD,DISP=SHR

//DD DSN=XPRM.V3R2M00.SASCRDLB.C500,DISP=SHR

//SYSPRINT DD SYSOUT=*

//SYSTERM	DD	SYSOUT=*
//XSUACTL	DD	SYSOUT=*	ACTIVITY LOG
//XSFONTS	DD	DSN=XPRM.V3R2M00.XSFONTS,DISP=SHR
//XSFNTATT	DD	DSN=XPRM.V3R2M00.XSFNTATT,DISP=SHR
//XSFORMS	DD	DSN=XPRM.V3R2M00.XSFORMS,DISP=SHR
//XSFRMATT	DD	DSN=XPRM.V3R2M00.XSFRMATT,DISP=SHR
//XSSUPTAB	DD	DSN=XPRM.V3R2M00.XSSUPTAB,DISP=SHR
//ddnamea	DD	SYSOUT=*,DCB=(RECFM=FBA),

//DEST=prtrid

//XSUIN	DD *
	REPRO FORM WHERE(NAME=XVERL) OUTDEV(HCPRNTR) SAMPLE;
//*

HOST FORMS DESCRIPTION LANGUAGE 3.2 FOR IBM MVS CREATING FORMS 5±11