RESPONSE REASON
INVALID INVALID_FUNCTION
EXCEPTION LENGTH_ERROR
UNKNOWN_DATA
DISASTER INQ_FAILED
PURGED None
The SET_SYSTEM call
The SET_SYSTEM call allows you to set CICS system data values in the AP
domain.
SET_SYSTEM
DFHSAIQX [CALL,]
[CLEAR,]
[IN,
FUNCTION(SET_SYSTEM),
[DTRPRGRM(name8 | string | ’string’),]
[GMMLENGTH(name2 | (Rn) | expression),]
[GMMTEXT(name8 | (Rn)),]]
[OUT,
RESPONSE (name1|*),
REASON (name1|*)]
This command is threadsafe.
DTRPRGRM(name8 | string | 'string')
specifies the name of the dynamic routing program.
name8
The name of an 8-byte area that contains the name of the dynamic
routing program.
string A string of character, without intervening blanks, that defines the name
of the dynamic routing program being set.
‘string’
A string of character without intervening blanks. If you want to
document a name (label) in your program, use this form.
GMMLENGTH(name2 | (Rn))
specifies the length of the new “good morning” message supplied by the
GMMTEXT parameter.
name2
The name of a 2-byte area that contains, as a half-word binary value,
the length of the new good morning message.
(Rn) A register that contains the length of the new good morning message.
GMMTEXT(name4 | (Rn))
specifies the new good morning message.
name4
The name of a 4-byte location that contains the address of a storage
area (up to a maximum of 246 bytes long) that contains the good
morning message.
(Rn) A register that contains the address of a storage area (up to a
maximum of 246 bytes long) that contains the good morning message.
Chapter 3. The user exit programming interface (XPI) 391