>>-ISPEXEC--QBASELIB--dd-name--+------------+------------------><
                               '-ID(id-var)-'   

>>-CALL--ISPEXEC--(buf-len,--buffer);--------------------------><

or

>>-CALL--ISPLINK--('QBASELIB'--,dd-name,,-+-id-var)-+----------><
                                          '-'b'-----'   

dd-name

Specifies the ddname that is being queried. The value can be ISPPLIB, ISPMLIB, ISPSLIB, ISPTLIB, ISPLLIB, ISPTABL, ISPFILE, or any valid base DDNAME.

id-var

Optional parameter that specifies the name of a dialog variable which is to contain "ID" information. It is set to the data set name or names of the ddname that was specified in the service call. All data set names returned are fully qualified. Multiple data set names are separated by a comma. TSO has a maximum of 255 data set names allowed in the data set list. A data set name list is bounded by parenthesis when the QBASELIB service is requested through ISPLINK. The variable is not modified if the ddname specified is not allocated. It is the responsibility of the dialog developer to initialize this variable.

Note: Id-var should be initialized to blanks before every QBASELIB call.

buf-len

Specifies a fullword fixed binary integer containing the length of "buffer".

buffer

Specifies a buffer containing the name of the service and its parameters in the same form as they would appear in an ISPEXEC call for a command procedure.

A base library for messages (ISPMLIB) is defined. Query the "ID" information and return the "ID" information in the variable IDV.

Here is the command invocation

ISPEXEC QBASELIB ISPMLIB ID(IDV)

Here is the call invocation:

CALL ISPLINK ('QBASELIB','ISPMLIB ','IDV ');

Or alternatively, you could:

1. Set the program variable BUFFER to contain

   QBASELIB ISPMLIB ID(IDV)

2. Set program variable BUFLEN to the length of the variable BUFFER.
3. Issue the command

   CALL ISPEXEC (BUFLEN, BUFFER);