create or replace procedure pr_test_def_exception
as
v_error varchar2(200);
v_cnt varchar2(200);
v_sal number;
EX_RESOURCE_BUSY EXCEPTION;
PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -54);
begin
--另开会话,执行lock table scott.bonus in exclusive mode
select sal into v_sal from scott.bonus where ename='majunjie' for update nowait;
update scott.bonus set sal=2000 where ename='majunjie';
dbms_output.put_line(v_cnt);
exception
when RESOURCE_BUSY then
v_error := sqlerrm;
dbms_output.put_line(v_error);--ORA-00054: resource busy and acquire with NOWAIT specified or timeout expired
when others then
v_error := sqlerrm;
dbms_output.put_line(111);
end;
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。