EMS FastStart Manual

Building Your Application for Event Generation
EMS FastStart Manual–133701
6-12
Example
Once the fields are initialized, information needed for each specific event must be
moved into the fields, replacing the default values. Table 6-5 shows the ATM-EVT-
ACCT-INSUF-FUNDS event generated by the ATM COBOL85 example. This shows all
the fields values after event-specific information was moved into three fields:
ATM-NAME, ATM-LOCATION, and ATM-ACCOUNT-NUM. These fields are shown
below (bold).
The application now calls EGEN. EGEN looks at the contents of the field-value and
compares it with the EGEN default values. Only those fields whose contents differ from
the default values are added to the event buffer. In the example above, only those fields
which are shown in bold type will be added to the event buffer. Note that if the field
value is not modified, and the default value is used, nothing is added to the event buffer.
Should this happen, you may find some variable data missing from the events you
generate.
To change the default field values, generate your application and modify the xxxxTAL
(for example, ATM1TAL for our sample) DDL file (Example 6-7
). Enter the new default
values. Then re-compile the EGEN module with the new TAL DDL and re-bind this new
TAL module with your application.
Remember, it is important to choose default values which are unlikely to occur in your
application. Do not use a common or likely value as a default. In the example above, a
“real-life” ATM-RETRY-LIMIT value is unlikely to match the default value of 32767;
ATM-HW-SUBCOMPONENT ZSPI-DDL-CHAR24 24 spaces
ATM-SERIAL-NUMBER ZSPI-DDL-INT2 2147483647
ATM-SENSE-STATUS ZSPI-DDL-INT2 2147483647
Note. For character fields such as ZSPI-DDL-CHAR8 and ZSPI-DDL-CHAR24, the default
value is 8 and 24 blanks respectively.
Table 6-5. ATM COBOL85 Example
FIELD-NAME FIELD-TYPE FIELD-VALUE
ATM-NAME ZSPI-DDL-CHAR8 OAKWEST1
ATM -LOCATION ZSPI-DDL-CHAR24 245 Oak St., Oakland
ATM-ACCOUNT-NUM ZSPI-DDL-INT2 34503933
ATM-RETRY-LIMIT ZSPI-DDL-INT 32767
ATM-HW-COMPONENT ZSPI-DDL-CHAR24 24 spaces
ATM-HW-SUBCOMPONENT ZSPI-DDL-CHAR24 24 spaces
ATM-SERIAL-NUMBER ZSPI-DDL-INT2 2147483647
ATM-SENSE-STATUS ZSPI-DDL-INT2 2147483647
Table 6-4. Field Content After Call to Initialize^egen^record Procedure (page 2
of 2)
FIELD-NAME FIELD-TYPE FIELD-VALUE