AM3270 Management Programming Manual

EVENT MANAGEMENT
Examples of Filters
EXAMPLES OF FILTERS
The following two examples illustrate simple filters that could
be created to select AM3270 event messages.
For both examples, the following assumptions have been made:
1. All AM3270 definitions used in the filters have been loaded
into TACL before compilation.
2. All subsystem IDs that are not initialized in the filter have
been initialized by other means.
For more information on filters, refer to the Event Management
Service (EMS) Manual .
Example 1
The following filter selects all of the AM3270 event messages.
-- Filter that selects only event messages issued by
-- the AM3270 subsystem.
[#SET zam3^val^ssid
[zspi^val^tandem].[zspi^ssn^zam3].[zam3^val^version]]
FILTER am3270^messages
BEGIN
IF zspi^tkn^ssid = SSID(zam3^val^ssid) THEN
PASS --Return this event message
ELSE
FAIL; --Do not return this event message
END; -- of am3270^messages
7-72