This lesson shows you how to establish another message suppression rule, and how to establish a test command rule.
Follow these steps:
If not, proceed with the following instructions:
Your program should look just like the one shown here. This four-line REXX program is another rule that suppresses the system message IEC233I.
AOF TEST ----- USERID.TEST.RULES(IEC233I) - 01.00--------- COLUMNS 000 000 COMMAND ===> SCROLL ===> PAGE ****** ***************************** Top of Data **************************** '''''' )MSG IEC233I '''''' )PROC '''''' IF MSG.JOBNAME ='J1234' THEN RETURN 'SUPPRESS' '''''' ELSE RETURN 'DELETE' '''''' '''''' '''''' ''''''
Your newest rule is created and ready to test and verify as you did in Lesson 2: Test and Verify a Rule.
Your program should appear like the following example. This REXX program is a rule that responds to a z/OS command event.
AOF TEST ----- USERID.TEST.RULES(CMDTEST) - 01.00--------- COLUMNS 000 000 COMMAND ===> SCROLL ===> PAGE ****** ***************************** Top of Data **************************** '''''' )CMD CMDTEST '''''' )PROC '''''' SAY OPSINFO('CPUID') 'FOR THIS CPU' '''''' RETURN 'ACCEPT' '''''' '''''' '''''' '''''' '''''' ''''''
Your command rule is created and ready to test and verify as you did in Lesson 2: Test and Verify a Rule.
Copyright © 2014 CA.
All rights reserved.
|
|