OSI/AS Management Programming Manual

Sample Event-Message Filters
Sample Programs
056785 Tandem Computers Incorporated C–19
PASS;
END;
Filter Example: OSI/AS
Process Started Messages
The following filter selects the event messages that reflect “process started” events
originating from OSI/AS on system \MYSYS:
== File: EXFLT2
==
== This EMS filter selects those event messages,
== originating from OSI/AS on system \MYSYS, that
== reflect "process started" events.
==
filter procstarted^msgs;
begin
--initialize subsystem IDs.
[#set zosi^val^ssid
[zspi^val^tandem].[zspi^ssn^zosi].[zosi^val^version] ]
if (zems^tkn^system = [#SYSTEMNUMBER \MYSYS] and
zspi^tkn^ssid = ssid(zosi^val^ssid) and
zems^tkn^eventnumber = [zcom^evt^sumstate^chg] and
zcom^tkn^objstate = [zcom^val^sumstate^started]) then
pass;
end;
Filter Example: Process
Started and Selected L5
Threshold Messages
The following filter selects the event messages, originating from OSI/AS on system
\MYSYS, that reflect either one of the following:
A “process started” event
An event reporting that the number of Session Layer “aborts sent” protocol errors
exceeded the set threshold
== File: EXFLT3
==
== This EMS filter selects those event messages,
== originating from OSI/AS on system \MYSYS, that
== reflect "process started" events or events indicating
== the Session Layer "aborts sent" threshold was exceeded.
==
filter procstarted^proterr^msgs;
begin
--initialize subsystem IDs.
[#set zosi^val^ssid
[zspi^val^tandem].[zspi^ssn^zosi].[zosi^val^version]]
if (zems^tkn^system = [#SYSTEMNUMBER \MYSYS] and
zspi^tkn^ssid = ssid(zosi^val^ssid)) then
begin
if (zems^tkn^eventnumber = [zcom^evt^sumstate^chg] and
zcom^tkn^objstate = [zcom^val^sumstate^started]) then
pass;
if (zems^tkn^eventnumber = [zosi^evt^L5^thld] and
zosi^tkn^l5^event = [zosi^val^ab^sent^prot^err]) then
pass;
end;
end;