09.12.2012 Views

Advanced Queuing - Oracle

Advanced Queuing - Oracle

Advanced Queuing - Oracle

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

connect CS/CS<br />

tkaqdocd.sql: Examples of Administrative and Operational Interfaces<br />

Rem<br />

Rem Dequeus messages from the 'queue' for 'consumer'<br />

CREATE OR REPLACE PROCEDURE DEQUEUE_MESSAGE(<br />

queue IN VARCHAR2,<br />

consumer IN VARCHAR2,<br />

message OUT BOLADM.order_typ)<br />

IS<br />

dopt dbms_aq.dequeue_options_t;<br />

mprop dbms_aq.message_properties_t;<br />

deq_msgid raw(16);<br />

BEGIN<br />

dopt.dequeue_mode := dbms_aq.REMOVE;<br />

dopt.navigation := dbms_aq.FIRST_MESSAGE;<br />

dopt.consumer_name := consumer;<br />

dbms_aq.dequeue(<br />

queue_name => queue,<br />

dequeue_options => dopt,<br />

message_properties => mprop,<br />

payload => message,<br />

msgid => deq_msgid);<br />

commit;<br />

END;<br />

/<br />

Rem<br />

Rem Updates the status of the order in the status table<br />

Rem<br />

CREATE OR REPLACE PROCEDURE update_status(<br />

new_status IN VARCHAR2,<br />

order_msg IN BOLADM.ORDER_TYP)<br />

IS<br />

old_status VARCHAR2(30);<br />

dummy NUMBER;<br />

BEGIN<br />

BEGIN<br />

Scripts for Implementing BooksOnLine C-17

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!