EXECUTE
The EXECUTE command executes a specified routine in an aXes terminal operation script. Refer to 5.41.3 AxesTerminalService Scripts for more information about specifying and using aXes terminal operation scripts.
Optional
EXECUTE --------- SCRIPT ---------- *LOADED --------------------->
*LIST
>-- ROUTINE --------- routine-name ---------------->
>-- RTNSIG ---------- field-name ------------------>
>-- RTNSCREEN ------- field-name ------------------|
If the command specifies SCRIPT(*LIST), you must provide a list definition that contains the aXes terminal operation script. Refer to 5.41.3 AxesTerminalService Scripts for more information about specifying and using aXes terminal operation scripts.
Keywords
|
SCRIPT |
How the aXes terminal operation script is provided. It may contain one of the following values: *LOADED : the script has previously been provided by means of the LOADSCRIPT command. *LIST : the script is provided in a working list with this command. If not specified, the service assumes SCRIPT(*LOADED). |
|
ROUTINE |
The name of a routine in the aXes terminal operation script. Refer to 5.41.3 AxesTerminalService Scripts for more information about specifying and using routines in aXes terminal operation scripts. If not specified, a blank routine name is assumed. If your script does not contain named routines you do not need to specify this keyword. |
|
RTNSIG |
The name of a field exchanged between your client program and the JSM that will receive the screen signature of the screen that is present following execution of the aXes terminal operation script. |
|
RTNSCREEN |
The name of a field exchanged between your client program and the JSM that will receive the name of the screen that is present following execution of the aXes terminal operation script. The screen name is the user-defined name if an aXes project name was specified on the CONNECT command and a name was assigned to the screen. Otherwise the screen signature is returned. |
Examples
RDML Example:
DEFINE FIELD(#MYSCREEN) REFFLD(#STD_TEXT)
CHANGE FIELD(#JSMCMD) TO('EXECUTE ROUTINE(ENTERORDER) RTNSCREEN(MYSCREEN) SERVICE_EXCHANGE(*FIELD)'
USE BUILTIN(JSM_COMMAND) WITH_ARGS(#JSMCMD) TO_GET(#JSMSTS #JSMMSG)
RDMLX Example:
define field(#myscreen) reffld(#std_text)
#jsmcommand := 'EXECUTE ROUTINE(ENTERORDER) RTNSCREEN(MYSCREEN) SERVICE_EXCHANGE(*FIELD)'
use builtin(jsmx_command) with_args(#jsmhandle #jsmcommand) to_get(#jsmstatus #jsmmessage)