Scheduler 能够抛出Events让外部应用处理,外部的应用也可以抛出Events让Scheduler启动job处理,不过并不是任何job都能够对外部应用抛出的Events做出响应,
必须在创建jobs时明确指定响应的事件。那么如何指定呢?依靠下列两个附加的参数
queue_spec 指定外部应用抛出的events消息入队的队列名
event_condition 指定触发job启动的条件,这一参数的参数值在设置时应当基于事件消息的自身属性,因为事件消息在入队时,
消息的属性都是由application定义的,因此在设置触发条件时,也应该根据这些属性值就行设置。
我们演示创建一个由event触发启动的job,在此之前,首先需要进行一些准备工具,比如创建队列,由于队列需要基于一个队列表,因此在创建队列之前,
首先要创建一个队列表,考虑到队列表需要依赖一个对象类型,因此在创建队列表之前,先得创建一个type,具体的操作步骤如下
create or replace type mytype1 as object
(
event_type varchar2(10),
object_owner varchar2(30),
object_name varchar2(30)
);
begin
dbms_aqadm.create_queue_table(queue_table => 'myqueuetb1',
queue_payload_type => 'mytype1',
multiple_consumers => true);
end;
begin
dbms_aqadm.create_queue(queue_name => 'event1',
queue_table => 'myqueuetb1');
end;
准备工作完成,下面就来创建一个event触发启动的job,创建脚本如下:
begin
dbms_scheduler.create_job(job_name => 'evnetjobt1',
job_type => 'stored_procedure',
job_action => 'insert_test1',
event_condition => 'tab.user_data.event_type = ''OP_INSERT''',
queue_spec => 'event1',
enabled => true);
end;
上述脚本仅做演示,因此创建的job仍然执行insert_test1过程。我也不准备再编写一套外部的应用来触发,这里仅为了演示application触发job启动的示例,
因此通过pl/sql直接向event1队列中添加消息的方式,触发job的启动,具体操作如下。
首先要执行DBMS_AQADM.START_QUEUE过程,将event1置于允许入队和出队状态(默认情况下创建的队列是不允许出队和入队操作的),脚本如下
begin
dbms_aqadm.start_queue(queue_name => 'event1',enqueue => true,dequeue => true);
end;
执行入队操作
declare
v_Message mytype1;
v_EnqueueOptions dbms_aq.enqueue_options_t;
v_MessageProperties dbms_aq.message_properties_t;
v_msg_handle raw(16);
begin
v_message := mytype1('OP_ SELECT ', user, 'tmpObj');
dbms_aq.enqueue(queue_name => 'event1',
enqueue_options => v_enqueueOptions,
message_properties => v_messageproperties,
payload => v_message,
msgid => v_msg_handle);
commit;
end;
查询队列表中的数据
select user_data from myqueuetb1;
USER_DATA(EVENT_TYPE, OBJECT_OWNER, OBJECT_NAME)
---------------------------------------------------------
mytype1('OP_SELECT', 'TEST', 'tmpObj')
然后查询job
select to_char(created,'yyyy-mm-dd hh24:mi:ss') from test;
TO_CHAR(CREATED,'YY
-------------------
2018-05-15 12:49:29
看起来test表中并未有新增加记录,似乎job没有执行啊。这很正常,还记得咱们创建job时指定的 event_condition 条件吗?
event_condition => 'tab.user_data.event_type = ''OP_INSERT''',
没错,只有当event_type为'OP_INSERT'时才会触发job的执行,前面入队时指定的是 OP_ SELECT ,当然没有触发job中指定的procedure啦,下面再次执行入队操作
declare
v_Message mytype1;
v_EnqueueOptions dbms_aq.enqueue_options_t;
v_MessageProperties dbms_aq.message_properties_t;
v_msg_handle raw(16);
begin
v_message := mytype1('OP_ SELECT ', user, 'tmpObj');
dbms_aq.enqueue(queue_name => 'event1',
enqueue_options => v_enqueueOptions,
message_properties => v_messageproperties,
payload => v_message,
msgid => v_msg_handle);
commit;
end;
再次查看test表看看:
select to_char(created,'yyyy-mm-dd hh24:mi:ss') from test;
TO_CHAR(CREATED,'YY
TO_CHAR(CREATED,'YY
-------------------
2018-05-15 12:49:29
2018-05-15 12:59:29
多了一条记录,说明job已经被自动触发。
最后再补充一句,基于event的job不能通过DBMS_SCHEDULER.RUN_JOB过程执行,否则会触发ORA-00942: table or view does not exist错误。
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/31358702/viewspace-2154527/,如需转载,请注明出处,否则将追究法律责任。