EXPDT Parameter Example

Scenario1 - Define PDS with expiration date 02/19/2023.

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=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=1600),
//          EXPDT=23050

Scenario2 - Define PS with expiration date 02/28/2023.

Code -

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