Previous Topic: $SRV_DSTAB_STATNext Topic: $SRV_LOG_STAT


$SRV_ENQ_INFO

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

Syntax

CALL $SRV_ENQ_INFO

Parameters

No operands are expected and none are 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:

  1. LOCK or ENQUEUE.
  2. QNAME or LOCK-NAME. This field is always eight characters, padded with blanks. This field can contain embedded delimiter characters.
  3. RNAME. This field is always 256 characters, padded with blanks. This field can 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 the QNAME and RNAME fields can contain embedded delimiters, exercise care in parsing the returned string.

Example - Recommended Method

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