Summary -
In this topic, we described about the Uncatalog Datasets with detailed example.
IEFBR14 can be used to uncatalog the datasets. The dataset can be either Sequential file(PS) or Partitioned Dataset(PDS). To uncatalog the dataset, the disposition should be DISP=(OLD,UNCATLG,..). UNCATLG will do two tasks -
- Removes entry in system or user catalog directory for dataset.
- All unneeded indexes will be deleted.
Syntax -
//Job Card
//*
//STEP1 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSDUMP DD SYSOUT=*
//DD1 DD DSN=datset.name, DISP=(OLD,UNCATLG,..),
// VOLUME=SER=volume-name,UNIT=sys-name
volume-name -
Specifies the volume name. Should be the same volume which used to create the dataset for the first time.
sys-name -
Specifies the storage system name. Should be the system name which used to create the dataset for the first time.
Example: -
Below example to uncatalog the PS and PDS using IEFBR14 utility.
JCL: -
---+----1---+---2----+---3---+---4---+---5---+---6--+---7--
***************************** Top of Data *************************
//MTHUSRD JOB (123),'MTHUSR',CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//******************************************************************
//* UNCATALOG DATA SET USING IEFBR14 UTILITY
//*****************************************************************
//STEP01 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSDUMP DD SYSOUT=*
//DD1 DD DSN=MTHUSR.TEST.PSFILE,
// DISP=(OLD,UNCATLG,DELETE)
//DD2 DD DSN=MTHUSR.TEST.PDSFILE,
// DISP=(OLD,UNCATLG,DELETE)
//*
**************************** Bottom of Data **************************

Output: -

Explaining Solution: -
- SYSPRINT - Used by utility programs for their output.
- SYSOUT - Specifies system defined dd name used for file status codes, system abend codes information and output of the display statement.
- SYSDUMP - Used by the system for dumping when an abend occurs that causes a system dump.
- DD1 DD * - Specifies PS dataset with DISP for uncatalog (DISP=(OLD,UNCATLG,DELETE)).
- DD2 DD * - Specifies PDS dataset with DISP for uncatalog (DISP=(OLD,UNCATLG,DELETE)).