EMS Manual

EMS Procedures
EMS Manual—426909-005
15-18
EMSINIT and EMSINITMAP Procedures
In COBOL85 programs, use EMSINITMAP through ENTER TAL.
status returned value
INT:value
is zero or an SPI error code. For a full list of SPI error numbers, see EMSGET and
EMSGETTKN Procedures on page 15-12.
buffer
INT .EXT:ref:*
is the event-message buffer, which the caller must have allocated and EMSINIT (or
EMSINITMAP) initializes.
buffer-length
INT:value
is the length, in bytes, of the buffer—the length to be initialized. buffer-length
should not be larger than the value of ZEMS-VAL-EVT-BUFLEN (currently 4024
bytes).
generating-ssid
INT .EXT:ref:6
is the subsystem ID of the subsystem originating the event message. The version
field of this parameter is stored in the header of the event message.
event-number
INT:value
is a number, specific to this subsystem, that identifies this event message.
subject-token-id
INT(32):value (EMSINIT)
INT .EXT:ref:* (EMSINITMAP)
is the token code or token map of the subject of this event message.
{ status := } { EMSINIT } ( buffer ! i/o
{ CALL } { EMSINITMAP } , buffer-length ! i
, generating-ssid ! i
, event-number ! i
, subject-token-id ! i
, [ subject-value ] ! i
, [ subject-length ] ! i
, [ subject-ssid ] ! i
, [ time-stamp ] ! i