Inquire Indirect Command Stack Depth

This Subprogram allows the current Indirect Command Stack Depth to be determined.

Short Name Calling Sequence

STATUS = UIIQID(DEPTH)

Long Name Calling Sequence

STATUS = UI_INQUIRE_INDIRECT(...)

Input Arguments

None

Output Arguments

DEPTH (Integer) Indirect Stack Depth

Function Value

UI__SUCCESS ) Success UISUCC )

UI__NOT_INITIALIZED ) Package not Initialized UININI )

Note:

1. The DEPTH Argument will be set to zero if Input is presently being taken directly from the primary Input Logical Unit (e.g. the terminal), whereas it will be in the range 1-4 if Input is presently being taken from an Indirect Command File.
2. The DEPTH Argument will be set to 0 if UIPACK has not been initialised.