关闭

Oracle自治事务实例讲解

发表于:2013-3-21 09:54

字体: | 上一篇 | 下一篇 | 我要投稿

 作者:IThead    来源:51Testing软件测试网采编

  一、自治事务使用情况

  无法回滚的审计:一般情况下利用触发器禁止某些对表的更新等操作时,若记录日志,则触发器最后抛出异常时会造成日志回滚。利用自治事务可防止此点。

  避免变异表:即在触发器中操作触发此触发器的表

  在触发器中使用ddl写数据库:对数据库有写操作(insert、update、delete、create、alter、commit)的存储过程或函数是无法简单的用sql来调用的,此时可以将其设为自治事务,从而避免ora-14552(无法在一个查询或dml中执行ddl、commit、rollback)、ora-14551(无法在一个查询中执行dml操作)等错误。需要注意的是函数必须有返回值,但仅有in参数(不能有out或in/out参数)。

  开发更模块化的代码: 在大型开发中,自治事务可以将代码更加模块化,失败或成功时不会影响调用者的其它操作,代价是调用者失去了对此模块的控制,并且模块内部无法引用调用者未提交的数据。

  二、Oracle 自制事务

  Oracle 自制事务是指的存储过程和函数可以自己处理内部事务不受外部事务的影响,用pragma autonomous_transaction来声明,要创建一个自治事务,您必须在匿名块的最高层或者存储过程、函数、数据包或触发的定义部分中,使用PL/SQL中的PRAGMA AUTONOMOUS_TRANSACTION语句。在这样的模块或过程中执行的SQL语句都是自治的。

  结束一个自治事务必须提交一个commit、rollback或执行ddl,否则会产生Oracle错误ORA-06519: active autonomous transaction detected and rolled back。

  三、实例

  1. ------------------------------------------------------------------------- 
  2. -- 存储过程名:P_DTMS_UPDATE_SAP 
  3. -- 插入数据到T_DATA_DTMS_TAX_EXPORTTOSAP中 
  4. -- 自治事务(pragma autonomous_transaction) 
  5. -- 2012-12-28 
  6. ------------------------------------------------------------------------- 
  7. create or replace procedure P_DTMS_UPDATE_SAP( 
  8. i_pkvalue in number, 
  9. i_opcontent_ori in VARCHAR2, 
  10. i_opcontent_dest in VARCHAR2, 
  11. i_source in varchar2 
  12. is 
  13. pragma autonomous_transaction; 
  14. begin 
  15. INSERT INTO T_DATA_DTMS_TAX_EXPORTTOSAP(ID, DTMS_TAX_INVOICE_ID, OPERATE_TYPE, EXPORT_TO_SAP_ORI, EXPORT_TO_SAP_DEST, OPERATE_TIME, SOURCE) 
  16.     VALUES(SEQ_DATA_DTMS_TAX_EXPORTTOSAP.NEXTVAL,i_pkvalue,'update',i_opcontent_ori,i_opcontent_dest,sysdate, i_source); 
  17. commit
  18. end
  19. ------------------------------------------------------------------------- 
  20. -- 触发器名称:TRG_INVOICE_EXPORTTOSAP_MODIFY 
  21. -- 当表T_DTMS_TAX_INVOICE做更新操作时触发,用于对EXPORT_TO_SAP标志位做将1改为0时,抛出异常,回滚修改,即:不允许将EXPORT_TO_SAP从1改为0 
  22. -- 2012-12-28 
  23. ------------------------------------------------------------------------- 
  24. create or replace trigger "TRG_INVOICE_EXPORTTOSAP_MODIFY" 
  25.   after update 
  26.   on T_DTMS_TAX_INVOICE 
  27.   for each row 
  28. declare v_pkvalue NUMBER(20); 
  29.         v_opcontent_ori VARCHAR2(50);--修改前的值 
  30.         v_opcontent_dst VARCHAR2(50);--修改后的值 
  31. begin 
  32.   v_pkvalue := :new.id; 
  33.   case when updating then 
  34.     v_opcontent_ori := :old.EXPORT_TO_SAP; 
  35.     v_opcontent_dst := :new.EXPORT_TO_SAP; 
  36.     if v_opcontent_ori = 1 and v_opcontent_dst = 0 then 
  37.       P_DTMS_UPDATE_SAP(v_pkvalue,v_opcontent_ori,v_opcontent_dst,'invoice');--自治事务,调用这个过程的时候它就会独立于调用它的父事务进行操作 
  38.       RAISE_APPLICATION_ERROR(-20100, 'Cannot Modify T_DTMS_TAX_INVOICE.EXPORT_TO_SAP From 1 To 0.');--抛出异常,RAISE_APPLICATION_ERROR(num,msg),num在-20000到-20999之间,msg写你希望抛出的异常。 
  39.     end if; 
  40.   end case
  41. end;

《2023软件测试行业现状调查报告》独家发布~

关注51Testing

联系我们

快捷面板 站点地图 联系我们 广告服务 关于我们 站长统计 发展历程

法律顾问:上海兰迪律师事务所 项棋律师
版权所有 上海博为峰软件技术股份有限公司 Copyright©51testing.com 2003-2024
投诉及意见反馈:webmaster@51testing.com; 业务联系:service@51testing.com 021-64471599-8017

沪ICP备05003035号

沪公网安备 31010102002173号