ORACLE数据库---存储过程

在 ORACLE SERVER上建立存储过程,可以被多个应用程序调用,可以向存储过程传递参数,也可以向存储过程传回参数

创建存储过程语法 ：

CREATE [OR REPLACE] PROCEDURE Procedure_name

[ (argment [ { IN | OUT | IN OUT } ] Type,

   argment [ { IN | OUT | IN OUT } ] Type ]

{ IS | AS }

  <类型.变量的说明>

BEGIN

  <执行部分>

EXCEPTION

  <可选的异常错误处理程序>

END;

调用存储过程：

 DECLARE

...

 BEGIN

...

 END;

如上面所示，存储过程的参数有三种，分别是IN、OUT、IN OUT，接下来我们就以oracle数据库自带的SCOTT用户里面的emp表和dept表做案例演示。

参数是IN:

--创建一个存储过程，通过empno查询ename,dname    IN类型--
create or replace procedure pro_findByempIN(v_empno in emp.empno%type)
as
    v_ename emp.ename%type;
    v_dname dept.dname%type;
begin
    select ename,dname into v_ename,v_dname from emp,dept where emp.deptno=dept.deptno and empno=v_empno;
exception
    when no_data_found then DBMS_OUTPUT.PUT_LINE('你需要的数据不存在!');
    when others then DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
end pro_findByempIN;

--删除存储过程--
drop procedure pro_findByempIN;
--调用该存储过程
begin
  pro_findByempIN(&n);
end;

参数是OUT:

--创建一个存储过程，通过empno查询ename,dname    OUT类型--
create or replace procedure findByempOut(p_eno in emp.empno%type,p_ename out varchar2,p_dname out varchar2)
is
begin
  select ename,dname into p_ename,p_dname from emp,dept where emp.deptno=dept.deptno and empno=p_eno;
exception
  when no_data_found then dbms_output.put_line('你需要的数据不存在');
  when others then DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
end findByempOut;
--调用findByempOut
declare
  --申明返回值的类型
   v_ename emp.ename%type;
   v_dname dept.dname%type;
begin
  findByempOut(&n,v_ename,v_dname);
   dbms_output.put_line('员工姓名为：'||v_ename||'部门名称为：'||v_dname);
end;

参数是IN OUT:
create or replace procedure pro_InOut(p_num in out number)
is
begin
    dbms_output.put_line(p_num);
    p_num:=123456;
    dbms_output.put_line(p_num);
end;
--调用pro_InOut
declare
   v_num number(10):=111;
begin
   pro_InOut(v_num);
   dbms_output.put_line(v_num);
end;

以上存储过程都是经过本人编译运行成功的，可直接复制粘贴检测，前提是你电脑本地装有oracle数据库并将SCOTT用户加载进来，如果没有这些可以翻看我之前的关于ORACLE数据库的博客！

至此，存储过程的创建和调用介绍完毕！