ViewPoint Manual

Customizing ViewPoint
ViewPoint Manual—426801-001
6-24
Passing Marked Event Messages
The DDL in Figure 6-5 shows the EVNTMRKD record structure. This DDL is
distributed with ViewPoint in the file GDDL (with language versions in the files GTAL
for TAL, GCOB for COBOL85, and GLNK for SCREEN COBOL).
Descriptions of the pertinent fields follow.
Z-LOGICAL-TERM of ZVPT-MARKED-KEY
is a string of one to fifteen alphanumeric characters or hyphens identifying the
logical terminal name of the Pathway thread. This value corresponds to the value of
the SCREEN COBOL special register, LOGICAL-TERMINAL-NAME.
Z-EVENT-COUNT of ZVPT-MARKED-KEY
is an ordinal number (1, 2, 3, and so on) identifying successive events marked for a
single logical terminal.
Z-FILTER-RETURN-VALUE of ZVPT-EVENT-MARKED
is the integer value passed with the event when the event filter was applied. If no
value was passed, this value is 0 (zero). If a ViewPoint default filter was used, this
value is 1 for action events, 2 for critical events, 3 for action-completion events, and
0 for all other events.
Figure 6-5. DDL for Marked Event Database (EVNTMRKD)
definition ZVPT-MARKED-KEY.
* Key of record within Event-Marked file.
02 Z-LOGICAL-TERM pic x(16).
02 Z-EVENT-COUNT type binary 16.
end.
definition ZVPT-EVENT-MARKED.
02 ZVPT-MARKED-KEY type *.
02 Z-FILTER-RETURN-VALUE type binary 16.
88 Z-IS-NORMAL-EVENT value 0.
88 Z-IS-ACTION-EVENT value 1.
88 Z-IS-CRITICAL-EVENT value 2.
02 Z-DELETED-FLAG type binary 16.
02 Z-EVENT-BUFFER-LEN type binary 16.
02 Z-EVENT-BUFFER pic x occurs 2 to 3900 times
depending on
Z-EVENT-BUFFER-LEN.
end.
record ZVPT-MARKED-REC.
file is "EVNTMRKD" key-sequenced.
definition is ZVPT-EVENT-MARKED.
key is ZVPT-MARKED-KEY.
end.