A SERVICE OF

logo

*----------------------------------------------------------------
* Handle information or warning messages, otherwise percolate
*----------------------------------------------------------------
C IF MsgSev <= Warning
C EVAL Action = Handle
C ELSE
C EVAL Action = Percolate
C ENDIF
C RETURN
Figure 121. How to Ignore Status and Notify Messages
Chapter 12. Handling Exceptions 249