ViewPoint Manual

Customizing ViewPoint
ViewPoint Manual426801-001
6-13
An Enable Application to Generate
Event-Detail Records
An Enable Application to Generate Event-Detail Records
You can use this DDL description to produce a standard Enable application that
generates event-detail records. To do this, use the following procedure:
1. Compile the DDL shown in the previous figure and create a FUP command file:
DDL /IN DDLSRC/ DICT, FUP FUPSRC !
2. Execute the FUP file-creation statements in FUPSRC:
FUP /IN FUPSRC/
3. Establish a command file for the Pathway configuration:
EDIT ENABEX
*ADD
1 PURGE ENABLOG, ENABCTL
2 CREATE ENABLOG
3 ASSIGN PATHCTL, ENABCTL
4 PATHMON /NAME $PM, NOWAIT, OUT ENABLOG/
5 PATHCOM /IN ENABPATH/ $PM
6 PATHCOM $PM; RUN DETAIL-PROG
7 PATHCOM $PM; SHUTDOWN, WAIT
8 //
*EXIT
Figure 6-3. DDL for Event-Detail Database
definition ZVPT-EVENT-SSID.
03 Z-OWNER type character 8.
03 Z-NUMBER type binary 16.
end
record ZVPT-EVENT-DETAIL.
file is "EVENTCX" key-sequenced.
* field identifying the event
02 Z-EVENT.
03 Z-EVENT-SSID type ZVPT-EVENT-SSID.
03 Z-EVENT-NUMBER type binary 16.
* fields providing 6 lines of probable cause text
02 Z-PROBABLE-CAUSE.
03 Z-LINE pic x(77) occurs 6 times.
* fields providing 6 lines of recommended action text
02 Z-RECOMMENDED-ACTION.
03 Z-LINE pic x(77) occurs 6 times.
key is Z-EVENT.
end