Function calls for COBOL

QMF provides one function call, DSQCIB, for the COBOL language. It is described in the communications macro DSQCOMMB. This function call has two formats: DSQCIB and DSQCIB extended format.

DSQCIB

This call is for QMF commands that do not require access to application program variables. Use this call for most QMF commands.

     CALL DSQCIB USING DSQCOMM CMDLTH CMDSTR

The parameters have the following values:

DSQCOMM

The interface communications area

CMDLTH

Length of the command string, CMDSTR. It is an integer parameter.

CMDSTR

QMF command to run. It is an uppercase character string of the length specified by CMDLTH.

DSQCIB, extended format

This call has an extended syntax for the three QMF commands that do require access to application program variables: START and the extended formats of GET GLOBAL and SET GLOBAL.

     DSQCIB USING
            DSQCOMM CMDLTH CMDSTR
            PNUM KLTH KWORD VLTH VALUE VTYPE

The parameters have the following values:

DSQCOMM

The interface communications area.

CMDLTH

Length of the command string, CMDSTR. It is an integer parameter.

CMDSTR

QMF command to run. It is an uppercase character string of the length specified by CMDLTH.

PNUM

Number of command keywords. It is an integer parameter.

KLTH

Length of each specified keyword. It is an integer parameter or an array of integer parameters.

KWORD

QMF keyword or keywords. Each is a character or structure of characters whose lengths are the same as specified by KLTH. If all the keywords have the same length, you can use an array of characters.

VLTH

Length of each value associated with the keyword. It is an integer parameter or an array of integer parameters.

VALUE

Value associated with each keyword. Its type is specified in the VTYPE parameter, and can be a character, a structure of characters, an integer parameter, or an array of integer parameters.

VTYPE

QMF data type of the value string VALUE. This type has one of two values, which are provided in the communications macro, DSQCOMMB:

• DSQ-VARIABLE-CHAR for character values
• DSQ-VARIABLE-FINT for integer values

All of the values specified in the VALUE field must have the data type specified in VTYPE.