小编给大家分享一下Oracle高级队列的示例分析,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
Oracle高级队列(Advanced Queue)简单实例
最简单的高级队列的练习,基本上都使用了默认参数。
-- Create Type
create or replace type note as Object(
subject varchar2(100),
Content varchar2(2000),CreateTime date
);
-- Create queue table
begin
sys.dbms_aqadm.create_queue_table(
queue_table => 'NOTETAB',
queue_payload_type => 'TEST.NOTE'
end;
--create queue
begin
sys.dbms_aqadm.create_queue(
queue_name => 'NOTEQ',
queue_table => 'NOTETAB',
queue_type => sys.dbms_aqadm.normal_queue,
max_retries => 5,
retry_delay => 0,
retention_time => 0);
end;
--enqueue
declare
v_Message note;
v_MsgId RAW(16);
v_options DBMS_AQ.ENQUEUE_OPTIONS_T;
v_properties DBMS_AQ.MESSAGE_PROPERTIES_T;
v_Recipients DBMS_AQ.AQ$_RECIPIENT_LIST_T;
begin
v_Message:=note(subject => 'note3',Content => 'content3',createTime => sysdate);
-- v_Recipients(0) := sys.aq$_agent('NOTE','MTQ',0);
-- v_properties.recipient_list := v_Recipients;
v_options.visibility :=DBMS_AQ.IMMEDIATE;
dbms_aq.enqueue(queue_name => 'noteq',enqueue_options => v_options,message_properties => v_properties,payload => v_Message,msgid => v_MsgId);
dbms_output.put_line('encode success,msgid is '||v_MsgId);
end;
--dequeue
declare
v_Message note;
v_MsgId RAW(16);
v_options DBMS_AQ.DEQUEUE_OPTIONS_T;
v_properties DBMS_AQ.MESSAGE_PROPERTIES_T;
v_Recipients DBMS_AQ.AQ$_RECIPIENT_LIST_T;
begin
-- v_Recipients(0) := sys.aq$_agent('NOTE','MTQ',0);
-- v_properties.recipient_list := v_Recipients;
v_options.visibility :=DBMS_AQ.IMMEDIATE;
dbms_aq.dequeue(queue_name => 'noteq',dequeue_options => v_options,message_properties => v_properties,payload => v_Message,msgid => v_MsgId);
dbms_output.put_line('decode success,msgid is '||v_MsgId);
dbms_output.put_line('subject is '||v_Message.subject);
dbms_output.put_line('Content is '||v_Message.Content);
dbms_output.put_line('createTime is '||to_char(v_Message.createTime,'yyyy-mm-dd hh34:mi:ss'));
end;
以上是“Oracle高级队列的示例分析”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注亿速云行业资讯频道!