全面学习ORACLE Scheduler特性(8)Application抛出的Events

4.2 Application抛出的Events

　　首先要说明，这里所说的Application是个代词，即可以表示ORACLE数据库之外的应用程序，也可以是ORACLE数据库中的PROCEDURE等对象，总之你就将其理解成用户自己创建的对象就好了。

　　Scheduler 能够抛出Events让外部应用处理，外部的应用也可以抛出Events让Scheduler启动job处理，不过并不是任何job都能够对外部应用抛出的Events做出响应，必须在创建jobs时明确指定响应的事件。那么如何指定呢？依靠下列两个附加的参数：

• queue_spec ：指定外部应用抛出的events消息入队的队列名；
• event_condition ：指定触发job启动的条件，这一参数的参数值在设置时应当基于事件消息的自身属性，因为事件消息在入队时，消息的属性都是由application定义的，因此在设置触发条件时，也应该根据这些属性值就行设置。

　　下面，我们就演示创建一个由event触发启动的job，在此之前，首先需要进行一些准备工具，比如创建队列，由于队列需要基于一个队列表，因此在创建队列之前，首先要创建一个队列表，考虑到队列表需要依赖一个对象类型，因此在创建队列表之前，先得创建一个type.......复杂，具体的操作步骤如下，客官可要看仔细了：

SQL> create or replace type jss_type 1  as object

2  (

3    event_type         VARCHAR2( 1 0),

4    object_owner       VARCHAR2( 30 ),

5    object_name        VARCHAR2( 3 0)

6  );

7  /

Type created.

SQL> begin

2    dbms_aqadm.create_queue_table(

3      queue_table        => 'my_queue_tbl1',

4      queue_payload_type => 'JSS_TYPE1',

5      multiple_consumers => true);

6  end;

7  /

PL/SQL procedure successfully completed.

SQL> begin

2    dbms_aqadm.create_queue(

3      queue_name  => 'event_t1',

4      queue_table => 'my_queue_tbl1');

5  end;

6  /

PL/SQL procedure successfully completed.

　　OK, 准备工作完成，下面就来创建一个event触发启动的job，创建脚本如下：

SQL> BEGIN

2  DBMS_SCHEDULER.CREATE_JOB (

3     job_name            =>  'EVENT_JOB_T1',

4     job_type            =>  'STORED_PROCEDURE',

5     job_action          =>  'P_INSERTINTOTEST',

6     event_condition     =>  'tab.user_data.event_type = ''OP_INSERT''',

7     queue_spec          =>  'EVENT_T1',

8     enabled             =>  TRUE);

9  END;

10  /

PL/SQL procedure successfully completed.

　　上述脚本仅做演示，因此创建的job仍然执行P_INSERTINTOTEST过程。

　　三思并不准备再编写一套外部的应用来触发，这里仅为了演示application触发job启动的示例，因此三思决定通过pl/sql直接向event_t1队列中添加消息的方式，触发job的启动，具体操作如下。

　　首先要执行DBMS_AQADM.START_QUEUE过程，将event_t1置于允许入队和出队状态(默认情况下创建的队列是不允许出队和入队操作的)，脚本如下：

SQL> exec dbms_aqadm.start_queue(queue_name => 'event_t1',enqueue => true,dequeue => true);

PL/SQL procedure successfully completed.

　　执行入队操作：

SQL> declare

2    v_Message           jss_type1;

3    v_EnqueueOptions    dbms_aq.enqueue_options_t;

4    v_MessageProperties dbms_aq.message_properties_t;

5    v_msg_handle        raw(16);

6  begin

7    v_message := jss_type1('OP_ SELECT ', user, 'tmpObj');

8

9    dbms_aq.enqueue(queue_name         => 'event_t1',

10                    enqueue_options    => v_enqueueOptions,

11                    message_properties => v_messageproperties,

12                    payload            => v_message,

13                    msgid              => v_msg_handle);

14    commit;

15

16  end;

17  /

PL/SQL procedure successfully completed.

　　查询队列表中的数据：

SQL> select user_data from my_queue_tbl1;

USER_DATA(EVENT_TYPE, OBJECT_OWNER, OBJECT_NAME)

---------------------------------------------------------

JSS_TYPE1('OP_SELECT', 'TEST', 'tmpObj')

　　然后查询job

SQL> select to_char(created,'yyyy-mm-dd hh24:mi:ss') from jss_1;

TO_CHAR(CREATED,'YY

-------------------

2009-08-25 12:49:29

　　看起来jss_1表中并未有新增加记录，似乎job没有执行啊。这很正常，还记得咱们创建job时指定的 event_condition 条件吗：

6     event_condition     =>  'tab.user_data.event_type = ''OP_INSERT''',

　　没错，只有当event_type为'OP_INSERT'时才会触发job的执行，前面入队时指定的是 OP_ SELECT ，当然没有触发job中指定的procedure啦，下面再次执行入队操作：

SQL> declare

2    v_Message           jss_type1;

3    v_EnqueueOptions    dbms_aq.enqueue_options_t;

4    v_MessageProperties dbms_aq.message_properties_t;

5    v_msg_handle        raw(16);

6  begin

7    v_message := jss_type1('OP_INSERT', user, 'tmpObj');

8

9    dbms_aq.enqueue(queue_name         => 'event_t1',

10                    enqueue_options    => v_enqueueOptions,

11                    message_properties => v_messageproperties,

12                    payload            => v_message,

13                    msgid              => v_msg_handle);

14    commit;

15

16  end;

17  /

　　再次查看jss_1表看看：

SQL> select to_char(created,'yyyy-mm-dd hh24:mi:ss') from jss_1;

TO_CHAR(CREATED,'YY

-------------------

2009-08-25 12:49:29

2009-08-25 13:21:21

　　多了一条记录，说明job已经被自动触发。

　　最后再补充一句，基于event的job不能通过DBMS_SCHEDULER.RUN_JOB过程执行，否则会触发ORA-00942: table or view does not exist错误。