EVOKE (Evoke) Keyword for Intersystem Communications Function Files--Example

Figure 393 shows how to specify the EVOKE keyword.

Figure 393. Specifying the EVOKE Keyword

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

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