BEGIN
 dbms_aqadm.create_queue_table(queue_table        => 'my_queue_tab_name'
							  ,queue_payload_type => 'SYS.XMLTYPE');

 dbms_aqadm.create_queue(queue_name  =>'my_queue'
						,queue_table =>  'my_queue_tab_name');

 dbms_aqadm.start_queue(queue_name =>'my_queue');
END;
/

BEGIN
 dbms_scheduler.create_program(program_name   =>'my_job_program_name'
							  ,program_type   => 'STORED_PROCEDURE'
							  ,program_action => 'pk_my_queue.dequeue'
							  ,enabled        => TRUE
							  ,comments       => 'DEQUEUE PROGRAM');

 dbms_scheduler.create_schedule(schedule_name   => 'my_schedule_name'
							   ,repeat_interval => 'FREQ=MINUTELY; INTERVAL=10;'
							   ,comments        => 'QUEUE JOB schedule');

dbms_scheduler.create_job(job_name      => 'my_job_name'
						 ,program_name  => 'my_job_program_name'
						 ,schedule_name => 'my_schedule_name'
						 ,enabled       => TRUE
						 ,auto_drop     => FALSE
						 ,comments      => 'QUEUE JOB');

END;
/

  dbms_aq.dequeue(queue_name         => sys_context('userenv', 'current_schema')||'.'||'my_queue'
				 ,dequeue_options    => l_dequeue_options
				 ,message_properties => l_message_properties
				 ,payload            => l_xml
				 ,msgid              => l_message_handle);

BEGIN
  dbms_scheduler.stop_job(job_name =>  'my_job_name'
						 ,force    => TRUE);
 END;
/