Static IMS connectivity to MQ via Subzero
This implementation procedure forces IMS to connect to specific MQ subsystems via Subzero. You may want to use this implementation method in an environment used to validate Subzero functionality. The method is minimally invasive, but offers the least flexibility.
To create a static connection to MQ via Subzero
- Change the IMS Configuration.
Edit the MQ external Subsystem member in your IMS PROCLIB.This is a member name of iiiissss where iiii is the IMS ID and ssss is the SSM suffix specified in your IMS startup. For example, IMSA with an SSM=MQA would require a member of IMSAMQA in your IMS PROCLIB.
Change the SSM member parameters from ESMT=CSQQESMT to ESMT=BRDQESMT as follows:
SST=MQ,SSN=T3MQ,LIT=MQM1,ESMT=BRDQESMT,REO=R,CRC=@The following example shows a valid modification:
Add the Subzero product library to both the STEPLIB and DFSESL library in the IMS dependent region.
- Add Subzero load library to the DFSESL library in the IMS control region.
- Modify the IMS dependent region (MPP and BMP) to include a PREINIT=xx execution parameter
Create a DFSINTxx member in the dependent region’s PROCLIB, and then add BRDIMSDX to this member.
Ensure that CSQQDEFV is in the STEPLIB concatenation of the IMS dependent region.
You can use the default found in *.SCSQAUTH or create your own version of the CSQQDEFV module.From the *.SCSQAUTH load library, copy MQ module CSQBCRMH to an APF-authorized data set, and rename it MQSBCRMH.
This is necessary to support local connectivity (where the SSM parameters point to Subzero modules and the MQ subsystem is local to the IMS control region).
- Implement the IMS configuration changes.You do not need to stop and restart IMS in order to implement your changes. You can simply stop and restart the subsystem definitions.
- Issue a /STOP SUBSYS ALL command to IMS. This will stop the current connections to MQ.
- Issue a /START SUBSYS ALL command to IMS. This will restart the current connection to MQ using the new SSM parameters.
You should see the following messages:
BMCBRDM0026I MQID connection is being managed by Subzero (DBCID)CSQQ000I IMS/TM IMSID connected to queue manager MQID- Restart your IMS dependent regions.