The Legac-e Information Site

Sample Job Stream

The Sample Job Stream opposite will be used to explain the allocation of the following resources:

• Processor Occupancy via either JOB or EXEC statements.
• Memory assignment via eithet JOB or EXEC statements.
• Peropheral allocation via DD statements.

The IF / ENDIF statements have nothing to do with resource allocation, they are there to determine whether the second EXEC statement is performed based on the outcome from the first EXEC statement.

Sample Job

//ZOSSTU1S JOB CLASS=A,NOTIFY=&SYSUID,REGION=8M,MSGCLASS=X. // TIME=4 //S1 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=&SYSUID..MASTER(0),DISP=SHR //SYSUT2 DD DSN=&SYSUID..MASTER(+1),DISP=(,CATLG,DELETE), // UNIT=SYSDA,SPACE=(TRK,(1,1)), // LRECL=80,RECFM=FB,BLKSIZE=0 //SYSIN DD DUMMY // IF (RC = 0 & ¬ABEND) THEN //S2 EXEC PGM=SORT //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR //SYSOUT DD SYSOUT=* //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,5,,CONTIG) //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,5,,CONTIG) //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,5,,CONTIG) //SORTIN DD DSN=*.S1.SYSUT2,DISP=SHR //SORTOUT DD DSN=&SYSUID..MASTER(+2),DISP=(,CATLG,DELETE), // UNIT=SYSDA,SPACE=(TRK,(1,1)), // LRECL=80,RECFM=FB,BLKSIZE=0 //SYSIN DD * SORT FIELDS=(1,6,PD,D) // ENDIF