方法一
声明 exception
--创建存储过程

SQL> create procedure account_status (
2 due_date date,
3 today date
4 ) authid definer
5 is
6 past_due exception; -- 定义异常
7 begin
8 if due_date < today then
9 raise past_due; -- 声明异常
10 end if;
11 exception
12 when past_due then -- 异常处理
13 dbms_output.put_line('Account past due.');
14 end;
15 /

过程已创建。

调用存储过程，来触发异常
SQL> set serveroutput on
SQL> l
1 begin
2 account_status(sysdate-1,sysdate);
3* end;
SQL> /
Account past due.

PL/SQL 过程已成功完成。

SQL> begin
2 account_status(sysdate-1,sysdate+1);
3 end;
4 /
Account past due.

PL/SQL 过程已成功完成。

SQL> begin
2 account_status(sysdate-1,sysdate-2);
3 end;
4 /

PL/SQL 过程已成功完成。

方法二

使用 raise_application_error 包

SQL> create or replace procedure account_status (
2 due_date date,
3 today date
4 ) authid definer
5 is
6 begin
7 if due_date < today then -- explicitly raise exception
8 raise_application_error(-20000, 'Account past due.');
9 end if;
10 end;
11 /

过程已创建。

SQL> begin
2 account_status(sysdate-1,sysdate);
3 end;
4 /
begin
*
第 1 行出现错误:
ORA-20000: Account past due.
ORA-06512: 在 "SCOTT.ACCOUNT_STATUS", line 8
ORA-06512: 在 line 2

SQL> declare
2 past_due exception; --declare exception
3 pragma exception_init (past_due, -20000); --assign error code to exception
4 begin
5 account_status(sysdate-1,sysdate); --invoke procedure
6 exception
7 when past_due then
8 dbms_output.put_line(to_char(sqlerrm(-20000)));
9 end;
10 /
ORA-20000: Account past due.

PL/SQL 过程已成功完成。

ITPub博客

Oracle 11g PL/SQL 用户自定义 Exception

最新文章