Oracle调度Schedule特性（第九部分） - 应用或自定义程序抛出的Events

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/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/31358702/viewspace-2154527/