|
|
你好,按照技术人员说的,修改了过程,但错误是一样的。下面是我的过程:
create or replace
package SP_TEST AS
type t_cursor is ref cursor;
procedure cbp_ypyhz(ny1 varchar2, ny2 varchar2,c_ref out t_cursor);
end;
CREATE or replace package body SP_TEST as
procedure cbp_ypyhz(ny1 varchar2, ny2 varchar2,c_ref out t_cursor) is
qs number;
jz number;
begin
--SET NOCOUNT ON;
delete from tlk_cbt_ypygl_temp1;
delete from tlk_cbt_ypygl_temp2;
qs := ny1;
jz := ny2;
insert into tlk_cbt_ypygl_temp1
(id,
domainid,
item_pzdma000,
item_pzmcheng,
item_jcun0000,
item_ljsliang,
item_cksliang,
item_qmkcun00,
item_rksliang)
select id,
domainid,
item_pzdma000,
item_pzhong00,
sum(jz),
sum(rk),
sum(jz + rk) lj,
sum(ck),
sum(jz + rk - ck)
from (select id,
domainid,
item_RIQ00000,
item_pzdma000,
item_pzhong00,
'0' jz,
to_char(nvl(item_rksliang, 0)) rk,
'0' lj,
to_char(nvl(item_cksliang, 0)) ck,
'0' jcun
from tlk_cbtypyglwhu t
union all
select id,
domainid,
item_jcrqi000,
item_dma00000,
item_mcheng00,
nvl(item_csjcun00, 0),
'0',
'0',
'0',
'0'
from tlk_cbtypywhu t
where item_csjcun00 is not null)
where to_char(item_riq00000, 'yyyymmdd') < qs
group by id, domainid, item_pzdma000, item_pzhong00;
insert into tlk_cbt_ypygl_temp2
(id,
domainid,
item_pzdma000,
item_pzmcheng,
item_jcun0000,
item_ljsliang,
item_cksliang,
item_qmkcun00,
item_rksliang)
select id,
domainid,
item_pzdma000,
item_pzhong00,
sum(jz),
sum(nvl(rk, 0)),
sum(nvl(jz, 0)) + sum(nvl(rk, 0)),
sum(nvl(ck, 0)),
sum(nvl(jz, 0)) + sum(nvl(rk, 0)) - sum(nvl(ck, 0))
from (select id,
domainid,
item_pzdma000,
item_pzhong00,
'0' jz,
to_char(nvl(item_rksliang, 0)) rk,
'0' lj,
to_char(nvl(item_cksliang, 0)) ck,
'0' jc
from tlk_cbtypyglwhu a
where to_char(item_riq00000, 'yyyymmdd') >= qs
and to_char(item_riq00000, 'yyyymmdd') <= jz
union all
select id,
domainid,
item_pzdma000,
item_pzmcheng,
item_qmkcun00,
null,
null,
null,
null
from tlk_cbt_ypygl_temp1)
group by id, domainid, item_pzdma000, item_pzhong00
order by item_pzdma000;
commit;
open c_ref for select id,
domainid,
item_pzdma000,
item_pzmcheng,
item_jcun0000,
item_ljsliang,
item_cksliang,
item_qmkcun00,
item_rksliang from tlk_cbt_ypygl_temp2;
commit;
end cbp_ypyhz;
end SP_TEST; |
|