oracle 函数异常,oracle 异常+存储过程+函数

--第一种异常

declare

v_Num number;

begin

v_Num := 10 / 0;

exception

when zero_divide then --捕获特定异常

dbms_output.put_line('除数不能为零');

when others then

dbms_output.put_line('出错了');--捕获所有的异常

end;

--其应用:错误跟踪(缺陷跟踪)

declare

v_trace varchar2(200);

v_num number;

begin

v_trace := '正在做第一个业务逻辑，错误编号：1001';

v_num := 1234 - 435;

v_trace := '正在做第二个业务逻辑，错误编号：1002';

v_num := 56345 - 435;

v_trace := '正在做第三个业务逻辑，错误编号：1003';

v_num := 322 - 6786;

when others then

dbms_output.put_line('出错了');--用户自行决定是否需要提示

-- insert into 日志表(v_trace......);

end;

--第二种异常:事先定义异常编号，后捕捉(也属于自定义异常)

declare

v_UserExcept exception;

pragma exception_init(v_UserExcept,-1476);

v_Num number;

begin

v_Num := 10 / 0;

exception

when v_UserExcept then

dbms_output.put_line('除数不能为零');

end;

--第三种异常：自定义异常

declare

v_num number;

v_Except exception;

begin

v_num := 20;

if v_num > 10 then

raise v_Except; -- 主动出发异常

end if;

exception

when v_Except then

dbms_output.put_line('出错了');

end;

--其应用:可以用作预警

declare

v_num number;

e_except exception;

begin

v_num:=15;

if v_num>10 and v_num<20 then

raise e_except;

end if;

exception

when e_except then

dbms_output.put_line(to_char(sysdate,'yyyy-mm-dd hh24:mi:ss')||' '||'某设备当前的指标为：'||to_char(v_num));

when others then

dbms_output.put_line(sqlcode||'-'||sqlerrm);

end;

--存储过程

declare

v_num number;

begin

v_num := 123;

end;

create or replace procedure GetName

is

v_num number;

begin

v_num := 123;

end;

--调用方法

--方法一：命令

SQL> execute GetName;

PL/SQL procedure successfully completed

SQL>

--方法二：程序

begin

GetName;

end;

create or replace procedure GetName1(i_in_n_EmpNO in number)

is

v_Name  varchar2(20);

begin

select ename into v_Name from emp where empno=i_in_n_EmpNO;

dbms_output.put_line(v_Name);

end;

--第一种调用方法

SQL> set serveroutput on

SQL> execute getname1(7369);

SMITH

PL/SQL procedure successfully completed

SQL>

--第二种调用方法

begin

GetName1(7369);

end;

--out参数

create or replace procedure GetName2(i_in_n_EmpNO in number,i_out_c_Name out varchar2)

is

begin

select ename into i_out_c_Name from emp where empno=i_in_n_EmpNO;

end;

--第一种调用方法

SQL> variable v_name varchar2(20);

SQL> execute getname2(7369,:v_name);

PL/SQL procedure successfully completed

v_name

---------

SMITH

SQL> select :v_name from dual;

:V_NAME

--------------------------------------------------------------------------------

SMITH

v_name

---------

SMITH

SQL>

--第二种调用方法

declare

v_name varchar2(20);

begin

GetName2(7369,v_name);

dbms_output.put_line(v_name);

end;

--in out参数

create or replace procedure GetName3(i_inout_c_Name in out varchar2)

is

begin

select ename into i_inout_c_Name from emp where empno=to_number(i_inout_c_Name);

end;

--调用方法

declare

v_name varchar2(20);

begin

v_name:= '7369';

GetName3(v_name);

dbms_output.put_line(v_name);

end;

--函数

declare

v_num number;

begin

v_num := 123;

end;

create or replace function getFuncName

return number

is

v_num number;

begin

v_num := 123;

return v_num;

end;

--第一种调用方法

SQL> select getFuncName from dual;

GETFUNCNAME

-----------

123

SQL>

--第二种调用方法

declare

v_num number;

begin

--select getFuncName into v_num from dual;

v_num := getFuncName();

dbms_output.put_line(v_num);

end;

create or replace function getFuncName1(i_in_n_EmpNO number)

return varchar2

is

v_name varchar2(20);

begin

select ename into v_Name from emp where empno=i_in_n_EmpNO;

return v_name;

end;

--第一种调用方法

SQL> select getFuncName1(7369) from dual;

GETFUNCNAME1(7369)

--------------------------------------------------------------------------------

SMITH

SQL>

--第二种调用方法

declare

v_name varchar2(20);

begin

v_name := getFuncName1(7369);

dbms_output.put_line(v_name);

end;

create or replace function getFuncName3(i_in_n_EmpNO in number,i_out_c_Name out varchar2)

return number

is

begin

select ename into i_out_c_Name from emp where empno=i_in_n_EmpNO;

return 1;

end;

--调用方法

declare

v_name varchar2(20);

v_num number;

begin

v_num := getFuncName3(7369,v_name);

dbms_output.put_line(v_name ||'  返回值：'|| to_char(v_num));

end;

create or replace function getFuncName4(i_inout_c_Name in out varchar2)

return number

is

begin

select ename into i_inout_c_Name from emp where empno=to_number(i_inout_c_Name);

return 1;

end;

--调用方法 declare   v_name varchar2(20);   v_num number; begin    v_name:= '7369';    v_num := getFuncName4(v_name);    dbms_output.put_line(v_name ||'  返回值：'|| to_char(v_num)); end;