EMS FastStart Manual
Building Your Application for Event Generation
EMS FastStart Manual–133701
6-16
Specify Event Types
Action Completion
An action-completion event message informs you that the action required in an action-
attention event message was completed and the job is continuing. Note in this 
Example 6-11, that the user-action-id (user-action-id-1) from the action-attention 
example above was moved into the field action-id. Also, the same subject value was 
used.
Example 6-12
 shows sample code for generating action completion events with the 
display suppressed.
Example 6-10. Sample Code for Generating Action-Attention Events
GENERATE-ACTION-ATTENTION.
PERFORM 300-initialize-egen-record.
MOVE ACTION-ATTENTION-EVENT TO event-type  OF egen-record.
MOVE USER-ACTION-ID-1   TO action-id  OF egen-record.
MOVE ATM-EVT-LOW-ON-CASH  TO event-number OF egen-record.
MOVE "SFMAIN02"    TO atm-name  OF egen-record.
MOVE "atm-name"    TO subject-field-name OF egen-record.
MOVE "245 A St., San Francisco" TO atm-location OF egen-record.
ENTER TAL "Egen" USING egen-record, file-number
      GIVING return-code.
IF return-code NOT = ZERO
 PERFORM 400-validate-return-code.
Example 6-11. Sample Code for Generating Action-Completion Events
GENERATE-ACTION-COMPLETION.
PERFORM 300-initialize-egen-record.
MOVE ACTION-COMPLETION-EVENT TO event-type  OF egen-record.
MOVE ATM-ACTION-ID-1   TO action-id  OF egen-record.
MOVE ATM-EVT-BACK-ONLINE  TO event-number OF egen-record.
MOVE "SFMAIN02"    TO atm-name  OF egen-record.
MOVE "atm-name"    TO subject-field-name OF egen-record.
MOVE "245 A St., San Francisco" TO atm-location OF egen-record.
ENTER TAL "Egen" USING egen-record, file-number
      GIVING return-code.
IF return-code NOT = ZERO
 PERFORM 400-validate-return-code.










