CA-GSS Statements and Commands › Service Routines › $SRV_ENQ_INFO

$SRV_ENQ_INFO

The $SRV_ENQ_INFO routine returns information about all IMOD enqueues that are currently held.

Syntax

Use this syntax:

CALL $SRV_ENQ_INFO

Parameters

No operands are expected and none should be passed.

Returned Data

Data is returned on the stack. Each line represents one enqueue for one IMOD. The first character in each record is the delimiter character. This character is used to separate the returned fields as listed below:

1. LOCK or ENQUEUE.
2. QNAME or LOCK-NAME. This field is always eight characters, padded with blanks. This field may contain embedded delimiter characters.
3. RNAME. This field is always 256 characters, padded with blanks. This field may contain embedded delimiter characters.
4. OWN or WAIT.
5. Reserved.
6. IMOD ID associated with the request.

Return String

The return string is null.

Usage Note

Since both the QNAME and RNAME fields may contain embedded delimiters, care should be exercised in parsing the returned string. See the following Example for a recommended method.

Example

call $srv_enq_info
limit = queued( )
 do i = 1 to limit
   parse pull 1 d +1 type (d) . +1 qname +8 . +1 rname +256   ,
         own (d) level (d) . (d) imodid (d) .
   end i