Oracle异常处理内容,隐式游标

异常处理

create or replace procedure pr_test3(v_bh in varchar2,v_xx out t_hq_ryxx%rowtype) is
begin

select * into v_xx from t_hq_ryxx where bianh = v_bh;

if sql%found then

dbms_output.put_line(‘查找到数据了‘);
else
  dbms_output.put_line(‘未查找到数据‘);

end if;

exception

  when NO_DATA_FOUND then
  --dbms_output.put_line(‘未查找到数据‘);

 dbms_output.put_line(‘SQLCODE = ‘ || SQLCODE);--错误代码
  dbms_output.put_line(‘SQLERRM = ‘ || SQLERRM);--错误信息

  when others then
  dbms_output.put_line(‘查找到出错‘);

end pr_test3;
/

隐式游标

create or replace procedure pr_test4(v_bh in varchar2) is

v_xm t_hq_ryxx%rowtype;

begin

--v_xm := ‘106‘;

pr_test3(v_bh, v_xm);

dbms_output.put_line(‘v_xm = ‘ || v_xm.ruzrq || v_xm.xingm);

end pr_test4;

create or replace procedure pr_test5 is
begin

update t_hq_ryxx set bum = ‘101‘ where bum is null;

if SQL%ROWCOUNT > 0 THEN
  dbms_output.put_line(‘更新了‘ || SQL%ROWCOUNT || ‘条记录‘);
  else

  dbms_output.put_line(‘更新了0条记录‘);
end if;
  commit;
end pr_test5;
/