使用場景:
當(dāng)一個(gè)PL/SQL程序執(zhí)行出錯(cuò) 需要輸出log信息到數(shù)據(jù)庫表中的時(shí)候 就會遇到這個(gè)難題.
log的內(nèi)容要提交到表中 但是前面出錯(cuò)的內(nèi)容卻不能提交.雖然我們可以在出錯(cuò)時(shí)先Rollback 等log好了
再commit.但是這樣畢竟比較麻煩.實(shí)際上PL/SQL本身支持嵌套事務(wù).
看下面的小例子:
CREATE OR REPLACE procedure Test1
as
PRAGMA AUTONOMOUS_TRANSACTION; -- 關(guān)鍵就是這句
begin
--set transaction read write;
insert into aaa values(1,4,7);
commit;
end;
/
CREATE OR REPLACE procedure Test2
as
begin
--set transaction read write;
insert into aaa values(2,5,8);
Test1;
insert into aaa values(3,6,9);
rollback;
end;
/
當(dāng)execute Test2完了時(shí)在AAA表中插入了一行(1,4,7)。
--------------------------------------------------------------------------------------------------------------------------
理論知識:
AUTONOMOUS TRANSACTION(自治事務(wù))的介紹:
在基于低版本的ORACLE做一些項(xiàng)目的過程中,有時(shí)會遇到一些頭疼的問題.,比如想在執(zhí)行當(dāng)前一個(gè)由多個(gè)DML組成的transaction(事務(wù))時(shí),為每一步DML記錄一些信息到跟蹤表中,由于事務(wù)的原子性,這些跟蹤信息的提交將決定于主事務(wù)的commit或rollback. 這樣一來寫程序的難度就增大了, 程序員不得不把這些跟蹤信息記錄到類似數(shù)組的結(jié)構(gòu)中,然后在主事務(wù)結(jié)束后把它們存入跟蹤表.哎,真是麻煩!
有沒有一個(gè)簡單的方法解決類似問題呢?
ORACLE8i的AUTONOMOUS TRANSACTION(自治事務(wù),以下AT)是一個(gè)很好的回答。
AT 是由主事務(wù)(以下MT)調(diào)用但是獨(dú)立于它的事務(wù)。在AT被調(diào)用執(zhí)行時(shí),MT被掛起,在AT內(nèi)部,一系列的DML可以被執(zhí)行并且commit或rollback.
注意由于AT的獨(dú)立性,它的commit和rollback并不影響MT的執(zhí)行效果。在AT執(zhí)行結(jié)束后,主事務(wù)獲得控制權(quán),又可以繼續(xù)執(zhí)行了。
如何實(shí)現(xiàn)AT的定義呢?我們來看一下它的語法。其實(shí)非常簡單。
只需下列PL/SQL的聲明部分加上PRAGMA AUTONOMOUS_TRANSACTION 就可以了。
1. 頂級的匿名PL/SQL塊
2. Functions 或 Procedure(獨(dú)立聲明或聲明在package中都可)
3. SQL Object Type的方法
4. 觸發(fā)器。
比如:
在一個(gè)獨(dú)立的procedure中聲明AT
CREATE OR REPLACE PROCEDURE
Log_error(error_msg IN VARCHAR2(100))
IS
PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
Insert into Error_log values ( sysdate,error_msg);
COMMIT;
END;
下面我們來看一個(gè)例子,(win2000 advanced server + oracle8.1.6 , connect as scott)
建立一個(gè)表:
create table msg (msg varchar2(120));
首先,用普通的事務(wù)寫個(gè)匿名PL/SQL塊:
declare
cnt number := -1; --} Global variables
procedure local is
begin
select count(*) into cnt from msg;
dbms_output.put_line('local: # of rows is '||cnt);
insert into msg values ('New Record');
commit;
end;
begin
delete from msg ;
commit;
insert into msg values ('Row 1');
local;
select count(*) into cnt from msg;
dbms_output.put_line('main: # of rows is '||cnt);
rollback;
local;
insert into msg values ('Row 2');
commit;
local;
select count(*) into cnt from msg;
dbms_output.put_line('main: # of rows is '||cnt);
end;
運(yùn)行結(jié)果(注意打開serveroutput)
local: # of rows is 1 -> 子程序local中可以’看到’主匿名塊中的uncommitted記錄
main: # of rows is 2 -> 主匿名塊可以’看到’2條記錄(它們都是被local commit掉的)
local: # of rows is 2 -> 子程序local首先’看到’2條記錄,然后又commit了第三條記錄
local: # of rows is 4 -> 子程序local又’看到’了新增加的記錄(它們都是被local commit掉的),然后又commit了第五條記錄
main: # of rows is 5 -> 主匿名塊最后’看到’了所有的記錄.
從這個(gè)例子中,我們看到COMMIT和ROLLBACK的位置無論是在主匿名塊中或者在子程序中,都會影響到整個(gè)當(dāng)前事務(wù).
現(xiàn)在用AT改寫一下匿名塊中的procedure local:
...
procedure local is
pragma AUTONOMOUS_TRANSACTION;
begin
...
重新運(yùn)行(注意打開serveroutput)
local: # of rows is 0 -> 子程序local中無法可以’看到’主匿名塊中的uncommitted記錄 (因?yàn)樗仟?dú)立的)
main: # of rows is 2 -> 主匿名塊可以’看到’2條記錄,但只有一條是被commited.
local: # of rows is 1 -> 子程序local中可以’看到’它前一次commit的記錄,但是主匿名塊中的記錄已經(jīng)被提前rollback了
local: # of rows is 3 -> 子程序local 中可以’看到’3條記錄包括主匿名塊commit的記錄
main: # of rows is 4 ->主匿名塊最后’看到’了所有的記錄.
很明顯,AT是獨(dú)立的,在它執(zhí)行時(shí),MT被暫停了. AT的COMMIT,ROLLBACK并不影響MT的執(zhí)行.
運(yùn)用AT時(shí),有一些注意事項(xiàng),簡單列舉如下:
1. 在匿名PL/SQL塊中,只有頂級的匿名PL/SQL塊可以被設(shè)為AT
2. 如果AT試圖訪問被MT控制的資源,可能有deadlock發(fā)生.
3. Package 不能被聲明為AT,只有package所擁有的function和procedure 才能聲明為AT
4. AT程序必須以commit 或rollback結(jié)尾,否則會產(chǎn)生Oracle錯(cuò)誤ORA-06519: active autonomous transaction detected and rolled back
在程序開發(fā)時(shí),如果充分運(yùn)用AUTONOMOUS TRANSACTION的特性,一定能取得事倍功半的效果.