30.PLSQL中的过程

一、引言

        过程，是对一组PLSQL语句的封装，以达到代码复用的目的。创建一个过程之后，它便存储在了数据库中，我们随时随地可在其他PLSQL的数据块中进行引用。

二、创建一个简单的存储过程

        接下来，我们先创建一个简单的显示“Hello World”的存储过程，代码如下：

create procedure print_proc
as
begin
  dbms_output.put_line('Hello World!');
end;
/

        这个过程很简单，创建完成之后，我们发现在SQL developer中已经存在了该过程：

        如果需要调用该存储过程，只需在PLSQL块中直接使用：

begin
 print_proc();
end;
/

       最终执行的结果如下：

三、创建一个带参的查询过程

        同其他语言中的函数类似，PLSQL中的过程也可以带自己的参数，接下来我们实现一个例子，根据emp表中的雇员编号来查询其相关的信息，首先假设有以下emp表：

        我们实现的功能就是根据empno查询雇员信息，打印出雇员的enamel和sal：

create or replace procedure query_by_empno(v_empno  emp.empno%type)
as
  v_ename emp.ename%type;
  v_sal emp.sal%type;
begin
  select ename,sal into v_ename,v_sal from emp where empno=v_empno;
  dbms_output.put_line('姓名：'||v_ename||',薪资:'||v_sal);
end;
/

        带参过程就是在定义过程时同时声明了过程的形参，和其他语言的函数定义类似，形参的格式是形参名称后面紧跟着形参的类型。调用时我们也只需传入参数即可：

begin
 query_by_empno(7566);
end;
/

四、创建修改数据库的过程

        过程不仅能够查询数据库，而且可以使用insert、Update、Delete等语句插入、修改或者删除数据，在下面的例子中，我们编写一个可以修改数据的存储过程，根据部门号，来修改每个部门人员sal提升的幅度。

--带参的修改过程
create or replace procedure update_by_deptno(v_deptno emp.deptno%type,v_multiple number)
as
begin
  update emp set sal=sal*v_multiple where deptno=v_deptno;
end;
/

五、带异常处理的存储过程

        存储过程和PLSQL的代码块类似，也可以增加异常处理的代码块，一般情况下我们进行DML操作时，若出现异常，可在异常区进行捕获然后进行回滚操作，如我们定义如下的存储过程，向emp表中插入新的人员，如果增加不成功就抛出异常：

create or replace procedure insert_emp(v_empno emp.empno%type,v_ename emp.ename%type,v_job emp.job%type,v_mgr emp.mgr%type,v_sal emp.sal%type,v_deptno emp.deptno%type)
as 
 v_count number;
begin
  select count(*) into v_count from emp where empno=v_empno;
  if v_count>0 then
   raise_application_error(-20789,'增加失败，该部门已经存在');
  else
   insert into emp values(v_empno,v_ename,v_job,v_mgr,sysdate,v_sal,null,v_deptno);
  end if;
exception
  when others then
      dbms_output.put_line('sqlerrm='||sqlerrm);
      rollback;
end;
/

        我们可以看到，在上面的存储过程中多了exception的代码块，这就是我们进行异常处理的地方。上述的例子也是一般利用储存过程进行插入的程序结构，我们在插入之前先查看当前的数据库中是否存在相同主键的数据行，在不存在的情况下再去插入。

        如果我们插入已经存在的empno，结果如下：

begin
 insert_emp(7499,'Hyman','salesman',7698,3000,30);
end;
/

        只有不存在冲突的empno时，插入才会成功。