EVENTING

#### Search Results

Search

# EVENTING

File | 40
Op-Sys | z/OS, z/VSE, BS2000 Note Support for z/VSE is deprecated. Support for BS2000 is also deprecated, except in conjunction with the ESM adapter. Features that are z/VSE and BS2000 specific will be removed from future releases.
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, even if the partner program is located on another system running a different operating system. In BS2000, this view is only available in multi-user mode.

## Common Fields for all Operating Systems

Dictionary Field Name | F/L | Mu | DE | Remarks
--- | --- | --- | --- | ---
`ERROR-CODE` | N3 |  |  |
`ERROR-TEXT` | A58 |  |  |
`NODE` | N5 |  | D |
`NODE-NAME` | A16 |  | D |
`SYSTEM-MESSAGE-CODE` | A10 |  |  |
`FUNCTION` | A8 |  | D | Required, Unique.
`EVENT-NAME` | A8 |  | * | *
`MAX-TIME` | B4 |  | * | *
`NUMBER-OF-WAITERS` | N5 |  | * | *
`NUMBER-OF-MESSAGES` | N5 |  | * | *
`MESSAGE-ARRAY` | A250 | M7 | * | *

* See Field Descriptions, `FUNCTION` field: Matrix of statements, fields and functions.

## Additional fields Supported for BS2000

Dictionary Field Name | F/L | Mu | DE | Remarks
--- | --- | --- | --- | ---
`SYSTEM-CODE` | A2 |  |  |

## Relevant Error Codes

Code | Text | z/OS | z/VSE | BS2000
--- | --- | --- | --- | ---
600 | Unknown function. | X | X | X
745 | Error occurred when executing Eventing |  |  | X
809 | Subsystem not active. |  |  | X
886 | Event is in use. | X | X | X
887 | Event is already defined. | X | X | X
888 | Event name must be specified. | X | X | X
890 | Event does not exist. | X | X | X
891 | Timeout waiting for event. | X | X | X
894 | Enable eventing failed. |  |  | X
893 | Getmain failed. | X | X |
983 | Single user mode not supported by Eventing |  |  | X
986 | No or not enough space for `EVENTING MEMORY POOL` |  |  | X

## Field Descriptions

Which fields are relevant with which statement depends on the `FUNCTION` specified (see the description of the `FUNCTION` field, below).

Field Name | Format/Length | Operating System
--- | --- | ---
`EVENT-NAME` | (A8) | z/OS, z/VSE, BS2000

Name of the event.

Field Name | Format/Length | Operating System
--- | --- | ---
`FUNCTION` | (A8) | z/OS, z/VSE, BS2000

Specifies the action to be performed. Possible values:

Value | Explanation
--- | ---
`DEFINE` | Define an event
`DELETE` | Delete an event
`LIST` | List events
`POST` | Post event
`RECEIVE` | Receive messages from event
`SEND` | Send message to event
`WAIT` | Wait for post of event (or timeout)
`SENDPOST` | Both `SEND` and `POST`.

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

Field Name | Format/Length | Operating System
--- | --- | ---
`MAX-TIME` | (B4) | z/OS, z/VSE, BS2000

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).

Field Name | Format/Length | Operating System
--- | --- | ---
`MESSAGE-ARRAY` | (A250) M7 | z/OS, z/VSE, BS2000

Array of maximum 7 messages for `SEND`/`RECEIVE` functions.

Field Name | Format/Length | Operating System
--- | --- | ---
`NUMBER-OF-MESSAGES` | (N5) | z/OS, z/VSE, BS2000

Number of messages waiting to be received.

Field Name | Format/Length | Operating System
--- | --- | ---
`NUMBER-OF-WAITERS` | (N5) | z/OS, z/VSE, BS2000

Number of tasks waiting to be posted.

### On this page

- Common Fields for all Operating Systems
- Additional fields Supported for BS2000
- Relevant Error Codes
- Field Descriptions