AGI_PTREF - Store a reference object in a picture

Description:

This creates a reference to a data object in the database. The argument can be either an HDS locator or any character string reference. If the string is a valid HDS locator then a reference is constructed to point to the relevant object, otherwise the string is assumed to be a reference itself and is stored as supplied. The picture identifier signifies which picture to put the reference into. If this identifier is negative then the current picture is used. If a reference already exists for the given picture then an error is returned.

Invocation:

CALL AGI_PTREF( DATREF, PICID, STATUS )

Arguments:

DATREF = CHARACTER $*$ ( $*$ ) (Given)

String containing reference object

PICID = INTEGER (Given)

Picture identifier

STATUS = INTEGER (Given and Returned)

The global status