背景：

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

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

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


设想：

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

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

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


实现：

创建log表：

CREATETABLESFIS1.JOBSUBMIT_LOG(EXE_TIMEDATE,DATAXVARCHAR2(5BYTE))


创建子过程：

CREATEORREPLACEPROCEDURESFIS1.JOB_SUBMIT(DATA3INVARCHAR2)ISBEGINIFDATA3='1'THENdbms_lock.sleep(10);--模拟子过程执行10秒需要insertintosfis1.jobsubmit_logvalues(SYSDATE,DATA3);ELSEinsertintosfis1.jobsubmit_logvalues(SYSDATE,DATA3);ENDIF;commit;EXCEPTIONWHENOTHERSTHENDBMS_OUTPUT.PUT_LINE('FAIL2!');END;


创建主过程：

CREATEORREPLACEPROCEDURESFIS1.JOB_SP(DATA1INVARCHAR2,DATA2INVARCHAR2)ISSTART_TIMEDATE;l_jobNUMBER;BEGINSTART_TIME:=SYSDATE;DBMS_OUTPUT.PUT_LINE('StartTime:'||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('ElapsedTime:'||CEIL((SYSDATE-START_TIME)*24*60*60));--计算主过程运行总时间EXCEPTIONWHENOTHERSTHENDBMS_OUTPUT.PUT_LINE('FAIL!');END;


执行主过程：

execSFIS1.JOB_SP('1','2');

结果：

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

查询log表：

select*fromsfis1.jobsubmit_log;

2019/6/4 10:11:132
2019/6/4 10:11:231 --进一步说明子过程异步在后台执行


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

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

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