This returns a reference to a data object which has been stored in the database. The picture identifier signifies which picture to obtain the reference from. If this identifier is negative then the current picture is used. If no reference object is found for the given picture an error is returned. If the reference was created from an HDS locator then an HDS locator is returned, and this should be annulled in the application using REF_ANNUL to ensure the file is properly closed.

CALL AGI_GTREF ( PICID, MODE, DATREF, STATUS )

PICID = INTEGER (Given)

MODE = CHARACTER $\ast$ ( $\ast$ ) (Given)

DATREF = CHARACTER $\ast$ ( $\ast$ ) (Returned)

STATUS = INTEGER (Given and Returned)