Manual recovery after warmstart failure

Products

• IDMS

Issue/Introduction

If an IDMS CV abends during warmstart, it may be be necessary to perform a manual recovery.
This process is described in detail at Recovery Procedures After a Warmstart Failure, however the guidelines provided in this article should be of assistance in the general case.

Environment

Environment: All supported releases.

Resolution

1. Take a backup of the CV journals and, if feasible, all of the database and dictionary files in the CV.

2. Run an ARCHIVE JOURNAL FULL to archive all of the journals that are marked as full.

Sample JCL:

//ARCHJRNL EXEC PGM=IDMSBCF,REGION=0M
//STEPLIB   DD DISP=SHR,DSN=<yourHLQ>.DBA.LOADLIB
//          DD DISP=SHR,DSN=<yourHLQ>.CUSTOM.LOADLIB
//          DD DISP=SHR,DSN=<yourHLQ>.CAGJLOAD
//SYSLST    DD SYSOUT=*
//SYSJRNL1  DD DISP=SHR,DSN=<yourHLQ>.SYSJRNL1
//SYSJRNL2  DD DISP=SHR,DSN=<yourHLQ>.SYSJRNL2
//SYSJRNL3  DD DISP=SHR,DSN=<yourHLQ>.SYSJRNL3
//SYSJRNL4  DD DISP=SHR,DSN=<yourHLQ>.SYSJRNL4
//SYSJRNL   DD DSN=<yourHLQ>.GDG.ARCHJRNL(+1),
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
//          SPACE=(CYL,(100,100)),DCB=BLKSIZE=8000
//SYSIDMS   DD *
DMCL=dmclname
//SYSIPT   DD *
CONNECT TO SYSTEM;
ARCHIVE JOURNAL FULL;

3. If the output of the above job indicates that there is still one active journal that is not full, then run another ARCHIVE JOURNAL with READ and specify that journal ddname in the input.

//SYSIPT   DD *
CONNECT TO SYSTEM;
ARCHIVE JOURNAL READ SYSJRNLn;

4. Using IEBGENER or something similar, concatenate all of the archive journals taken since the last startup, in the order in which they were created, into one file.

5. If the archive journal files are on disk, it may be necessary to SORT the resulting archive journal file in descending order.
Use SORT input SORT FIELDS=(13,16,BI,D). If this is done, specify ROLLBACK3490 in the SYSIDMS parameter file of the ROLLBACK job (step 6).

6. Run the ROLLBACK. If this does not work, go no further and contact Technical Support for further assistance.

Sample JCL:

//ROLLBACK EXEC PGM=IDMSBCF,REGION=0M
//STEPLIB   DD DISP=SHR,DSN=<yourHLQ>.DBA.LOADLIB
//          DD DISP=SHR,DSN=<yourHLQ>.CUSTOM.LOADLIB
//          DD DISP=SHR,DSN=<yourHLQ>.CAGJLOAD
//SYSIPT    DD * 
CONNECT TO SYSTEM;
ROLLBACK DMCL ACTIVE;
//SYSIDMS   DD *
DMCL=dmclname
ROLLBACK3490  <== if necessary
//SYSLST    DD SYSOUT=*
//SYS001    DD DISP=SHR,DSN=archive.journal.file
//SYSLST    DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*

7. Format the CV journals.

8. Unlock every database file in the DMCL.

9. Start the CV.