API to purge records from advance queue

How to clear a queue in Oracle AQ

DECLARE
 t_purge_q dbms_aqadm.aq$_purge_options_t;
BEGIN
  dbms_aqadm.purge_queue_table('XXQUEUE', NULL, t_purge_q);
END;
 /

XXQUEUE is your queue name