DSORG Parameter
DSORG Parameter Example
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=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=1600)
Scenario2 - Define a PS.
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)
Scenario3 - Define a DA.
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=(DSORG=DA,RECFM=FB,LRECL=80,BLKSIZE=4096)