今天一个朋友问我如何监测一个PL/SQL的运行状况，这里简单介绍几种方法。
介绍最简单的INSERT的方法。
他们的问题是执行下面的PL/SQL代码：
SQL> SET SERVEROUT ON
SQL> BEGIN
2 DBMS_OUTPUT.PUT_LINE('A');
3 DBMS_LOCK.SLEEP(10);
4 DBMS_OUTPUT.PUT_LINE('B');
5 DBMS_LOCK.SLEEP(10);
6 DBMS_OUTPUT.PUT_LINE('C');
7 END;
8 /
A
B
C
PL/SQL过程已成功完成。
他们希望在PL/SQL代码运行一开始就得到A，运行10秒后，得到B，最后运行完成的时候，得到C。
但是，DBMS_OUTPUT包的调用是发生在PL/SQL代码结束之后的，也就是说，不可能在PL/SQL运行的过程中分批的得多DBMS_OUTPUT的输出结果，最终的输出结果是A、B、C同时输出。
其实解决这个问题的方法很多，最简单的方法是通过INSERT就能解决这个问题。
SQL> CREATE TABLE T_RECORD
2 (STR VARCHAR2(10),
3 TIME DATE);
表已创建。
SQL> BEGIN
2 INSERT INTO T_RECORD VALUES ('A', SYSDATE);
3 COMMIT;
4 DBMS_LOCK.SLEEP(10);
5 INSERT INTO T_RECORD VALUES ('B', SYSDATE);
6 COMMIT;
7 DBMS_LOCK.SLEEP(10);
8 INSERT INTO T_RECORD VALUES ('C', SYSDATE);
9 COMMIT;
10 END;
11 /
PL/SQL过程已成功完成。
这时通过另一个会话就可以时刻检查会话执行到哪个步骤了：
SQL> ALTER SESSION SET NLS_DATE_FORMAT = 'YYYY-MM-DD HH24:MI:SS';
会话已更改。
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:37:18
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:37:18
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:37:18
B 2010-04-26 16:37:28
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:37:18
B 2010-04-26 16:37:28
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:37:18
B 2010-04-26 16:37:28
C 2010-04-26 16:37:39
当然这种方法的前提是PL/SQL中可以提交，如果整个PL/SQL代码是一个完整的事务，或者COMMIT是根据业务需要，那么就不能采用这个方法。需要简单的变通一下，利用自治事务的方式：
SQL> TRUNCATE TABLE T_RECORD;
表已截掉。
SQL> CREATE OR REPLACE PROCEDURE P_RECORD (P_STR IN VARCHAR2) AS
2 PRAGMA AUTONOMOUS_TRANSACTION;
3 BEGIN
4 INSERT INTO T_RECORD VALUES (P_STR, SYSDATE);
5 COMMIT;
6 END;
7 /
过程已创建。
SQL> BEGIN
2 P_RECORD('A');
3 DBMS_LOCK.SLEEP(10);
4 P_RECORD('B');
5 DBMS_LOCK.SLEEP(10);
6 P_RECORD('C');
7 END;
8 /
PL/SQL过程已成功完成。
在另一个会话中可以检查会话运行的状态：
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:49:59
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:49:59
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:49:59
B 2010-04-26 16:50:09
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:49:59
B 2010-04-26 16:50:09
SQL> SELECT * FROM T_RECORD;
STR TIME
---------- -------------------
A 2010-04-26 16:49:59
B 2010-04-26 16:50:09
C 2010-04-26 16:50:20
这种方法的最大优点就是简单，编码量也很小，需要的辅助对象仅仅是一张表和一个存储过程而已。
oracle视频教程请关注:http://u.youku.com/user_video/id_UMzAzMjkxMjE2.html
