我的编程空间,编程开发者的网络收藏夹
学习永远不晚

不为人知的技术--Oracle并行异步执行存储过程

短信预约 -IT技能 免费直播动态提醒
省份

北京

  • 北京
  • 上海
  • 天津
  • 重庆
  • 河北
  • 山东
  • 辽宁
  • 黑龙江
  • 吉林
  • 甘肃
  • 青海
  • 河南
  • 江苏
  • 湖北
  • 湖南
  • 江西
  • 浙江
  • 广东
  • 云南
  • 福建
  • 海南
  • 山西
  • 四川
  • 陕西
  • 贵州
  • 安徽
  • 广西
  • 内蒙
  • 西藏
  • 新疆
  • 宁夏
  • 兵团
手机号立即预约

请填写图片验证码后获取短信验证码

看不清楚,换张图片

免费获取短信验证码

不为人知的技术--Oracle并行异步执行存储过程

背景:

最近遇到一个case,Client端程式调用存储过程SP1,过程SP1执行完成后返回结果到Client。

因为过程SP1执行时间要5秒钟,时间太长Client用户无法接受。

分析主过程SP1性能,发现主要是其中调用的子过程SP2执行需要4秒,且子过程SP2中一条SQL因为资料量巨大逻辑复杂已无优化可能。另外子过程SP2的主要是计算审计功能并记录日志作用的。


设想:

能否让用户执行主过程时不等子过程完成就 直接返回结果 ,子过程异步方式在后台慢慢的运行?

直接通过Oracle的技术能否实现?

答案是可以的,通过DBMS_JOB.SUBMIT 下面的方法可以实现。


实现:

创建log表:


CREATE TABLE SFIS1.JOBSUBMIT_LOG
(
  EXE_TIME  DATE,
  DATAX     VARCHAR2(5 BYTE)
)


创建子过程:


CREATE OR REPLACE PROCEDURE SFIS1.JOB_SUBMIT (DATA3  IN  VARCHAR2)
IS
BEGIN
    IF DATA3='1' THEN
        dbms_lock.sleep(10); --模拟子过程执行10秒需要
        insert into sfis1.jobsubmit_log values(SYSDATE,DATA3);
    ELSE
        insert into sfis1.jobsubmit_log values(SYSDATE,DATA3);
    END IF;
    commit;
EXCEPTION
   WHEN OTHERS
   THEN
    DBMS_OUTPUT.PUT_LINE('FAIL2!');       
END;


创建主过程:


CREATE OR REPLACE PROCEDURE SFIS1.JOB_SP (DATA1  IN  VARCHAR2,DATA2  IN  VARCHAR2)
IS
   START_TIME   DATE;
   l_job        NUMBER;
BEGIN
   START_TIME := SYSDATE;
   DBMS_OUTPUT.PUT_LINE ('Start Time:' || TO_CHAR (START_TIME, 'YYYY-MM-DD-HH24:MI:SS'));
   DBMS_JOB.submit (l_job, 'SFIS1.JOB_SUBMIT('||data1||');');
   DBMS_JOB.submit (l_job, 'SFIS1.JOB_SUBMIT('||data2||');');
   COMMIT;
   DBMS_OUTPUT.PUT_LINE ('Elapsed Time:' || CEIL ( (SYSDATE - START_TIME) * 24 * 60 * 60)); --计算主过程运行总时间
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.PUT_LINE ('FAIL!');
END;


执行主过程:


exec SFIS1.JOB_SP('1','2');

结果:

Start Time:2019-06-04-10:11:12
Elapsed Time:0 --执行时间0秒,说明子过程已经异步在后台执行了,主过程并没有等待子过程执行完成

查询log表:


select * from sfis1.jobsubmit_log;

2019/6/4 10:11:13     2
2019/6/4 10:11:23     1   --进一步说明子过程异步在后台执行


以上,主要通过 DBMS_JOB.SUBMIT 并行异步后台执行存储过程。

本文使用技术主要参考Tom大师:

https://asktom.oracle.com/pls/asktom/asktom.search?tag=execute-procedures-concurently-in-a-procedure

免责声明:

① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。

② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341

不为人知的技术--Oracle并行异步执行存储过程

下载Word文档到电脑,方便收藏和打印~

下载Word文档

编程热搜

目录