p_LSDJ in number,
p_HYLSDJ in number,
p_PFDJ in number,
p_CGJ_BHS in number,
p_CGJ_HS in number)
is
v_SPFL varchar(12);
v_JJL float;
begin
select SPFL into v_SPFL
from BFBHDD8.SPXX
where SP_ID=p_SPID;
begin
select JJL into v_JJL from BFBHDD8.SPFL_JYSJ
where SPFL in (select max(SPFL) from BFBHDD8.SPFL_JYSJ where
substr(v_SPFL,1,length(rtrim(SPFL)))=rtrim(SPFL));
exception
when others then
v_JJL :=0;
end;
update BFBHDD8.SPSJBJJL
set BJSJ=sysdate,
CGJ_HS = p_CGJ_HS,
SPFLJJL = v_JJL,
NEW_PFDJ = p_PFDJ,
NEW_LSDJ = p_LSDJ,
NEW_HYLSDJ= p_HYLSDJ
where SP_ID=p_SPID
and BJLX=0
and MCID=0;
if SQL%NOTFOUND then
insert into BFBHDD8.SPSJBJJL
(SP_ID,BJSJ,MCID,BJLX,CGJ_HS,SPFLJJL,NEW_PFDJ,NEW_LSDJ,NEW_HYLSDJ)
values(p_SPID,sysdate,0,0,p_CGJ_HS,v_JJL,p_PFDJ,p_LSDJ,p_HYLSDJ);
end if;
评论0
最新资源