Renaming DBID 1006 areas

Products

• Datacom
• Datacom/AD
• Datacom/DB

Issue/Introduction

Closing the CBS Heuristic database 1006 in the Datacom MUF fails with .

DB00622I - COMM CLOSE 1006 IGNORED, CBS HEURISTICS  

This article explains how the data sets for base 1006 can be renamed when external security is not active in the MUF.

Environment

Datacom/AD

Datacom/DB

Resolution

The easiest way to rename these files is to use this process:

1. Shut down your CICS regions using this Datacom/DB MUF, or the base product that uses Datacom/AD
2. Shut down the Datacom MUF gracefully..
3. Rename the current files in your z/OS catalog to the desired name for database 1006
4. Run the below JCL to initialize the database and put the file into the database catalog (the CXX)
5. Start the MUF as usual
6. Start your CICS regions or base application as usual.

This should only take a couple minutes, if the JCL is ready to run. Here is the JCL to use, taken from the new installation process for Version 15.1. 

JOBCARD1                                                               
JOBCARD2                                                               
JOBCARD3                                                               
JOBCARD4                                                               
//*------------------------------------------------------------------**
//*                                                                    
//*  Expected Condition Code EQ 00                                     
//*                                                                    
//*      ***  Change JOB CARD as necessary for your site.              
//*                                                                    
//*   1. Perform a global change of "CAI.NEWCHLQ"                      
//*       1-27 bytes in length for NEW INSTALL CUSTOM datasets         
//*       name forms to be used for your CUSTOM HLQ for new installs.                                     
//*                                                                    
//*   2. Perform a global change of "CAI.NEWHLQ"                       
//*       1-27 bytes in length for NEW INSTALL datasets                
//*       name forms to be used for your HLQ for NEW INSTALLS.         
//*                                                                    
//*   3. Perform a global change of "9CXX_NAME"                        
//*       to the name of your CXX.                                     
//*                                                                    
//* -----------------------------------------------------------------  
//*                                                                    
//JCL JCLLIB ORDER=(CAI.NEWCHLQ.CUSPROC)                               
//*                                                                    
//***-----------------------------------------------------------------*
//CXXINIT  EXEC PGM=DBUTLTY,REGION=6M,PARM='/PGMMONTH=1'               
//     INCLUDE MEMBER=B15STLIB                                         
//     INCLUDE MEMBER=B15DDCXX                                         
//     INCLUDE MEMBER=B15DDOUT                                         
//SYSIN    DD *
  SET  OPTION1=MUF_NOT_ENABLED                                                        
  INIT AREA=IXX,DBID=1006,OLDEP=YES                                    
  INIT AREA=CBS,DBID=1006                                              
  LOAD AREA=CBS,DBID=1006,SORT=999999,FORMAT=NONE                      
/*                                                                     
//IXX1006   DD DISP=SHR,DSN=CAI.NEWHLQ.9CXX_NAME.IXX1006               
//CBS1006   DD DISP=SHR,DSN=CAI.NEWHLQ.9CXX_NAME.CBS1006               
//*                                                                    
//                                                                     

 

Additional Information

If external security is active in the MUF , start the MUF temporarily without 1006 in the CBS card and run the INIT/LOAD cards from above mentioned JCL. 

To rename the data set names in the CXX without an INIT , DBUTLTY CXXMAINT ALTER DSN (Modify Data Set Name) can be used too.