create or replace package body PKG_OtherReports is
Procedure Pro_GetQianCeZData
(
rq_in in date,
cur_out out pkg_general.ROW_CURSOR
)
as
begin
OPEN cur_out FOR
select t.id, dep.depname zydw,zz.dwmc jz, 0 yjh,t.rjc,t.yljjc,0 njh,t.nljjc,
(select count(sgjh) from QTHB_QIANCEZ t1 where to_char(rq,‘yyyyMM’) = to_char(rq_in,‘yyyyMM’) and t1.dhid = t.dhid group by t1.sgjh,t1.kzrq) kz_ylj,
(select count(sgjh) from QTHB_QIANCEZ t1 where to_char(rq,‘yyyy’) = to_char(rq_in,‘yyyy’) and t1.dhid = t.dhid group by t1.sgjh,t1.kzrq) kz_nlj
from QTHB_QIANCEZ t
join sys_department dep on dep.id = t.DH_DEPID
join sys_duiwuzizhi zz on zz.id = t.DHID ;
end Pro_GetQianCeZData;
end PKG_OtherReports;