Code: Select all
//KC03F50A JOB 99999,'CREATE DATASET',
// MSGCLASS=H,MSGLEVEL=(1,1),
// REGION=4M,NOTIFY=KC03F50
//*
//STEP1 EXEC PGM=IEFBR14
//SYSOUT DD SYSOUT=*
//SYSOUD DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//FILE01 DD DSN=KC03F50.C2461.NEW.DATA,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(2,2),RLSE),
// DCB=(RECFM=FB,LRECL=143,BLKSIZE=0)
//