In the following example, CTJVER verifies the control statements in SORT.
Sort has several aliases that can be used in JCL.
Figure JV22 SORT - Example 9
//K68TALL JOB ,K68,MSGCLASS=X,CLASS=A,
// NOTIFY=N18
//*
//SORT EXEC PGM=SORT PARM='MSGDDN=MSGDD'
//*
//SORTIN DD DISP=SHR,DSN=CTJP.SORT.CTMDAILY.SYSOUT
//SORTOUT DD SYSOUT=*
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSOUT DD SYSOUT=*
//MSGDD DD SYSOUT=*
//DFSPARM DD *
OPTION MSGDDN=MSGDD
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(11,7,CH,EQ,C'JOB501I',AND,19,1,CH,NE,C'*')
RECORD TYPE=F
OPTION DYNALLOC=SYSDA
OUTFIL OUTREC=(18,97)
OPTION NOOPTIONS
Parent Topic |