![]() |
When developing complex Automation Point rules, it's handy to be able to test new rules against known sets of "problem" messages. You may not be able to (or want to) coerce your host into issuing these msgs, especially if the target host is a non-MVS box that doesn't have any on-board automation product. However, your Automation Point HOST_nn.LOG files (the archived host message logs) may already have exactly the messages you need. This application reads host message logfiles and "re-issues" the messages that it finds there, using the ADDRESS AXC MSG facility. This enables Automation Point rules to be tested with a fixed set of data. You will generally want to copy one or more of your hostmsg logfiles to a different name, edit it to contain only the specific set of messages you want, and test from there. This protects the test messages from being "rolled off" as Automation Point creates new hostmsg logfile archives. You can run SIMULATE.CMD from the Automation Point merged message window's REXX prompt, or from a Windows NT command prompt. For example, the following run is from an NT command prompt in interactive mode, using a logfile named SIMULATE.LOG:
D:\CAAP\RUNTIME> asorexx simulate logfile(simulate.log)
Using Automation Point parmfile: D:\CAAP\RUNTIME\U#PARM.PRM
Using Automation Point DISKPREFIX=TT:TTARR
Issue MSG 'IEF452I QCPZ1318 NOT RUN JCL ERROR' SESSION(MVSA) TIME(210000) ?
Y
Issue MSG '+DFHSM0102 CICSKP0A STORAGE VIOLATION OCCURRED' SESSION(MVSA) TIME(08 5600) ?
Q
D:\CAAP\RUNTIME>
The following run is from an NT command prompt in batch mode, but the logfile name was misspelled, so we are prompted to enter the correct one.:
D:\ASOAPPS\automation\autopnt>asorexx simulate logfile(simulate.lug) mode(batch)
Using Automation Point parmfile: D:\CAAP\RUNTIME\U#PARM.PRM
Using Automation Point DISKPREFIX=TT:TTARR
File Not Found
Enter Automation Point logfile name or 'CANCEL'?simulate.log
Issuing MSG 'IEF450I PCOLWI7M ABENDED S000 U4038 R0001' SESSION(VAXA) TIME(18110 0)
Issuing MSG 'IEF452I QCPZ1318 NOT RUN JCL ERROR' SESSION(VAXA) TIME(210000)
Issuing MSG '+DFHSM0102 CICSKP0A STORAGE VIOLATION OCCURRED' SESSION(VAXA) TIME( 085600)
Issuing MSG '@R1012CM OMEGCICS has failed 7 recovery retries' ACTION(YES) SESSIO N(VAXA) TIME(100400)
Issuing MSG '70 R1012CM OMEGCICS Reply A to abort or U to try again' ACTION(YES) REPLYID(70) SESSION(VAXA) TIME(100400)
Issuing MSG '$HASP395 OMEGCICS ENDED' SESSION(VAXA) TIME(100400)
D:\CAAP\RUNTIME>
Browse the SIMULATE.CMD source code
Download zipped version of the above file and any required subroutines
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