代码如下
```BEGIN
--判断公司是否存在
open cur_company;
fetch cur_company into cur_v_fundcompany;
if cur_company%notfound then
dbms_output.put_line(cur_company%Rowcount || '----公司不存在');
goto kh_end;
end if;
close cur_company;
--判断理财账户是否存在
open cur_financingaccount;
fetch cur_financingaccount into cur_v_financingaccount;
if cur_financingaccount%notfound then
dbms_output.put_line('理财账号不存在');
goto kh_end;
end if;
close cur_financingaccount;
--判断公司是否已经开户
open cur_fundaccount;
fetch cur_fundaccount into cur_v_fundaccount;
if cur_fundaccount%notfound THEN
dbms_output.put_line('当前公司已开过户');
goto kh_end;
end if;
close cur_fundaccount;
--新增基金表
dbms_output.put_line('开户成功');
<<kh_end>>
dbms_output.put_line('开户失败');
end kh;
别人复制给我的,他那可以到我这就不行了
下面是报错信息
```[SQL] create or replace procedure kh( v_fundaccount in ZHANGSAN.fundaccount%Rowtype ) is cursor cur_company is select * from ZHANGSAN.fundcompany where companyId = v_fundaccount.companyId;
cursor cur_financingaccount
is
select * from ZHANGSAN.financingaccount where FINALCINGACCOUNT = v_fundaccount.financingaccount;
cursor cur_fundaccount
is
select * from ZHANGSAN.fundaccount where companyId = v_fundaccount.companyId and financingaccount = v_fundaccount.financingaccount;
cur_v_fundcompany ZHANGSAN.fundcompany%Rowtype;
cur_v_financingaccount ZHANGSAN.financingaccount%Rowtype;
cur_v_fundaccount ZHANGSAN.fundaccount%Rowtype;
BEGIN --判断公司是否存在 open cur_company;
fetch cur_company into cur_v_fundcompany;
if cur_company%notfound then
dbms_output.put_line(cur_company%Rowcount || '----公司不存在');
goto kh_end;
end if;
[Err] ORA-24344: success with compilation error
你好,我是有问必答小助手,非常抱歉,本次您提出的有问必答问题,技术专家团超时未为您做出解答
本次提问扣除的有问必答次数,将会以问答VIP体验卡(1次有问必答机会、商城购买实体图书享受95折优惠)的形式为您补发到账户。
因为有问必答VIP体验卡有效期仅有1天,您在需要使用的时候【私信】联系我,我会为您补发。