Advanced Queuing - Oracle

END;
BEGIN
DBMS_AQADM.SCHEDULE_PROPAGATION(queue_name => ’msg_queue_multiple’,
destination => ’another_db.world’);
END;
END;
DECLARE
enqueue_options DBMS_AQ.enqueue_options_t;
message_properties DBMS_AQ.message_properties_t;
recipients DBMS_AQ.aq$_recipient_list_t;
message_handle RAW(16);
message aq.message_typ;
/* Enqueue MESSAGE 1 for subscribers to the queue
i.e. for RED at address another_msg_queue and GREEN at address msg_
queue@another_db.world: */
BEGIN
message := message_typ(’MESSAGE 1’,
’This message is queued for queue subscribers.’);
DBMS_AQ.ENQUEUE(queue_name => ’msg_queue_multiple’,
enqueue_options => enqueue_options,
message_properties => message_properties,
payload => message,
msgid => message_handle);
/* Enqueue MESSAGE 2 for specified recipients i.e. for RED at address
another_msg_queue and BLUE.*/
message := message_typ(’MESSAGE 2’,
’This message is queued for two recipients.’);
recipients(1) := aq$_agent(’RED’, ’another_msg_queue’, NULL);
recipients(2) := aq$_agent(’BLUE’, NULL, NULL);
message_properties.recipient_list := recipients;
DBMS_AQ.ENQUEUE(queue_name => ’msg_queue_multiple’,
enqueue_options => enqueue_options,
message_properties => message_properties,
payload => message,
msgid => message_handle);
COMMIT;
END;
Propagation
Oracle Advanced Queuing by Example A-63