ITPub博客

首页 > 数据库 > Oracle > Oracle调度Schedule特性(第九部分) - 应用或自定义程序抛出的Events

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

原创 Oracle 作者:edge_dba 时间:2018-05-15 16:56:07 0 删除 编辑
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博客 ” ,链接:https://blog.itpub.net/31358702/viewspace-2154527/ ,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2016-06-07

  • 博文量
    28
  • 访问量
    71023