DELTA IMS DB/DC installed
The DELTA IMS DB/DC interface to the Online Reorg function automates the process of reorganizing a database when you use the OLDDBD keyword and specify SWAP(YES).
Before you execute the reorganization job step, you must have a BMCLINK started task running to communicate with DELTA IMS DB/DC in each online IMS system. You must also ensure that you set DELTA IMS DB/DC options to use VTAM to communicate with the online system. For more information about setting DELTA IMS DB/DC options, see the DELTA IMS User Guide.
To change the Online Reorg job step JCL
- Include the DELTA IMS DB/DC load library in the STEPLIB.
- Include an ACBSYSIN DD statement that lists all sets of staging source (by IMS release), ACBLIBA, ACBLIBB, and MODSTATS data sets that contain the DMBs for the database being reorganized. If the ACBSYSIN DD statement is not included or if it is specified as DUMMY, the DELTA IMS DB/DC interface to the Online Reorg function will not execute. If the ACBSYSIN DD statement is included but is empty, error message BMC90308C is issued.
Include an ACBLIB as the source for each set of libraries, for each level of IMS that is shared. This ACBLIB must contain new DMBs for all DBDs used in the reorganization job step. The DMBs must match the DBDs named in the reorganization job step IMS DD statement that contains the new DBD.By default, Online Reorg copies the DMB from ACBLIB to the active online ACBLIBx. To have the DMBs copied into both the active and inactive ACBLIBx libraries, specify BOTH in the ACBSYSIN DD data set. Whether you specify ACTIVE or BOTH, the target ACBLIBx libraries are searched to ensure that they contain at least one of the DMBs. If the ACBLIBx libraries do not contain at least one of the DMBs, the DMBs are not copied to that online ACBLIBx library. For concatenated ACBLIBx data sets, all occurrences of a change DMB will be replaced.
DELTA IMS DB/DC forces the online IMS systems to load the new DMB. Because this process can also be executed during the restart process, do not copy the new DBD to the OLDDBD library before the post-processing tasks are restarted.
Figure 1 shows example JCL.
Figure 1. JCL for OLDDBD with DELTA IMS DB/DC
//ACBSYSIN DD *
[BOTH | ACTIVE]
ACBLIB(your.staging.acblib[,n]) -
ACBLIBA(your.first.acbliba,your.second.acbliba,...) -
ACBLIBB(your.first.acblibb,your.second.acblibb,...) -
MODSTAT(your.ims.modstat) <==optional with BOTH
ACBLIB(your.staging.acblib[,n]) -
ACBLIBA(other.first.acbliba,other.second.acbliba,...) -
ACBLIBB(other.first.acblibb,other.second.acblibb,...) -
MODSTAT(other.ims.modstat) <==optional with BOTHThe example includes the following control statements:
Table 1. Control statements for JCL for OLDDBD with DELTA IMS DB/DC
Control statement
Description
BOTH
Specify BOTH to write to ACBLIBA and ACBLIBB.
ACTIVE
Specify ACTIVE to write to only the active ACBLIBx. ACTIVE is the default.
ACBLIB
The source of the ACBLIB libraries.n specifies the IMS level of the ACBLIB if it is different than the IMS level of the job.
ACBLIBA
The concatenation of ACBLIBA libraries in your IMS control region.
ACBLIBB
The concatenation of ACBLIBB libraries in your IMS control region.
MODSTAT
The MODSTAT data set for your IMS system. The MODSTAT statement is required when you specify ACTIVE; it is optional when you specify BOTH.
If the DELTA IMS DB/DC interface fails, the Online Reorg function aborts the DELTA IMS phase but continues with post-processing tasks and then abends with U4094 and message BMC1802xx. The DELTA IMS DB/DC interface will fail if any of the following situations occur:
- Incorrect information is specified in the ACBSYSIN control statement data set.
- The new DMBs are not found in the ACBLIB.
- Any ACBLIB errors are found.
- VTAM is recycled but BMCLINK has not been recycled. If VTAM is recycled, BMCLINK must be recycled before it is usable.
If the DELTA IMS DB/DC initialization is successful but Online Reorg detects a problem after the IEBCOPY of the ACBLIB to the active ACBLIBx, Online reorg issues a WTOR. Reply R (retry) or S (skip) to the WTOR. If you reply S (skip), Online Reorg skips the DELTA IMS DB/DC phases, completes post-processing tasks, and abends with U4094 and message BMC1802xx.
If an abend occurs during DELTA IMS DB/DC processing in the Online Reorg job, check the log for message BMC180213C. If this message was not issued, run the restart process (see Post-processing). The copy process will be retried during the restart process; however, if message BMC180213C was issued, you must perform the copy tasks manually.