AGI_IPOBS - Is current picture obscured by another?

Description:

Inquire if the current picture is obscured, either totally or partially by another picture. Obscured means that a picture intersects the current picture and was created more recently. If the input value for the picture identifier is negative the current picture is tested against all other overlying pictures; i.e. those created more recently than the current picture. If the picture identifier corresponds to a valid picture then the current one is only tested against the given one.

Invocation:

CALL AGI_IPOBS( PICID, LOBS, STATUS )

Arguments:

PICID = INTEGER (Given)

Picture identifier.

LOBS = LOGICAL (Returned)

True if picture is obscured, otherwise false.

STATUS = INTEGER (Given and Returned)

The global status