pl/sql 声明有名异常

create or replace procedure exceptiontest(testvalues in integer) is
invalid_empno exception;
testvalue integer := testvalues;
begin
  if testvalue is null then
     raise invalid_empno;
  else
    dbms_output.put_line(testvalue);
  end if;
  exception
    when invalid_empno then
      dbms_output.put_line('testvalue is null');
end exceptiontest;

 测试代码:

begin
  -- Call the procedure
  exceptiontest(testvalues => :testvalues);
end;

 

posted on 2013-01-17 16:28  电梯里那个。。  阅读(125)  评论(0编辑  收藏  举报

导航