Disabling/removing an application in IDMS v19.0

Products

• IDMS

Issue/Introduction

   We've been asked to disable or remove an application within one of our IDMS regions. Can you point me to any doc that may detail the required steps. Basically what is our (systems) responsibility as opposed to applications' responsibility.

• Disable transaction
• Remove physical data sets
• ????

   Thanks.

Environment

Release : 19.0

Component : CA IDMS/DB

Resolution

Not having any specific details about the application this what I would recommend. Not all of this may apply.

To permanently remove that application:

1) Identify the task codes that invoke the applications and delete them from the SYSGEN.

2) ADS dialogs and program definitions that may also be defined to the SYSGEN should be deleted.

3) Delete the user programs from the LOADLIB where they are kept.

4) If ADS dialogs, an ADSA application and maps are involved they could be deleted online with the ADSA, ADSC and MAPC compilers or using these batch JCL examples:

For maps:

//MPUT1    EXEC PGM=RHDCMPUT,REGION=0M              
//STEPLIB  DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//CDMSLIB  DD DISP=SHR,DSN=HLQ.DBALOAD              
//         DD DISP=SHR,DSN=HLQ.CUSTOM.LOADLIB 
//         DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//         DD DISP=SHR,DSN=CEE.SCEERUN                            
//SYSCTL   DD DISP=SHR,DSN=HLQ.SYSCTL               
//SYSJRNL  DD DUMMY                                 
//SYSLST   DD SYSOUT=*                              
//SYSUDUMP DD SYSOUT=*                              
//SYSPCH   DD SYSOUT=*                              
//SYSUDUMP DD SYSOUT=*                              
//SYSIDMS  DD *                                     
 DMCL=dmcl DICTNAME=dictname            
//SYSIPT   DD *                                     
 PROCESS=DELETE                                     
 MAP=MAP1 VERSION=1                                 
 MAP=MAP2 VERSION=1                                 
/*                                                  
//MAP1     EXEC PGM=RHDCMAP1,REGION=1000K           
//STEPLIB  DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//CDMSLIB  DD DISP=SHR,DSN=HLQ.DBALOAD              
//         DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//         DD DISP=SHR,DSN=CEE.SCEERUN                            
//SYSCTL   DD DISP=SHR,DSN=HLQ.SYSCTL               
//SYSPCH   DD SYSOUT=*                              
//SYSUDUMP DD SYSOUT=*                              
//SYSIPT   DD *                                     
DELETE MAP MAP1.                                    
DELETE MAP MAP2.                                    
//SYSLST   DD  SYSOUT=*                             
//SYSIDMS  DD *                                     
 DMCL=DMCL1800 DICTNAME=SYSDICT                     
/*   

 

Dialogs and ADSA application:

//DELETE   EXEC PGM=IDMSDDDL,REGION=1000K,PARM='DBNAME=TSTDICT
//STEPLIB  DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//CDMSLIB  DD DISP=SHR,DSN=HLQ.DBALOAD              
//         DD DISP=SHR,DSN=HLQ.CUSTOM.LOADLIB 
//         DD DISP=SHR,DSN=HLQ.CAGJLOAD    
//         DD DISP=SHR,DSN=CEE.SCEERUN                            
//SYSLST   DD  SYSOUT=*                                       
//SYSJRNL  DD  DUMMY                                          
//SYSJRNL1 DD  DUMMY                                          
//SYSJRNL2 DD  DUMMY                                          
//SYSPCH   DD  DUMMY   
//SYSIDMS  DD  *                                              
 DMCL=dmcl DICTNAME=dictname                              
//SYSIPT   DD  *     IDMSDDDL SOURCE FOLLOWS THIS STATEMENT   
      DELETE LOAD MOD dlg1.                                  
      DELETE LOAD MOD dlg2.  
      DELETE LOAD MOD applname
/*      

 

5) Exclude the segments related this application from the global DMCL and delete the DBNAME entry from the DBtable for these segments.