JCL DSNTYPE Parameter Example

DSNTYPE Parameter Tutorial   

Scenario1 - Define PDS.

Code -

----+----1----+----2----+----3----+----4----+----5----+
//NEWPDS   DD DSN=MTH.DATA.PSFILE,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(TRK,(3,2,2),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600),
//            DSNTYPE=PDS

Scenario2 - Define a PDSE.

Code -

----+----1----+----2----+----3----+----4----+----5----+
//NEWPDS   DD DSN=MTH.DATA.PDS,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(TRK,(3,2,2),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4096)
//            DSNTYPE=LIBRARY

Scenario3 - Define a Large format of PS.

Code -

----+----1----+----2----+----3----+----4----+----5----+
//NEWPS    DD DSN=MTH.DATA.PS,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(TRK,(3,2,2),RLSE),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//            DSNTYPE=LARGE