JCL Creating Output File

Problem Description

Write JCL that creates a new sequential dataset.

Expected Output

Creates MY.OUTPUT.FILE with specified attributes

Hints

Use DISP=(NEW,CATLG,DELETE) and DCB parameters.

Solution

//WRITEJOB JOB (ACCT),'CREATE FILE',CLASS=A //* //STEP01 EXEC PGM=WRITEPGM //OUTFILE DD DSN=MY.OUTPUT.FILE, // DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(10,5),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //SYSPRINT DD SYSOUT=* //

Explanation:

DISP=(NEW,CATLG,DELETE) creates, catalogs on success, deletes on failure.