(select chaoshangxian + chaoxiaxian fromywtj_rpt_dyhgl_month tb whereto_char(add_months(to_date(tb.rptdate,''yyyymm''),12),''yyyymm'') = r.rptdateand tb.objid = r.objid) tongbiBhg,
(select jcdlb from jczl_dwjg d whered.objid = r.objid ) jcdlb,
(select jcdlbname from dic_jcdlb wherejcdlbid = (select jcdlb from jczl_dwjg where objid = r.objid)) jcdlbName
from ywtj_rpt_dyhgl_month r where rptdate =:rptYear; ②
單獨拿出來(lái)執行,速度很快,但返回的數據量很大。如果再對其循環(huán)分析,估計性能也好不到哪去,先行放棄這種嘗試。
把查詢(xún)②中的tongbiRuntime和tongbiBhg兩個(gè)字段子查詢(xún)去掉,執行速度更快,同樣再把①中的tongbiRuntime和tongbiBhg兩個(gè)字段子查詢(xún)去掉,執行速度提高很多,時(shí)間約0.157秒。
這樣速度就提高了很多,但少了去年同比的數據,那就分成兩個(gè)查詢(xún)!按這個(gè)思路下來(lái),最后得到的過(guò)程如下(只保留主要部分):
[sql] view plaincopycreateor replace procedure Rpt_Dyhgl_year(
--電壓合格率-年
v_rptyear in varchar2, --年yyyy
--rpttype in varchar2, --報表類(lèi)型,1年報,2季報
ref_cursor out sys_refcursor --返回游標
)
as
-- 變量聲明
.......
begin
delete from YWTJ_RPT_DYHGL_YEAR where RPTYEAR = v_rptyear and RPTTYPE = '1';
commit;
--查詢(xún)原始數據
v_sql := 'select rptdate, jcdlb, jcdlbName, sum(nvl(runtime,0)) sumruntime,sum(nvl(buhegeTime,0)) buhegeTime, count(jcdcount) jcdcount
from ( select rptdate, runtime,r.chaoshangxian+r.chaoxiaxian buhegeTime, r.objid, 1 jcdcount,
(select jcdlb from jczl_dwjg d whered.objid = r.objid ) jcdlb,
(select jcdlbname from dic_jcdlb wherejcdlbid = (select jcdlb from jczl_dwjg where objid = r.objid)) jcdlbName
from ywtj_rpt_dyhgl_month r where rptdate = :rptYear)
group by rptdate, jcdlb, jcdlbName
order by rptdate ,jcdlb ';
-- 插入新數據
v_sqlRptInsert := 'Insert IntoYWTJ_RPT_DYHGL_YEAR (RPTYEAR,RPTDATE,RPTTYPE) values(:RPTYEAR,:RPTDATE,:RPTTYPE)';
v_sqlRptUpdate := '';
-- 計算1--12月的當月數據
for rptmonth in 1..12 loop
-- 打開(kāi)游標開(kāi)始計算合格率
open v_cur for v_sql using v_rptyear||LPAD(rptmonth, 2, '0');
loop
fetch v_cur intov_rptDate,v_jcdlb,v_jcdLbName,v_sumRuntime,v_sumbuhegeTime,v_jcdCount;
exit when v_cur%notfound;
--計算合格率
if v_sumRuntime <> 0 then
v_hgl := (v_sumRuntime-v_sumbuhegeTime)/v_sumRuntime *100;
end if;
-- 更新當月數據
........
end loop;
close v_cur;
-- 打開(kāi)游標開(kāi)始計算同比合格率
open v_cur for v_sql using (v_rptyear-1)|| LPAD(rptmonth, 2, '0');
loop
fetch v_cur into v_rptDate,v_jcdlb,v_jcdLbName,v_sumRuntime,v_sumbuhegeTime,v_jcdCount;
exit when v_cur%notfound;
--計算合格率
if v_sumRuntime <> 0 then
v_hgl := (v_sumRuntime-v_sumbuhegeTime)/v_sumRuntime*100;
end if;
-- 更新同比數據
.........
end loop;
close v_cur;
end loop;
-- 更新累計數據
.........
-- 計算綜合合格率
........
open ref_cursor for select * fromYWTJ_RPT_DYHGL_YEAR r where r.rptyear = v_rptyear and r.rpttype = 1 order byr.rptdate;
end Rpt_Dyhgl_year;
經(jīng)驗證,執行速度大約在一秒多,也就是說(shuō)性能從原來(lái)的900多秒提高到1秒,提高差不多三個(gè)數量級。
分析:
1) 在數據量大時(shí),子查詢(xún)的性能會(huì )受到比較大的影響;
2) 在子查詢(xún)中使用了函數to_char(add_months(to_date(tb.rptdate,'yyyymm'),12),'yyyymm'),對大數據量查詢(xún)時(shí),執行函數也會(huì )對系統產(chǎn)生比較大的影響。
原文轉自:http://kjueaiud.com