NBS_FIND_NTH_ITEM

Find the Nth item contained in a structure associated with a specified identifier and return the located items ID

Description:

Check that the environment ID is not NIL and does not pertain to a primitive item.
Extract the Nth item.

Invocation

(Int) = NBS_FIND_NTH_ITEM (ENVID,POSN,ID,STATUS)

Arguments

ENVID = INTEGER (Given)
Identifier of the parent of the item which is to be found.
POSN = INTEGER (Given)
Number of item to find (first item is item #1).
ID = INTEGER (Returned)
Identifier of the found item (zero if not found).
STATUS = INTEGER (Given and returned)
The global status. Possible return values are,
NBS__NILID NIL ID

NBS__PRIMITIVE Parent is primitive

NBS__ITEMNOTFOUND No item of this name exists