The CA-OPS/MVS
® II IOF Feature is used to receive unsolicited IMS messages and to issue IMS commands and receive the response on the REXX stack or in a Stem variable. However, in high command traffic situations it doesn't always queue the commands for execution - in certain cases, the IMS command is discarded if IMS is not immediately ready to accept it.
The IMSCMD program was written as a "wrapper" around the OPS/MVS IOF feature, to add queueing support. It has several components:
- IMSCMD - An external REXX function, callable from OPS/REXX or TSO/E REXX, that allows you to issue an IMS command, and receive the response.
- REPLY - An OPS/MVS CMD rule that traps human operator replies to the outstanding IMS WTOR message, and locks the traffic cop's pending IMS command queue temporarily so that the operator command does not disrupt the automated operations.
- DFS996I - An OPS/MVS MSG rule that process the
nn DFS996I *IMS READY* message, and issues the next pending IMS command.
- DATETIME - An OPS/MVS GLV rule that permits a TSO/E REXX exec to receive the statistics for an OPS/MVS global variable.
- IMSCMDQA - A short installation verification program that you can run after uploading and installing the IMS traffic cop. It also serves as an example of how to call IMSCMD from your REXX programs.
Download zipped version of all of the above files
Note: This sample is provided "as-is", and no warranty is provided by ProTech. Use at your own risk! However, feedback on this sample is welcomed by the author! E-mail address: bstark@protechpts.com
