EVENTING

File 40
Statement FIND or PROCESS, depending on value in FUNCTION field.
Task Allows communication between Natural programs or Natural applications. This DDM enables Natural programs to send data to and receive data from other Natural programs.

Relevant Error Codes

Code Text
600 Unknown function.
745 Error occurred when executing Eventing
809 Subsystem not active.
886 Event is in use.
887 Event is already defined.
888 Event name must be specified.
890 Event does not exist.
891 Timeout waiting for event.
894 Enable eventing failed.
986 No or not enough space for EVENTING MEMORY POOL

Field Descriptions

Dictionary Field Name Format/

Length/

Desc/

Mu

Description

EVENT-NAME (A8) Name of the event.
  D  
FUNCTION (A8) Required. Specifies the action to be performed. Possible values:
  D DEFINE Define an event
    DELETE Delete an event
    LIST List events
    POST Post event
    RECEIVE Receive messages from event
    SEND Send message to event
    SENDPOST Both SEND and POST
    WAIT Wait for post of event (or timeout)
MAX-TIME (B4) Maximum time (in seconds) you want to wait for a message to arrive. If no message arrives within this time you will get ERROR-CODE 891 (timeout).
  D  
MESSAGE-ARRAY (A250) Array of maximum 7 messages for SEND/RECEIVE functions.
  D  
  M/7  
NUMBER-OF-MESSAGES (N5) Number of messages waiting to be received.
NUMBER-OF-WAITERS (N5) Number of tasks waiting to be posted.

Which fields are relevant with which statement depends on the FUNCTION specified. Matrix of statements, fields and functions: Key: R=Required, U=Unique, D=Descriptor

PROCESS Statement Functions
Fields DEFINE DELETE SEND WAIT POST
EVENT-NAME RUD RUD RUD RUD RUD
MAX-TIME       UD  
MESSAGE-ARRAY     RUD    
FIND Statement Functions
Fields RECEIVE LIST
EVENT-NAME RUD D
NUMBER-OF-WAITERS   D
MESSAGE-ARRAY D  
NUMBER-OF-MESSAGES   D