How to query current enabled CA OPS/MVS rules?

Document ID : KB000077179
Last Modified Date : 12/04/2018
Show Technical Document Details
Question:
Is there a utility or report that I can use to quickly identify a list of all enabled rules in OPS/MVS? 
Answer:
The ADDRESS AOF LIST command can be used to retrieve information about the enabled rules. See the sample REXX program below that scans all rulesets and displays the ruleset and rulename of the enabled rules. 

/* REXX */                                                     
i = 0                                                          
ADDRESS AOF  "LIST "  /* Produce a list of rulesets */         
DO QUEUED()                                                    
 PULL LINE                                                     
 i = i + 1                                                     
 RULESET.i = WORD(LINE,2)                                      
END                                                            
do n = 1 to i /* For each ruleset found above scan the rules */
 ADDRESS AOF  "LIST " RULESET.n".*"                            
  DO QUEUED()                                                  
   PULL LINE                                                   
   rulename = word(line,2)                                     
   enabled  = word(line,3)                                     
   if enabled = 'E' then    /* Check if the rule is enabled */ 
       say left(ruleset.n,8) left(rulename,8)                  
  end                                                          
end                                                            
exit    
                                                      
 
Additional Information:
Reference to the ADDRESS AOF host environment commands can be found in the link below: 

https://docops.ca.com/ca-opsmvs-13-0/en/reference-information/command-and-function-reference/host-environment-commands/address-aof-commands