Delete all the pictures (except the base picture) on the current device. This routine will only execute if the current picture is the base picture, otherwise no action is taken. All picture identifiers associated with this device are released except for the current one.

CALL AGI_PDEL( STATUS )

STATUS = INTEGER (Given and returned)