Syntax of SET GLOBAL (extended syntax)

You can use the extended syntax of the SET GLOBAL command to change the values of variables in callable interface languages other than REXX. Examples of other languages include Assembler, C, COBOL, Fortran, and PL/I.

The variable name can be up to 18 characters long for variables used with callable interface applications. If the variable is to be used as a substitution variable, the name can be up to 17 characters long. The maximum length of the command, including the command syntax, is 2,000 bytes.

The syntax of the command is as follows:
Read syntax diagramSkip visual syntax diagramSET GLOBAL(Variable definitions
Variable definitions
Read syntax diagramSkip visual syntax diagramnumber of varnames,varname lengths ,varnames,value lengths,values, value type
number of varnames
The number of variables requested.
varname lengths
A list of lengths for each variable name specified.

Ensure that the length of the global variable name is equal to the actual length of the global name in your program. An 18-character area padded with trailing blanks is allowed.

varnames
A list of names of the QMF variables.
value lengths
A list of lengths of the values of the variables. If the value length you supply is less than the length of the value stored in your storage area, the value is truncated on the right when it is stored in QMF.

QMF uses the value from your program, starting at the address you assign for the length you assign. If the length is too long, QMF might abend.

values
A list of variable values.
value type
The data type of the storage area that contains the values. It must be either character or integer.

Examples of how to use the extended syntax of the SET GLOBAL command are documented with the programming language specifications.