Enlarging a database

Overview procedure

Enlarging an Adabas Audit Data Retrieval database involves the following:

  1. Saving the existing database under a new name
  2. Creating a new, larger database under the original name
  3. Restoring data from the renamed database to the new database
  4. Formatting the remaining free space in the new database

Job B97DBENL

These actions are performed by job B97DBENL:

  1. Step DBREN uses IDCAMS to rename the VSAM database.
  2. Step DBDEF uses IDCAMS to define a new, larger database.
  3. Step DBREPRO uses IDCAMS to restore data from the renamed database.
  4. Step DBFORM uses BST05FOR to format the remaining free space in the Adabas Audit Data Retrieval database.

Job B97DBENL is tailored at the time of installation and placed in the BETA97.CNTL.

Caution: No database access during enlarging

Do not access the Adabas Audit Data Retrieval database while enlarging the database is in progress. To prevent the database from being accessed:

  1. Stop all Adabas Audit Data Retrieval jobs and the reader started tasks that are running.
  2. Then stop the Adabas Audit Data Retrieval started task.

Checking available space – High water mark

When writing information to the Adabas Audit Data Retrieval database, the system checks whether there is still enough space in the database. If the specified amount of available space is used up (default: 90%), a warning message is written to the console:

IRM9550W HIGH WATER MARK REACHED 90% BETA97.MAIN.DATA

To find out how to change the high water mark for a database, see "Changing the high water mark of a database".

Checking available space – Online option Database

To find out how much space is available in the database, you can use option D.2.4, which displays the "System Database Display" panel.

Enlarging a database

PE05DI01 ----------------------------------------------------- Row 1 of 25
 Command ===> ________________________________________________ Scroll ===> CSR_

 System Database Display

 Data Set Name Stat FileID Buffer %Used Type HWM
 BETA97.DB.DEF OPN 00001 00000 013 NO --
 BETA97.DB.SYNC OPN 01000 00000 001 SY --
 BETA97.DB.LOG OPN 01001 00000 040 LO --
 BETA97.DB.MAIN OPN 01002 00010 013 DA 90
 BETA97.DB.MAIN.KEY OPN 01004 00010 009 KE 90
 BETA97.DB.LIST.KEY OPN 01006 04000 087 KE 90
 BETA97.DB.LIST OPN 01008 05500 090 DA 90
 BETA97.DB.SPOOL1 OPN 01010 00000 021 SP --
 BETA97.DB.CACHE1 OPN 01011 00000 002 CA --
 BETA97.DB.INDEX1 FUL 01012 00000 100 IX --
 BETA97.DB.ARC OPN 01013 00050 001 DA 90
 BETA97.DB.ARC.KEY OPN 01015 00050 000 KE 90
 BETA97.DB.MSG OPN 01017 00100 012 DA 90
 BETA97.DB.MSG.KEY OPN 01018 00100 013 KE 90
 BETA97.DB.NOTES OPN 01017 00100 012 DA 90
 BETA97.DB.NOTES.KEY OPN 01018 00100 013 KE 90
 BETA97.DB.INDEX2 OPN 01005 00000 001 IX --
 BETA97.DB.SPOOL2 OPN 01019 00000 069 SP --

In the example above, the database BETA97.DB.LIST has reached the high water mark of 90 percent and needs to be enlarged.

Required JCL modifications

The job B97DBENL is tailored for the database file B97MAIN (not mirrored).

When enlarging other databases, modify the names in each step as described below.

When working with a mirrored database, you must enlarge both the original and the mirror database.

Required modifications in JCL for step DBREN

Check and if necessary modify the old name and the new name for DATA and KEY component under DD SYSIN.

Required modifications in JCL for step DBDEF

Check and if necessary modify the name for DATA and KEY component under DD SYSIN. You must use the original name for the new, larger database.

Enter the new space requirement in cylinders for the data and key file. For more information on space requirements, see "Step 4: Creating a new Adabas Audit Data Retrieval database".

Required modifications in JCL for step DBREPRO

Check and if necessary modify the name for the DATA and KEY component.

Required modifications in JCL for step DBFORM

Check and if necessary modify the database name in DD BQLIN.

Note: Keyword EXTEND is used when formatting a database that already contains data.

Sample JCL

Job B97DBENL is tailored at the time of installation and placed in the BETA97.CNTL.

+----------------------------------------------------------------------+
|jobcard |
|//DBREN EXEC PGM=IDCAMS |
|//* |
|//* |
|//SYSPRINT DD SYSOUT=* |
|//SYSIN DD * |
| ALTER BETA97.DB.MAIN |
| NEWNAME(BETA97.DB.MAIN.OLD) |
| ALTER BETA97.DB.MAIN.DATA |
| NEWNAME(BETA97.DB.MAIN.OLD.DATA) |
| ALTER BETA97.DB.MAIN.KEY |
| NEWNAME(BETA97.DB.MAIN.KEY.OLD) |
| ALTER BETA97.DB.MAIN.KEY.DATA |
| NEWNAME(BETA97.DB.MAIN.KEY.OLD.DATA) |
|//* |
|//DBDEF EXEC PGM=IDCAMS,COND=(0,NE) |
|//* |
|//SYSPRINT DD SYSOUT=* |
|//SYSIN DD * |
| DEFINE CLUSTER( - |
| NAME(BETA97.DB.MAIN) - |
| CYLINDERS(40) - |
| SHAREOPTIONS(3 3) - |
| OWNER(B97) - |
| UNIQUE - |
| NONINDEXED - |
| ) - |
| DATA( - |
| NAME(BETA97.DB.MAIN.DATA) - |
| CONTROLINTERVALSIZE(4096) - |
| RECORDSIZE(4088 4088) - |
| ) |
| DEFINE CLUSTER( -|
| NAME(BETA97.DB.MAIN.KEY) -|
| CYLINDERS(20) -|
| SHAREOPTIONS(3 3) -|
| OWNER(B97) -|
| UNIQUE -|
| NONINDEXED -|
| ) -|
| DATA( -|
| NAME(BETA97.DB.MAIN.KEY.DATA) -|
| CONTROLINTERVALSIZE(4096) -|
| RECORDSIZE(4088 4088) -|
| ) |

|//*------------------------------------------------------------------*|
|//* REPRO CURRENT DATABASE CONTENTS TO THE LARGER DATABASE *|
|//*------------------------------------------------------------------*|
|//DBREPRO EXEC PGM=IDCAMS,COND=(0,NE) |
|//OLD1D DD DISP=OLD, |
|// DSN=BETA97.DB.MAIN.OLD |
|//NEW1D DD DISP=SHR, |
|// DSN=BETA97.DB.MAIN |
|//OLD1K DD DISP=OLD, |
|// DSN=BETA97.DB.MAIN.KEY.OLD |
|//NEW1K DD DISP=SHR, |
|// DSN=BETA97.DB.MAIN.KEY |
|//SYSPRINT DD SYSOUT=* |
|//SYSIN DD * |
| REPRO INFILE(OLD1D) OUTFILE(NEW1D) |
| REPRO INFILE(OLD1K) OUTFILE(NEW1K) |
|//* |
|//*------------------------------------------------------------------*|
|//* FORMAT THE EXTENSION OF THE DATABASE FILES *|
|//* RC: REFER TO THE PRODUCT'S INSTALLATION & SYSTEM GUIDE *|
|//* THIS STEP MUST BE COMPLETED WITH RC 00 *|
|//*------------------------------------------------------------------*|
|//DBFORM EXEC PGM=BST01RFF,REGION=0M,COND=(0,NE), |
|// PARM=('S=97,B01LST=xx,B97LST=xx', |
|// 'PGM=BST05FOR,SIGNON=NO') |
|//* |
|//STEPLIB DD DISP=SHR, |
|// DSN=BSA.LOAD |
|// DD DISP=SHR, |
|// DSN=BETA97.LOAD |
|//* |
|//SFFPARM DD DISP=SHR, |
|// DSN=BETA.PARMLIB |
|//* |
|//B97DEF DD DISP=SHR, |
|// DSN=BETA97.DB.DEF |
|//* |
|//BQLIN DD * |
| FORMAT FILE DSNAME(BETA97.DB.MAIN) EXTEND |
| FORMAT FILE DSNAME(BETA97.DB.MAIN.KEY) EXTEND |
|//* |
|//IRMPRINT DD SYSOUT=* |
|//BQLPRINT DD SYSOUT=* |
|//SYSPRINT DD SYSOUT=* |
|//* |
|//SFFFDUMP DD SYSOUT=* |
|//SYSUDUMP DD SYSOUT=* |
|//SYSABEND DD SYSOUT=* |
+----------------------------------------------------------------------+