最初由 WL_ZCJ 發(fā)布

[B]create or replace procedure p_97_auto_cron as

ret_flag? ?? ?number;

ret_errmsg? ? varchar2(200);

as_area_id? ? number;

as_staff_id? ?number;

as_begin_time varchar2(20);

as_end_time? ?varchar2(20);

begin

as_staff_id? ?:= -1;

for rec in (select 1 area_id from dual

union

select 2 area_id from dual

union

select 3 area_id from dual

union

select 5 area_id from dual

union

select 6 area_id from dual

union

select 8 area_id from dual

) loop

begin

as_area_id := rec.area_id;

as_begin_time := to_char(trunc(sysdate,'DD')-1, 'yyyymmddhh24miss');

as_end_time? ?:= to_char(trunc(sysdate,'DD'),? ?'yyyymmddhh24miss');

p_97_auto_get_ask(as_begin_time, as_end_time, as_area_id, ret_flag, ret_errmsg);

dbms_session.close_database_link('hxtojf');

exception

when others then

ret_errmsg := sqlerrm;

insert into system_log(operate_time,staff_id,event,id)

values(sysdate,as_staff_id,'('||as_area_id||')'||ret_errmsg, 4200+as_area_id);

commit;

end;

end loop;

end;

在執(zhí)行該存儲(chǔ)過(guò)程是,循環(huán)執(zhí)行一次后就報(bào)一個(gè)ORA-02041的問(wèn)題,經(jīng)分析是子過(guò)程p_97_auto_get_ask中用到的數(shù)據(jù)庫(kù)鏈沒(méi)有釋放,通過(guò)在子過(guò)程后加dbms_session.close_database_link('hxtojf');??解決了此問(wèn)題.

不知道哪位大俠那有比較全的ORACLE函數(shù)文檔 [/B]

總結(jié)

以上是生活随笔為你收集整理的oracle中的自带函数,求完整的ORACLE自带函数文档的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。