NDG_ASSOC

Store names of existing NDFs specified through the environment

Description:

A group expression is obtained from the environment using the supplied parameter. The expression is parsed (using the facilities of the GRP routine GRP_GROUP, see SUN/150) to produce a list of explicit names for existing NDFs which are appended to the end of the supplied group (a new group is created if none is supplied). If an error occurs while parsing the group expression, the user is re-prompted for a new group expression. NDF identifiers for particular members of the group can be obtained using NDG_NDFAS.

Invocation

CALL NDG_ASSOC( PARAM, VERB, IGRP, SIZE, FLAG, STATUS )

Arguments

PARAM = CHARACTER() (Given)
The parameter with which to associate the group expression.
VERB = LOGICAL (Given)
If TRUE then errors which occur whilst accessing supplied NDFs are flushed so that the user can see them before re-prompting for a new NDF ("verbose" mode). Otherwise, they are annulled and a general "Cannot access file xyz" message is displayed before re-prompting.
IGRP = INTEGER (Given and Returned)
The identifier of the group in which the NDF names are to be stored. A new group is created if the supplied value is GRP__NOID. It should be deleted when no longer needed using GRP_DELET.
SIZE = INTEGER (Returned)
The total number of NDF names in the returned group.
FLAG = LOGICAL (Returned)
If the group expression was terminated by the GRP "flag character", then FLAG is returned true. Otherwise it is returned false. Returned .FALSE. if an error occurs.
STATUS = INTEGER (Given and Returned)
The global status.

Notes: