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.

CALL AGI_IPOBS( PICID, LOBS, STATUS )

PICID = INTEGER (Given)

LOBS = LOGICAL (Returned)

STATUS = INTEGER (Given and Returned)