数据库教程:Oracle及PLSQL的存储过程详解

一.在plsql中创建一个存储过程

打开plsql，右键procedures，新建。

如果新建毫无反应

直接文件-新建-程序窗口-空白，新建一个程序窗口

存储过程创建语法：

      create [or replace] procedure 存储过程名（param1 in type，param2 out type）  as  变量1 类型（值范围）;  变量2 类型（值范围）;  begin      select count(*) into 变量1 from 表a where列名=param1；        if (判断条件) then         select 列名 into 变量2 from 表a where列名=param1；         dbms_output。put_line(‘打印信息’);      elsif (判断条件) then         dbms_output。put_line(‘打印信息’);      else         raise 异常名（no_data_found）;      end if;    exception      when others then         rollback;  end;

二：实例：写存储过程（例子）

  --创建一个名为p_contract_purchase_import的存储过程  create or replace procedure p_contract_purchase_import(    --以下写存储过程的外部参数（传入的参数）    --格式为：参数名  in 参数类型    --注意，这里的varchar不标注大小    v_in_subcompanyid       in varchar2,  --专业分公司    v_in_purcontractmoney   in number,        --采购合同金额                                                v_in_partybname         in varchar2,  --供应商名称    --设置一个返回值    v_o_ret         out number                --返回结果0:成功；1：失败； 4：查不到供应商； 5：添加关联失败；6：新增采购合同失败    )    --以下写内部参数  --格式为：参数名称  参数类型  --注意，这里的varchar需要标注大小  as  v_supplierid            integer;  --供应商编号  v_partybaccount         varchar2(100);--收款账号  v_sqlerrm         varchar2(4000);--错误详情    --存储过程开始  begin    --为某些变量赋初值     --格式为  变量名 := 值    v_o_ret := 1;       v_supplierid := '';    v_partybaccount := '';      --写具体的操作语句（sql）    --if语句    if(v_in_partybname is not null) then      begin        select t.supplierid,t.partybaccount,t.partybbank ,t.partybname           into v_supplierid,v_partybaccount,v_partybbank,v_partybname          from t_supplier t where t.partybname=trim(v_in_partybname) and t.subcompanyid=trim(v_in_subcompanyid);      --抛异常      exception        when others then          v_o_ret := 4 ;  --找不到该供应商          v_partybname := v_in_partybname;             -- 将异常原因写入存储过程日志表          v_sqlerrm := sqlerrm;          insert into t_log_dberr           (errtime, errmodel, errdesc)          values            (sysdate,              'procedures',               'p_contract_purchase_import:ret=' || v_o_ret ||','||          v_sqlerrm);          commit;      end ;    end if;     ······        end ;       commit;      v_o_ret :=0 ;         return;    exception    when others then      rollback;      -- 插入异常原因      v_sqlerrm := sqlerrm;      insert into t_log_dberr        (errtime, errmodel, errdesc)      values        (sysdate,         'procedures',         'p_contract_purchase_import:ret=' || v_o_ret ||','||         v_sqlerrm);      commit;    --存储过程结束  end p_contract_purchase_import;

1.注意begin 和 end成对

2.务必将错误内容打印出来。否则，有的时候，就算调试看出来时哪一个语句的错误，也闹不明白错在哪里

三.存储过程调试

1.按f8或是菜单栏第三行第二个执行按键编译存储过程。此时，如果有语法上的明显错误，plsql会给予提示。

2.在procedures中找到要调试的存储过程，右键，选测试。注意，要记得勾选添加调试信息啊。

3.打开调试窗口，填写输入参数

4.点测试窗口的调试按键（如图中画圈的位置）开始调试

5.逐步调试

点击单步调试，主要就是使用这个来进行调试。执行到的代码会高亮显示，此外，注意图中4的位置，可以在这里输入变量的免费精选名字大全，来查看变量的当前值。

分别为跳出单步执行和全部执行，调试时不推荐使用。

单步调试过程中，如果执行到哪一步直接跳转到了exception结束，那么，就是这一步出来问题，可以记住这个位置，再次调试，通过查看这附近变量的值，以及查看错误日志记录的错误详情，来确认出错的具体原因并进行修改。

四.在java中调用

存储过程调试好之后，就可以在java中调用该存储过程。

  logger.info("调用存储过程p_contract_purchase_import");  //存储过程名称。有多少个传入参数打几个问号（包括v_o_ret）  string procname="{call p_contract_purchase_import(,,,) }";  datasource ds = sessionfactoryutils.getdatasource(this.gethibernatetemplate().getsessionfactory());                      connection conn = null;                      callablestatement call = null;                      //resultset rs =null;                        try                      {                          //创建连接                          conn = ds.getconnection();                          call = conn.preparecall(procname);                          //传入数据                          call.setstring(1, (importlist.get(0)).trim());                          if(ratio_amount==null) {                              call.setstring(2,null);                          } else {                              call.setlong(2, ratio_amount);                          }                          call.setstring(3, (importlist.get(2)).trim());                            //第四个参数是作为返回值存在的                          call.registeroutparameter(4, types.bigint);                          //执行存储过程                          call.executeupdate();                          //获取返回的结果                          ret = call.getint(17) ;                          logger.info("ret:"+ret); ;//call.getint(6));                            try                          {                              //关闭连接                              call.close();                              call = null ;                              conn.close();                              conn = null ;                          } catch (sqlexception e) {                              // todo auto-generated catch block                          }                        }catch (sqlexception e){                          logger.error("打开存储过程错误：",e);                      }                      finally{                          try {                              if (call != null) {                                  call.close();                              }                              if (conn != null) {                                  conn.close();                              }                          } catch (sqlexception e) {                              // todo auto-generated catch block                              conn = null;                          }                      }

需要注意的是，call.setlong()不可以传入空值。如果内容有可能为空的话，set之前需要判断是否为空，不为空才能使用setlong()方法，否则，要使用setstring方法。

五：注意事项：

存储过程参数不带取值范围，in表示传入，out表示输出

变量带取值范围，后面接分号

在判断语句前最好先用count(*)函数判断是否存在该条操作记录

用select … into … 给变量赋值

在代码中抛异常用 raise+异常名

已命名的异常:

六：基本语法

1. 基本结构

  create or replace procedure 存储过程免费精选名字大全  (      参数1 in number,      参数2 in number  ) is  变量1 integer :=0;  变量2 date;  begin      --执行体  end 存储过程免费精选名字大全;

2. select into statement

将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条记录，否则抛出异常(如果没有记录抛出no_data_found)

例子：

    begin    select col1,col2 into 变量1,变量2 from typestruct where xxx;    exception    when no_data_found then        xxxx;    end;

3. if 判断

   if v_test=1 then      begin          do something      end;    end if;

4. while 循环

    while v_test=1 loop    begin      xxxx    end;    end loop;

5. 变量赋值

   v_test := 123;

6. 用for in 使用cursor

    is    cursor cur is select * from xxx;    begin   for cur_result in cur loop    begin     v_sum :=cur_result.列名1+cur_result.列名2    end;   end loop;    end;

7. 带参数的cursor

    cursor c_user(c_id number) is select name from user where typeid=c_id;    open c_user(变量值);    loop   fetch c_user into v_name;   exit fetch c_user%notfound;      do something    end loop;    close c_user;

8. 用pl/sql developer debug

连接数据库后建立一个test window,在窗口输入调用sp的代码,f9开始debug,ctrl+n单步调试

八：关于oracle存储过程的若干问题备忘

1.在oracle中，数据表别名不能加as，如：

  select a.appname from appinfo a;-- 正确  select a.appname from appinfo as a;-- 错误

也许，是怕和oracle中的存储过程中的关键字as冲突的问题吧

2.在存储过程中，select某一字段时，后面必须紧跟into，如果select整个记录，利用游标的话就另当别论了。

  select af.keynode into kn from appfoundation af      where af.appid=aid and af.foundationid=fid;-- 有into，正确编译  select af.keynode from appfoundation af    where af.appid=aid and af.foundationid=fid;-- 没有into，编译报错，提示：compilation     error: pls-00428: an into clause is expected in this select statement

3.在利用select…into…语法时，必须先确保数据库中有该条记录，否则会报出”no data found”异常。

可以在该语法之前，先利用select count(*) from 查看数据库中是否存在该记录，如果存在，再利用select…into…

4.在存储过程中，别名不能和字段名称相同，否则虽然编译可以通过，但在运行阶段会报错

   --正确  select keynode into kn from appfoundation where appid=aid and foundationid=fid;    --错误  select af.keynode into kn from appfoundation af    where af.appid=appid and af.foundationid=foundationid;  -- 运行阶段报错，提示ora-01422:exact fetch returns more than requested number of rows

5.在存储过程中，关于出现null的问题

假设有一个表a，定义如下：

  create table a(  id varchar2(50) primary key not null,  vcount number(8) not null,  bid varchar2(50) not null -- 外键   );

如果在存储过程中，使用如下语句：

  select sum(vcount) into fcount from a where bid='xxxxxx';

如果a表中不存在bid=”xxxxxx”的记录，则fcount=null(即使fcount定义时设置了默认值，如：fcount number(8):=0依然无效，fcount还是会变成null)，这样以后使用fcount时就可能有问题，所以在这里最好先判断一下：

  if fcount is null then      fcount:=0;  end if;

这样就一切ok了。

需要了解更多数据库技术:Oracle及PLSQL的存储过程详解，都可以关注数据库技术分享栏目—计算机技术网(www.ctvol.com)!