Creating New Generation as PDS

Creating New Generation as PDS

A GDG generation can be a PDS. It is used to take the PRODuction program(s) backup. IEFBR14 utility creates the generation as PDS.

Example -

Scenario - Create GDG generation as PDS.

Code -

----+----1----+----2----+----3----+----4----+----5----+----6
//MATEPKPO JOB (123),'MTH',CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),
//             NOTIFY=&SYSUID 
//********************************************************
//* Allocate generation using IEFBR14 Utility
//********************************************************
//STEP01   EXEC PGM=IEFBR14
//DD1      DD DSN=MATEPK.TESTPDS.GDG(+1),
//            DISP=(NEW,CATLG,DELETE),
//            SPACE=(TRK,(3,2),RLSE),
//            UNIT=SYSDA,VOLUME=SER=DEVHD4,
//            DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=800)

SYSPRINT in Spool -

Creating New Generation as PDS SYSPRINT

Output -

Creating New Generation as PDS OUTPUT Creating New Generation as PDS OUTPUT

Explaining Example -

In the above example, we are creating GDG generation as PDS. This generation can work the same as the regular PDS. Mainly used to take the PRODuction modules backup (before and after deployment).