Many of the examples in this document use A123456.SORT.SAMPIN, A123456.SORT.SAMPADD, and A123456.SORT.BRANCH as input data sets, and A123456.SORT.SAMPOUT as an output data set. If you want to try the examples in this document that use these data sets, create your own userid.SORT.SAMPIN, userid.SORT.SAMPADD, userid.SORT.BRANCH and userid.SORT.SAMPOUT data sets with your own userid by running the ICEDCRE job that follows.
Substitute your own JOB statement for the ICEDCRE JOB statement. Substitute your own userid for 'userid' in the four DD statements.
If you use a JOBLIB or STEPLIB to run DFSORT jobs, add it to the ICEDCRE job. If you prefer a value for UNIT other than SYSALLDA, change that parameter in the DD statements. Add a VOL=SER=vvvvvv parameter to the DD statements, if appropriate.
//ICEDCRE JOB A492,PROGRAMMER
//SAMPCOPY EXEC PGM=ICESAMP,PARM=(BOOKS)
//SYSPRINT DD SYSOUT=*
//SAMPLE DD DSN=userid.SORT.SAMPIN,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=173,BLKSIZE=1730),
// UNIT=SYSALLDA
//*
//ADD DD DSN=userid.SORT.SAMPADD,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=173,BLKSIZE=1730),
// UNIT=SYSALLDA
//*
//OUTPUT DD DSN=userid.SORT.SAMPOUT,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=173,BLKSIZE=1730),
// UNIT=SYSALLDA
//*
//BRANCH DD DSN=userid.SORT.BRANCH,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=33,BLKSIZE=330),
// UNIT=SYSALLDA
//*
//SYSIN DD DUMMY
//SORTIN DD DSN=A123456.SORT.SAMPIN,DISP=SHR
//SORTIN DD DSN=userid.SORT.SAMPIN,DISP=SHR