70
Assume that &FIELD1 has a length of 10.
4 + (40 + 4) + (10 + 4) + (2 + 4) = 68
v The length of each parameter (parameter-1 through parameter-255) should be the
same as the length of the corresponding parameter in the remote program.
v If a field name with a usage of P is specified as a parameter of the EVOKE
keyword, this field is not sent as part of the data record.
v A program evoked on an AS/400 system will receive any parameters sent by the
remote program just as if they had been passed by the CL CALL command.
Note: If the job on the AS/400 system is a prestart job, the program must use
the RTVDTAARA command to receive the parameters.
This keyword is required when either the SECURITY or SYNLVL keywords are
specified. At run time, the SECURITY and SYNLVL keywords are used only when
EVOKE is also in effect.
The EVOKE keyword is ignored at run time when CANCEL, CNLINVITE, EOS,
FAIL, NEGRSP, RSPCONFIRM, or RQSWRT is in effect. These keywords must
have option indicators when they apply to a record for which the EVOKE keyword
applies. If a CANCEL, CNLINVITE, EOS, FAIL, NEGRSP, or RQSWRT keyword
with no option indicator applies to a record for which EVOKE applies, an error
message is issued and the EVOKE keyword is ignored at creation time.
You cannot specify EVOKE with the TIMER keyword.
Option indicators are valid for this keyword and are required if this keyword is
specified more than once for each record format or file.
EVOKE (Evoke) Keyword for Intersystem Communications
Function Files— — Example
Figure 403 shows how to specify the EVOKE keyword.
1
If indicator 01 is on, PROGRAM1 in LIBRARY1 will be started. If indicator
02 is on, PROGRAM2 in LIBRARY2 will be started.
2
&FIELD1 contains the name of the program to be started. &FIELD2
contains the name of the library. The character string ABC, numeric value
10.1, and the value in FIELD3 will be passed to the program on the remote
system.
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
00010A
R RCD
00020A 01
:
EVOKE(LIBRARY1/PROGRAM1)
1
00030A 02
:
EVOKE(LIBRARY2/PROGRAM2)
1
A
:
:
A
:
:
00090A
R RCD2
EVOKE(&FIELD2/&FIELD1 'ABC' 10.1 +
00100A
FIELD3)
2
00110A
FIELD1
10A P
00120A
FIELD2
10A P
00130A
FIELD3
5B P
A
Figure 403. Specifying the EVOKE Keyword
ICF Files, EVOKE
Chapter 5. Keywords for Intersystem Communications Function Files
539