ViewPoint Manual

Customizing ViewPoint
ViewPoint Manual—426801-001
6-7
The Default Alternate-Events Filter
FILTER Viewpt^alt^default^filter (
ssid(zvpt^val^ssid, zvpt^fltr^select ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^discard ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^systemname ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^ssid ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^eventnumber ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^cpu ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^pin ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^processname ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^eventtext ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^custom^number) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^custom^file ) OPTIONAL,
ssid(zvpt^val^ssid, zvpt^fltr^custom^string) OPTIONAL );
begin ssid(zvpt^val^ssid)
if zvpt^fltr^select = [zspi^val^true] or
zvpt^fltr^discard = [zspi^val^true] then
begin
-- Test for matching system name (if provided).
if ( not tokenpresent(zvpt^fltr^systemname) or
zvpt^fltr^systemname =
decompose(ssid(zems^val^ssid,zems^tkn^xsenderid^pd),system name)
) and
-- Test for matching subsystem id (if provided).
( not tokenpresent(zvpt^fltr^ssid) or
( zvpt^fltr^ssid.zspi_ddl_ssid:z^owner =
ssid(zems^val^ssid,zspi^tkn^ssid).
zspi_ddl_ssid:z^owner
and zvpt^fltr^ssid.zspi_ddl_ssid:z^number =
ssid(zems^val^ssid,zspi^tkn^ssid).
zspi_ddl_ssid:z^number
)
) and
-- Test for matching event number (if provided).
( not tokenpresent(zvpt^fltr^eventnumber) or
zvpt^fltr^eventnumber =
ssid(zems^val^ssid,zems^tkn^eventnumber) )
and
-- Test for matching cpu (if provided).
( not tokenpresent(zvpt^fltr^cpu) or
zvpt^fltr^cpu =
ssid(zems^val^ssid,
zems^tkn^xsenderid).zems^ddl^xsenderid:zcpu
) and
-- Test for matching pin (if provided).
( not tokenpresent(zvpt^fltr^pin) or
zvpt^fltr^pin =
ssid(zems^val^ssid,
zems^tkn^xsenderid).zems^ddl^xsenderid:zpin
Figure 6-2. Default Alternate-Events Filter Source Code (page 2 of 4)