|
|
The CA-OPS/MVS® II AOFTEST feature allows you to test OPS/MVS rules in a controlled environment, feeding data from prior events to a "private" copy of OPS/MVS that runs in your ISPF session. It is difficult to conduct a good test if the rule being tested relies upon existing global variables or RDF tables, since they do not normally exist in the AOFTEST environment. The REXX program provides an alternate means of launching SysView, so that the "private" OPS/MVS has a copy of the existing production RDF Tables and Global variables.
CA-OPS/MVS II does not provide a program to launch SysView using the ISPF LIBDEF feature, preferring to have the OPS/MVS datasets pre-allocated at ISPF startup. Many sites prefer to use LIBDEF, to simplify ISPF maintenance, so that is the approach used here.
Installation
Upload the module to your MVS system using FTP or 3270 file transfer, specifying text mode (CFLF translation, and ASCII->EBCDIC translation).
Place it into a library allocated to SYSEXEC or SYSPROC.
Customize the dataset names to match those in use at your site.
Execute it with TSO/E REXX by typing:
TSO %OPS
at any ISPF screen.
You can optionally invoke this program from an ISPF menu panel, using a line similar to:
&ZSEL = TRANS( TRUNC (&ZCMD,'.')
1,'CMD(%OPS)'
To copy the SYSCHK1 database and go directly into AOFTEST, Issue the following command from any ISPF command line:
TSO OPS 2.1 GLOBALS
While the OPS program can be launched multiple times in different ISPF windows, only one instance of it should be activated with the GLOBALS operand, and that copy should ONLY be used for AOFTEST, so that other portions of OPS/MVS don't inanvertantly talk to the "private" OPS/MVS, not the production copy.
Download zipped version of the above file
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