Enable the DRA for a CCTL

Two main steps are required to enable the DRA for a CCTL. After both steps are completed, the DRA is capable of handling other requests.

This section describes the two steps required to enable the DRA.

  1. The coordinator controller (CCTL) system must load the DRA Startup/Router routine (DFSPRRC0) into a CCTL load library. Although DFSPRRC0 is shipped with the IMS product, it runs in the CCTL address space. Also, The version of the IMS DRA modules that are used by the CCTL must be the same version as the IMS with which the CCTL is communicating.
    Recommendations:
    • Concatenate the IMS.SDFSRESL library to the CCTL step library so the correct version of the DRA Startup/Router routine (DFSPRRC0) is loaded into the CCTL load library.
    • Ensure that the DRA Startup Table (DFSPZPxx) points to the correct version of IMS.SDFSRESL.
  2. The system programmer must put the DFSPZPxx load module in a load library. The DRA is now ready to be initialized.

The CCTL starts the initialization process as a result of the CCTL application program issuing an initialization (INIT) request. At this point in time, the CCTL loads DFSPRRC0 and then calls the DRA to process the INIT request.

As part of the initialization request, the CCTL application program specifies the startup table name suffix (xx). The default load module, DFSPZP00, is in the IMS.SDFSRESL library.

After processing the INIT request, the DRA identifies itself to IMS DB. The DRA is then capable of handling other requests.

DFSPZP00 contains default values for the DRA initialization parameters. If you want to specify values other than the defaults, write your own module (naming it DFSPZPxx), assemble it, and load it in the CCTL load library. Use the supplied module, DFSPZP00, as an example.

The remainder of the DRA modules reside in a load library that is dynamically allocated by DFSPRRC0. The DDNAME and DSNAME of this load library are specified in the startup table. The default DSNAME (IMS.SDFSRESL) contains all the DRA code and is specified in the default startup table, DFSPZP00.