create or replace PROCEDURE TestA
(a VARCHAR2,
b VARCHAR2
)
IS
vs_str VARCHAR2(10);
BEGIN
INSERT INTO test_table_t VALUES(a);
vs_str := b;
TestB(bs_str);
ROLLBACK;
END;
--将过程TestB(msg varchar2)定义为自治事务:
create or replace PROCEDURE TestB(msg varchar2)
IS
PRAGMA autonomous_transaction;
BEGIN
INSERT INTO test_table_t VALUES(msg);
COMMIT;
END;
这样,test_table_t中之前TestA过程写入的数据就会因为TestA过程的rollback而回滚掉。而因为TestA调用了被定义为自治事务的TestB,而且TestB也向表test_table_t中写入了数据b并做了commit操作。
那么,TestA的rollback对TestB写入的数据就没有影响,而且TestB的commit对TestA的rollback也不会有影响。表test_table_t中会保留数据b。