Adding a volume to a database area when the MUF is not running

Products

• Datacom
• Datacom/AD
• Datacom/DB

Issue/Introduction

How can you add a volume to extend the area when dealing with a non-SMS-managed file?

There are many scenarii possible here. For example, during MUF restart processing, your area runs out of space and you have no more extents available. How can you add a new volume and extend the database area to this new volume, all while the MUF is down, since you can't start it to run dynamic extend, or use tools like Online Area Move?

Environment

SMS management: No

Component : Datacom/DB

Component : Datacom/AD

 

Resolution

In order to add a volume to the non-SMS file allocation and to add an extent for Datacom to use it, you need to first uncatalog the file from its current definition, and then you can extend and recatalog the file in a single step. Here is a sample JCL to do that, followed by a CXX report which will show you the larger size and the full set of volumes in use.

//*
//   SET CUSLIB=<your Datacom CUSLIB>
//   SET LODLIB=<your Datacom CAAXLOAD/CABDLOAD>
//*
//   SET AWL770=<your DSN for the AWL770 Data Area>
//*
//UNCAT1   EXEC PGM=IEFBR14
//AWL770   DD  DSN=&AWL770,UNIT=3390,DISP=(OLD,UNCATLG,KEEP)
//*
//* - - - - - -C- - - - - - - - - - - - - - - - - - - - - - - - - - -7-
//*
//EXTEND   EXEC PGM=DBUTLTY,REGION=0M
//STEPLIB  DD  DISP=SHR,DSN=&CUSLIB
//         DD  DISP=SHR,DSN=&LODLIB
//SYSOUT   DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SNAPER   DD  SYSOUT=*
//*------------------------------
//AWL770   DD  DSN=&AWL770,
//             UNIT=3390,SPACE=(CYL,(200,20)),DISP=(OLD,CATLG,CATLG),
//             VOL=SER=(VVVVV1,VVVVV2,VVVVV3,VVVVV4)
//SYSIN    DD  *
 REPORT DBID=770,AREA=CXX,TYPE=A
 EXTEND DBID=770,AREA=AWL
/*
//*
//REPORT   EXEC PGM=DBUTLTY,REGION=0M
//STEPLIB  DD  DISP=SHR,DSN=&CUSLIB
//         DD  DISP=SHR,DSN=&LODLIB
//SYSOUT   DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SNAPER   DD  SYSOUT=*
//SYSIN    DD  *
 REPORT DBID=770,AREA=CXX,TYPE=A
 REPORT DBID=770,AREA=CXX
/*

Additional Information

As always, please contact Broadcom support for Datacom if you have further questions.