存储过程

存储过程创建语法：

       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;



注意事项：

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

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

3，  在判断语句前最好先用count（*）函数判断是否存在该条操作记录

4，  用select 。。。into。。。给变量赋值

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





以命名的异常

命名的系统异常                          产生原因

ACCESS_INTO_NULL                   未定义对象

CASE_NOT_FOUND                     CASE 中若未包含相应的 WHEN ，并且没有设置

ELSE 时

COLLECTION_IS_NULL                集合元素未初始化

CURSER_ALREADY_OPEN          游标已经打开

DUP_VAL_ON_INDEX                   唯一索引对应的列上有重复的值

INVALID_CURSOR                 在不合法的游标上进行操作

INVALID_NUMBER                       内嵌的 SQL 语句不能将字符转换为数字

NO_DATA_FOUND                        使用 select into 未返回行，或应用索引表未初始化的 



TOO_MANY_ROWS                      执行 select into 时，结果集超过一行

ZERO_DIVIDE                              除数为 0

SUBSCRIPT_BEYOND_COUNT     元素下标超过嵌套表或 VARRAY 的最大值

SUBSCRIPT_OUTSIDE_LIMIT       使用嵌套表或 VARRAY 时，将下标指定为负数

VALUE_ERROR                             赋值时，变量长度不足以容纳实际数据

LOGIN_DENIED                           PL/SQL 应用程序连接到 oracle 数据库时，提供了不

正确的用户名或密码

NOT_LOGGED_ON                       PL/SQL 应用程序在没有连接 oralce 数据库的情况下

访问数据

PROGRAM_ERROR                       PL/SQL 内部问题，可能需要重装数据字典＆ pl./SQL

系统包

ROWTYPE_MISMATCH                宿主游标变量与 PL/SQL 游标变量的返回类型不兼容

SELF_IS_NULL                             使用对象类型时，在 null 对象上调用对象方法

STORAGE_ERROR                        运行 PL/SQL 时，超出内存空间

SYS_INVALID_ID                         无效的 ROWID 字符串

TIMEOUT_ON_RESOURCE         Oracle 在等待资源时超时 





作者：袁光东
我们在进行pl/sql编程时打交道最多的就是存储过程了。存储过程的结构是非常的简单的，我们在这里除了学习存储过程的基本结构外，还会学习编写存储过程时相关的一些实用的知识。如：游标的处理，异常的处理，集合的选择等等

1.存储过程结构
1.1 第一个存储过程
Java代码
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(20);  
begin  
  v_name := '张三丰';  
  p_para3 := v_name;  
  dbms_output.put_line('p_para3:'||p_para3);  
end; 

create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(20);
begin
  v_name := '张三丰';
  p_para3 := v_name;
  dbms_output.put_line('p_para3:'||p_para3);
end;

上面就是一个最简单的存储过程。一个存储过程大体分为这么几个部分:
创建语句：create or replace procedure 存储过程名
如果没有or replace语句，则仅仅是新建一个存储过程。如果系统存在该存储过程，则会报错。Create or replace procedure 如果系统中没有此存储过程就新建一个，如果系统中有此存储过程则把原来删除掉，重新创建一个存储过程。
存储过程名定义：包括存储过程名和参数列表。参数名和参数类型。参数名不能重复， 参数传递方式:IN, OUT, IN OUT
IN 表示输入参数，按值传递方式。
OUT 表示输出参数，可以理解为按引用传递方式。可以作为存储过程的输出结果，供外部调用者使用。
IN OUT 即可作输入参数，也可作输出参数。
参数的数据类型只需要指明类型名即可，不需要指定宽度。
参数的宽度由外部调用者决定。
过程可以有参数，也可以没有参数
变量声明块：紧跟着的as (is )关键字，可以理解为pl/sql的declare关键字，用于声明变量。
变量声明块用于声明该存储过程需要用到的变量，它的作用域为该存储过程。另外这里声明的变量必须指定宽度。遵循PL/SQL的变量声明规范。
过程语句块：从begin 关键字开始为过程的语句块。存储过程的具体逻辑在这里来实现。
异常处理块：关键字为exception ，为处理语句产生的异常。该部分为可选
结束块：由end关键字结果。

1.2 存储过程的参数传递方式
存储过程的参数传递有三种方式:IN,OUT,IN OUT .
IN 按值传递，并且它不允许在存储过程中被重新赋值。如果存储过程的参数没有指定存参数传递类型，默认为IN
Java代码
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(20);  
begin  
  p_para1 :='aaa';  
  p_para2 :='bbb';  
  v_name := '张三丰';  
  p_para3 := v_name;  
  dbms_output.put_line('p_para3:'||p_para3);  
  null;  
end;  
      
Warning: Procedure created with compilation errors  
 
SQL> show error;  
Errors for PROCEDURE LIFEMAN.PROC1:  
 
LINE/COL ERROR  
-------- ----------------------------------------------------------------------  
8/3      PLS-00363: expression 'P_PARA1' cannot be used as an assignment target  
8/3      PL/SQL: Statement ignored 

create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(20);
begin
  p_para1 :='aaa';
  p_para2 :='bbb';
  v_name := '张三丰';
  p_para3 := v_name;
  dbms_output.put_line('p_para3:'||p_para3);
  null;
end;

Warning: Procedure created with compilation errors

SQL> show error;
Errors for PROCEDURE LIFEMAN.PROC1:

LINE/COL ERROR
-------- ----------------------------------------------------------------------
8/3      PLS-00363: expression 'P_PARA1' cannot be used as an assignment target
8/3      PL/SQL: Statement ignored这一点与其它高级语言都不同。它相当于java在参数前面加上final关键字。


OUT 参数：作为输出参数，需要注意，当一个参数被指定为OUT类型时，就算在调用存储过程之前对该参数进行了赋值，在存储过程中该参数的值仍然是null.
Java代码
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(20);  
begin  
  v_name := '张三丰';  
  p_para3 := v_name;  
  dbms_output.put_line('p_para1:'||p_para1);  
  dbms_output.put_line('p_para2:'||p_para2);  
  dbms_output.put_line('p_para3:'||p_para3);  
end;  
 
SQL> var p1 varchar2(10);  
SQL> var p2 varchar2(10);  
SQL> var p3 varchar2(10);  
SQL> exec :p1 :='aaaa';  
SQL> exec :p2 :='bbbb';  
SQL> exec :p3 :='cccc';  
SQL> exec proc1(:p1,:p2,:p3);  
p_para1:aaaa  
p_para2:  
p_para3:张三丰  
SQL> exec dbms_output.put_line(:p2);  
 
 
PL/SQL procedure successfully completed  
p2  
--------- 

create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(20);
begin
  v_name := '张三丰';
  p_para3 := v_name;
  dbms_output.put_line('p_para1:'||p_para1);
  dbms_output.put_line('p_para2:'||p_para2);
  dbms_output.put_line('p_para3:'||p_para3);
end;

SQL> var p1 varchar2(10);
SQL> var p2 varchar2(10);
SQL> var p3 varchar2(10);
SQL> exec :p1 :='aaaa';
SQL> exec :p2 :='bbbb';
SQL> exec :p3 :='cccc';
SQL> exec proc1(:p1,:p2,:p3);
p_para1:aaaa
p_para2:
p_para3:张三丰
SQL> exec dbms_output.put_line(:p2);


PL/SQL procedure successfully completed
p2
---------
INOUT 是真正的按引用传递参数。即可作为传入参数也可以作为传出参数。

Java代码
1.3 存储过程参数宽度  
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(2);  
begin  
  v_name := p_para1;  
end;  
 
SQL> var p1 varchar2(10);  
SQL> var p2 varchar2(20);  
SQL> var p3 varchar2(30);  
SQL> exec :p1 :='aaaaaa';  
SQL> exec proc1(:p1,:p2,:p3);  
      
      
ORA-06502: PL/SQL: numeric or value error: character string buffer too small  
ORA-06512: at "LIFEMAN.PROC1", line 8 
ORA-06512: at line 1 

1.3 存储过程参数宽度
create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(2);
begin
  v_name := p_para1;
end;

SQL> var p1 varchar2(10);
SQL> var p2 varchar2(20);
SQL> var p3 varchar2(30);
SQL> exec :p1 :='aaaaaa';
SQL> exec proc1(:p1,:p2,:p3);


ORA-06502: PL/SQL: numeric or value error: character string buffer too small
ORA-06512: at "LIFEMAN.PROC1", line 8
ORA-06512: at line 1
首先，我们要明白，我们无法在存储过程的定义中指定存储参数的宽度，也就导致了我们无法在存储过程中控制传入变量的宽度。这个宽度是完全由外部传入时决定的。
我们再来看看OUT类型的参数的宽度。
Java代码
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(2);  
begin  
  p_para2 :='aaaaaaaaaaaaaaaaaaaa';  
end;  
SQL> var p1 varchar2(1);  
SQL> var p2 varchar2(1);  
SQL> var p3 varchar2(1);  
SQL> exec :p2 :='a';  
SQL> exec proc1(:p1,:p2,:p3); 

create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(2);
begin
  p_para2 :='aaaaaaaaaaaaaaaaaaaa';
end;
SQL> var p1 varchar2(1);
SQL> var p2 varchar2(1);
SQL> var p3 varchar2(1);
SQL> exec :p2 :='a';
SQL> exec proc1(:p1,:p2,:p3);在该过程中，p_para2被赋予了20个字符a.
而在外部的调用过程中，p2这个参数仅仅被定义为varchar2(1).
而把p2作为参数调用这个过程，却并没有报错。而且它的真实值就是20个a
Java代码
SQL> select dump(:p2) from dual;  
DUMP(:P2)  
---------------------------------------------------------------------------  
Typ=1 Len=20: 97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97 
p2  
---------  
aaaaaaaaaaaaaaaaaaaa  
      
    再来看看IN OUT参数的宽度  
create or replace procedure proc1(  
  p_para1 varchar2,  
  p_para2 out varchar2,  
  p_para3 in out varchar2  
)as   
v_name varchar2(2);  
begin  
  p_para3 :='aaaaaaaaaaaaaaaaaaaa';  
end;  
 
SQL> var p1 varchar2(1);  
SQL> var p2 varchar2(1);  
SQL> var p3 varchar2(1);  
SQL> exec proc1(:p1,:p2,:p3); 

SQL> select dump(:p2) from dual;
DUMP(:P2)
---------------------------------------------------------------------------
Typ=1 Len=20: 97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97
p2
---------
aaaaaaaaaaaaaaaaaaaa

再来看看IN OUT参数的宽度
create or replace procedure proc1(
  p_para1 varchar2,
  p_para2 out varchar2,
  p_para3 in out varchar2
)as
v_name varchar2(2);
begin
  p_para3 :='aaaaaaaaaaaaaaaaaaaa';
end;

SQL> var p1 varchar2(1);
SQL> var p2 varchar2(1);
SQL> var p3 varchar2(1);
SQL> exec proc1(:p1,:p2,:p3);执行这个过程，仍然正确执行。

可见，对于IN参数，其宽度是由外部决定。
对于OUT 和IN OUT 参数，其宽度是由存储过程内部决定。
因此，在写存储过程时，对参数的宽度进行说明是非常有必要的，最明智的方法就是参数的数据类型使用%type。这样双方就达成了一致。

1.3 参数的默认值
存储过程的参数可以设置默认值
Java代码
create or replace procedure procdefault(p1 varchar2,  
                                        p2 varchar2 default 'mark')  
as   
begin  
  dbms_output.put_line(p2);  
end;  
 
SQL> set serveroutput on;  
SQL> exec procdefault('a'); 

create or replace procedure procdefault(p1 varchar2,
                                        p2 varchar2 default 'mark')
as
begin
  dbms_output.put_line(p2);
end;

SQL> set serveroutput on;
SQL> exec procdefault('a');mark
可以通过default 关键字为存储过程的参数指定默认值。在对存储过程调用时，就可以省略默认值。
需要注意的是：默认值仅仅支持IN传输类型的参数。OUT 和 IN OUT不能指定默认值

对于有默认值的参数不是排在最后的情况。
Java代码
create or replace procedure procdefault2(p1 varchar2 default 'remark',  
                                        p2 varchar2 )  
as   
begin  
  dbms_output.put_line(p1);  
end; 

create or replace procedure procdefault2(p1 varchar2 default 'remark',
                                        p2 varchar2 )
as
begin
  dbms_output.put_line(p1);
end;第一个参数有默认值，第二个参数没有。如果我们想使用第一个参数的默认值时
exec procdefault2('aa');
这样是会报错的。
那怎么变呢？可以指定参数的值。
Java代码
SQL> exec procdefault2(p2 =>'aa'); 

SQL> exec procdefault2(p2 =>'aa');
remark
这样就OK了，指定aa传给参数p2


2. 存储过程内部块
2.1 内部块
我们知道了存储过程的结构，语句块由begin开始，以end结束。这些块是可以嵌套。在语句块中可以嵌套任何以下的块。
Java代码
Declare … begin … exception … end;  
create or replace procedure innerBlock(p1 varchar2)  
as   
  o1 varchar2(10) := 'out1';  
begin  
  dbms_output.put_line(o1);  
  declare   
    inner1 varchar2(20);  
  begin  
    inner1 :='inner1';  
    dbms_output.put_line(inner1);  
 
    declare   
      inner2 varchar2(20);  
    begin  
      inner2 := 'inner2';  
      dbms_output.put_line(inner2);  
    end;  
  exception   
    when others then  
      null;  
  end;  
end; 

Declare … begin … exception … end;
create or replace procedure innerBlock(p1 varchar2)
as
  o1 varchar2(10) := 'out1';
begin
  dbms_output.put_line(o1);
  declare
    inner1 varchar2(20);
  begin
    inner1 :='inner1';
    dbms_output.put_line(inner1);

    declare
      inner2 varchar2(20);
    begin
      inner2 := 'inner2';
      dbms_output.put_line(inner2);
    end;
  exception
    when others then
      null;
  end;
end;需要注意变量的作用域。

3.存储过程的常用技巧
3.1 哪种集合?
我们在使用存储过程的时候经常需要处理记录集，也就是多条数据记录。分为单列多行和多列多行，这些类型都可以称为集合类型。我们在这里进行比较这些集合类型，以便于在编程时做出正确的选择。
索引表,也称为pl/sql表，不能存储于数据库中，元素的个数没有限制,下标可以为负值。
Java代码
type t_table is table of varchar2(20) index by binary_integer;  
v_student t_table; 

type t_table is table of varchar2(20) index by binary_integer;
v_student t_table;varchar2(20)表示存放元素的数据类型，binary_integer表示元素下标的数据类型。
嵌套表，索引表没有 index by子句就是嵌套表，它可以存放于数据中，元素个数无限，下标从1开始，并且需要初始化
Java代码
type t_nestTable is table of varchar2(20);  
v_class t_nestTable ; 

type t_nestTable is table of varchar2(20);
v_class t_nestTable ;仅是这样声明是不能使用的，必须对嵌套表进行初始化，对嵌套表进行初始化可以使用它的构造函数
Java代码
v_class :=t_nestTable('a','b','c'); 

v_class :=t_nestTable('a','b','c');变长数组，变长数组与高级语言的数组类型非常相似，下标以1开始，元素个数有限。
Java代码
type t_array is varray (20) of varchar2(20); 

type t_array is varray (20) of varchar2(20);
varray(20)就定义了变长数组的最大元素个数是20个
变长数组与嵌套表一样，也可以是数据表列的数据类型。
同时，变长数组的使用也需要事先初始化。

类型 可存储于数据库 元素个数 是否需初始化 初始下标值
索引表 否 无限 不需
嵌套表 可 无限 需 1
可变数组 可 有限(自定义) 需 1

由此可见，如果仅仅是在存储过程中当作集合变量使用，索引表是最好的选择。

3.2 选用何种游标?
显示游标分为：普通游标，参数化游标和游标变量三种。
下面以一个过程来进行说明
Java代码
create or replace procedure proccursor(p varchar2)  
as   
v_rownum number(10) := 1;  
cursor c_postype is select pos_type from pos_type_tbl where rownum =1;  
cursor c_postype1 is select pos_type from pos_type_tbl where rownum = v_rownum;  
cursor c_postype2(p_rownum number) is select pos_type from pos_type_tbl where rownum = p_rownum;  
type t_postype is ref cursor ;  
c_postype3 t_postype;  
v_postype varchar2(20);  
begin  
  open c_postype;  
  fetch c_postype into v_postype;  
  dbms_output.put_line(v_postype);  
  close c_postype;  
  open c_postype1;  
  fetch c_postype1 into v_postype;  
  dbms_output.put_line(v_postype);  
  close c_postype1;  
  open c_postype2(1);  
  fetch c_postype2 into v_postype;  
  dbms_output.put_line(v_postype);  
  close c_postype2;  
  open c_postype3 for select pos_type from pos_type_tbl where rownum =1;  
  fetch c_postype3 into v_postype;  
  dbms_output.put_line(v_postype);  
  close c_postype3;  
end; 

create or replace procedure proccursor(p varchar2)
as
v_rownum number(10) := 1;
cursor c_postype is select pos_type from pos_type_tbl where rownum =1;
cursor c_postype1 is select pos_type from pos_type_tbl where rownum = v_rownum;
cursor c_postype2(p_rownum number) is select pos_type from pos_type_tbl where rownum = p_rownum;
type t_postype is ref cursor ;
c_postype3 t_postype;
v_postype varchar2(20);
begin
  open c_postype;
  fetch c_postype into v_postype;
  dbms_output.put_line(v_postype);
  close c_postype;
  open c_postype1;
  fetch c_postype1 into v_postype;
  dbms_output.put_line(v_postype);
  close c_postype1;
  open c_postype2(1);
  fetch c_postype2 into v_postype;
  dbms_output.put_line(v_postype);
  close c_postype2;
  open c_postype3 for select pos_type from pos_type_tbl where rownum =1;
  fetch c_postype3 into v_postype;
  dbms_output.put_line(v_postype);
  close c_postype3;
end;
cursor c_postype is select pos_type from pos_type_tbl where rownum =1
这一句是定义了一个最普通的游标，把整个查询已经写死,调用时不可以作任何改变。
cursor c_postype1 is select pos_type from pos_type_tbl where rownum = v_rownum;
这一句并没有写死，查询参数由变量v_rownum来决定。需要注意的是v_rownum必须在这个游标定义之前声明。
cursor c_postype2(p_rownum number) is select pos_type from pos_type_tbl where rownum = p_rownum;
这一条语句与第二条作用相似，都是可以为游标实现动态的查询。但是它进一步的缩小了参数的作用域范围。但是可读性降低了不少。
type t_postype is ref cursor ;
c_postype3 t_postype;
先定义了一个引用游标类型，然后再声明了一个游标变量。
open c_postype3 for select pos_type from pos_type_tbl where rownum =1;
然后再用open for 来打开一个查询。需要注意的是它可以多次使用,用来打开不同的查询。
从动态性来说，游标变量是最好用的，但是阅读性也是最差的。
注意，游标的定义只能用使关键字IS，它与AS不通用。

3.3 游标循环最佳策略
我们在进行PL/SQL编程时，经常需要循环读取结果集的数据。进行逐行处理，这个过程就需要对游标进行循环。对游标进行循环的方法有多种，我们在此一一分析。
Java代码
create or replace procedure proccycle(p varchar2)  
as   
cursor c_postype is select pos_type, description from pos_type_tbl where rownum < 6;  
v_postype varchar2(20);  
v_description varchar2(50);  
begin  
open c_postype;  
  if c_postype%found then  
    dbms_output.put_line('found true');  
  elsif c_postype%found = false then  
    dbms_output.put_line('found false');  
  else 
    dbms_output.put_line('found null');  
  end if;  
  loop  
   fetch c_postype into v_postype,v_description ;  
   exit when c_postype%notfound;  
   dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
  end loop;  
  close c_postype;  
dbms_output.put_line('---loop end---');  
  open c_postype;  
    fetch c_postype into v_postype,v_description;  
    while c_postype%found loop  
      dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
      fetch c_postype into v_postype,v_description ;  
    end loop;  
 
  close c_postype;  
dbms_output.put_line('---while end---');  
  for v_pos in c_postype loop  
    v_postype := v_pos.pos_type;  
    v_description := v_pos.description;  
    dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
  end loop;  
  dbms_output.put_line('---for end---');  
end; 

create or replace procedure proccycle(p varchar2)
as
cursor c_postype is select pos_type, description from pos_type_tbl where rownum < 6;
v_postype varchar2(20);
v_description varchar2(50);
begin
open c_postype;
  if c_postype%found then
    dbms_output.put_line('found true');
  elsif c_postype%found = false then
    dbms_output.put_line('found false');
  else
    dbms_output.put_line('found null');
  end if;
  loop
   fetch c_postype into v_postype,v_description ;
   exit when c_postype%notfound;
   dbms_output.put_line('postype:'||v_postype||',description:'||v_description);
  end loop;
  close c_postype;
dbms_output.put_line('---loop end---');
  open c_postype;
    fetch c_postype into v_postype,v_description;
    while c_postype%found loop
      dbms_output.put_line('postype:'||v_postype||',description:'||v_description);
      fetch c_postype into v_postype,v_description ;
    end loop;

  close c_postype;
dbms_output.put_line('---while end---');
  for v_pos in c_postype loop
    v_postype := v_pos.pos_type;
    v_description := v_pos.description;
    dbms_output.put_line('postype:'||v_postype||',description:'||v_description);
  end loop;
  dbms_output.put_line('---for end---');
end;
使用游标之前需要开打游标,open cursor，循环完后再关闭游标close cursor.
这是使用游标应该慎记于心的法则。
上面的过程演示了游标循环的三种方法。
在讨论循环方法之前，我们先看看%found和%notfound这些游标的属性。

Java代码
open c_postype;  
if c_postype%found then  
   dbms_output.put_line('found true');  
elsif c_postype%found = false then  
   dbms_output.put_line('found false');  
else 
   dbms_output.put_line('found null');  
end if; 

open c_postype;
  if c_postype%found then
    dbms_output.put_line('found true');
  elsif c_postype%found = false then
    dbms_output.put_line('found false');
  else
    dbms_output.put_line('found null');
  end if;在打开一个游标之后，马上检查它的%found或%notfound属性，它得到的结果即不是true也不是false.而是null.必须执行一条fetch语句后，这些属性才有值。

第一种使用loop 循环
Java代码
loop  
   fetch c_postype into v_postype,v_description ;  
   exit when c_postype%notfound;  
   ……  
end loop 

loop
   fetch c_postype into v_postype,v_description ;
   exit when c_postype%notfound;
   ……
end loop这里需要注意，exit when语句一定要紧跟在fetch之后。必避免多余的数据处理。
处理逻辑需要跟在exit when之后。这一点需要多加小心。
循环结束后要记得关闭游标。

第二种使用while循环。
Java代码
   fetch c_postype into v_postype,v_description;  
while c_postype%found loop  
   ……  
      fetch c_postype into v_postype,v_description ;  
end loop; 

   fetch c_postype into v_postype,v_description;
while c_postype%found loop
   ……
      fetch c_postype into v_postype,v_description ;
end loop;
我们知道了一个游标打开后，必须执行一次fetch语句，游标的属性才会起作用。所以使用while 循环时，就需要在循环之前进行一次fetch动作。
而且数据处理动作必须放在循环体内的fetch方法之前。循环体内的fetch方法要放在最后。否则就会多处理一次。这一点也要非常的小心。
总之，使用while来循环处理游标是最复杂的方法。

第三种 for循环
Java代码
for v_pos in c_postype loop  
   v_postype := v_pos.pos_type;  
   v_description := v_pos.description;  
   …  
end loop; 

for v_pos in c_postype loop
    v_postype := v_pos.pos_type;
    v_description := v_pos.description;
    …
  end loop;可见for循环是比较简单实用的方法。
首先，它会自动open和close游标。解决了你忘记打开或关闭游标的烦恼。
其它,自动定义了一个记录类型及声明该类型的变量，并自动fetch数据到这个变量中。
我们需要注意v_pos 这个变量无需要在循环外进行声明，无需要为其指定数据类型。
它应该是一个记录类型，具体的结构是由游标决定的。
这个变量的作用域仅仅是在循环体内。
把v_pos看作一个记录变量就可以了，如果要获得某一个值就像调用记录一样就可以了。
如v_pos.pos_type
由此可见，for循环是用来循环游标的最好方法。高效，简洁，安全。
但遗憾的是，常常见到的却是第一种方法。所以从今之后得改变这个习惯了。

3.4 select into不可乎视的问题
我们知道在pl/sql中要想从数据表中向变量赋值，需要使用select into 子句。
但是它会带动来一些问题，如果查询没有记录时，会抛出no_data_found异常。
如果有多条记录时，会抛出too_many_rows异常。
这个是比较糟糕的。一旦抛出了异常，就会让过程中断。特别是no_data_found这种异常，没有严重到要让程序中断的地步，可以完全交给由程序进行处理。
Java代码
create or replace procedure procexception(p varchar2)  
as   
  v_postype varchar2(20);  
begin  
   select pos_type into v_postype from pos_type_tbl where 1=0;  
    dbms_output.put_line(v_postype);  
end;  
     

create or replace procedure procexception(p varchar2)
as
  v_postype varchar2(20);
begin
   select pos_type into v_postype from pos_type_tbl where 1=0;
    dbms_output.put_line(v_postype);
end;
执行这个过程
Java代码
SQL> exec procexception('a');  
报错  
ORA-01403: no data found  
ORA-06512: at "LIFEMAN.PROCEXCEPTION", line 6 
ORA-06512: at line 1 

SQL> exec procexception('a');
报错
ORA-01403: no data found
ORA-06512: at "LIFEMAN.PROCEXCEPTION", line 6
ORA-06512: at line 1
处理这个有三个办法
1． 直接加上异常处理。
Java代码
create or replace procedure procexception(p varchar2)  
as   
  v_postype varchar2(20);  
    
begin  
   select pos_type into v_postype from pos_type_tbl where 1=0;  
    dbms_output.put_line(v_postype);  
exception   
  when no_data_found then  
    dbms_output.put_line('没找到数据');  
end; 

create or replace procedure procexception(p varchar2)
as
  v_postype varchar2(20);
 
begin
   select pos_type into v_postype from pos_type_tbl where 1=0;
    dbms_output.put_line(v_postype);
exception
  when no_data_found then
    dbms_output.put_line('没找到数据');
end;这样做换汤不换药，程序仍然被中断。可能这样不是我们所想要的。
2. select into做为一个独立的块，在这个块中进行异常处理
Java代码
create or replace procedure procexception(p varchar2)  
as   
  v_postype varchar2(20);  
    
begin  
  begin  
   select pos_type into v_postype from pos_type_tbl where 1=0;  
    dbms_output.put_line(v_postype);  
exception   
  when no_data_found then  
    v_postype := '';  
  end;  
  dbms_output.put_line(v_postype);  
end; 

create or replace procedure procexception(p varchar2)
as
  v_postype varchar2(20);
 
begin
  begin
   select pos_type into v_postype from pos_type_tbl where 1=0;
    dbms_output.put_line(v_postype);
exception
  when no_data_found then
    v_postype := '';
  end;
  dbms_output.put_line(v_postype);
end;这是一种比较好的处理方式了。不会因为这个异常而引起程序中断。
3.使用游标
Java代码
create or replace procedure procexception(p varchar2)  
as   
  v_postype varchar2(20);  
  cursor c_postype is select pos_type  from pos_type_tbl where 1=0;  
begin  
  open c_postype;  
    fetch c_postype into v_postype;  
  close c_postype;  
  dbms_output.put_line(v_postype);  
end; 

create or replace procedure procexception(p varchar2)
as
  v_postype varchar2(20);
  cursor c_postype is select pos_type  from pos_type_tbl where 1=0;
begin
  open c_postype;
    fetch c_postype into v_postype;
  close c_postype;
  dbms_output.put_line(v_postype);
end;这样就完全的避免了no_data_found异常。完全交由程序员来进行控制了。

第二种情况是too_many_rows 异常的问题。
Too_many_rows 这个问题比起no_data_found要复杂一些。
给一个变量赋值时，但是查询结果有多个记录。
处理这种问题也有两种情况：
1． 多条数据是可以接受的，也就是说从结果集中随便取一个值就行。这种情况应该很极端了吧，如果出现这种情况，也说明了程序的严谨性存在问题。
2． 多条数据是不可以被接受的，在这种情况肯定是程序的逻辑出了问题，也说是说原来根本就不会想到它会产生多条记录。
对于第一种情况，就必须采用游标来处理，而对于第二种情况就必须使用内部块来处理，重新抛出异常。
多条数据可以接受,随便取一条，这个跟no_data_found的处理方式一样，使用游标。
我这里仅说第二种情况，不可接受多条数据，但是不要忘了处理no_data_found哦。这就不能使用游标了，必须使用内部块。
Java代码
create or replace procedure procexception2(p varchar2)  
as   
  v_postype varchar2(20);  
   
begin  
  begin  
    select pos_type into v_postype from pos_type_tbl where rownum < 5;  
  exception  
    when no_data_found then  
      v_postype :=null;  
    when too_many_rows then  
      raise_application_error(-20000,'对v_postype赋值时，找到多条数据');  
  end;  
dbms_output.put_line(v_postype);  
end; 

create or replace procedure procexception2(p varchar2)
as
  v_postype varchar2(20);

begin
  begin
    select pos_type into v_postype from pos_type_tbl where rownum < 5;
  exception
    when no_data_found then
      v_postype :=null;
    when too_many_rows then
      raise_application_error(-20000,'对v_postype赋值时，找到多条数据');
  end;
dbms_output.put_line(v_postype);
end;需要注意的是一定要加上对no_data_found的处理，对出现多条记录的情况则继续抛出异常，让上一层来处理。
总之对于select into的语句需要注意这两种情况了。需要妥当处理啊。

3.5 在存储过程中返回结果集
我们使用存储过程都是返回值都是单一的，有时我们需要从过程中返回一个集合。即多条数据。这有几种解决方案。比较简单的做法是写临时表，但是这种做法不灵活。而且维护麻烦。我们可以使用嵌套表来实现.没有一个集合类型能够与java的jdbc类型匹配。这就是对象与关系数据库的阻抗吧。数据库的对象并不能够完全转换为编程语言的对象，还必须使用关系数据库的处理方式。

Java代码
create or replace package procpkg is  
   type refcursor is ref cursor;  
   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);  
end procpkg;  
 
create or replace package body procpkg is  
  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)  
  is  
    v_posTypeList PosTypeTable;  
  begin  
    v_posTypeList :=PosTypeTable();--初始化嵌套表  
    v_posTypeList.extend;  
    v_posTypeList(1) := PosType('A001','客户资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(2) := PosType('A002','团体资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(3) := PosType('A003','受益人变更');  
    v_posTypeList.extend;  
    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));  
  end;  
end procpkg; 

create or replace package procpkg is
   type refcursor is ref cursor;
   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);
end procpkg;

create or replace package body procpkg is
  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)
  is
    v_posTypeList PosTypeTable;
  begin
    v_posTypeList :=PosTypeTable();--初始化嵌套表
    v_posTypeList.extend;
    v_posTypeList(1) := PosType('A001','客户资料变更');
    v_posTypeList.extend;
    v_posTypeList(2) := PosType('A002','团体资料变更');
    v_posTypeList.extend;
    v_posTypeList(3) := PosType('A003','受益人变更');
    v_posTypeList.extend;
    v_posTypeList(4) := PosType('A004','续期交费方式变更');
    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));
  end;
end procpkg;
在包头中定义了一个游标变量,并把它作为存储过程的参数类型。
在存储过程中定义了一个嵌套表变量，对数据写进嵌套表中，然后把嵌套表进行类型转换为table,游标变量从这个嵌套表中进行查询。外部程序调用这个游标。
所以这个过程需要定义两个类型。
Java代码
create or replace type PosType as Object (  
  posType varchar2(20),  
  description varchar2(50)  
); 

create or replace type PosType as Object (
  posType varchar2(20),
  description varchar2(50)
);create or replace type PosTypeTable is table of PosType;
需要注意，这两个类型不能定义在包头中，必须单独定义，这样java层才能使用。

在外部通过pl/sql来调用这个过程非常简单。
Java代码
set serveroutput on;  
declare   
  type refcursor is ref cursor;  
  v_ref_postype refcursor;  
  v_postype varchar2(20);  
  v_desc varchar2(50);  
begin  
  procpkg.procrefcursor('a',v_ref_postype);  
  loop  
    fetch  v_ref_postype into v_postype,v_desc;  
    exit when v_ref_postype%notfound;  
    dbms_output.put_line('posType:'|| v_postype || ';description:' || v_desc);  
  end loop;  
end; 

set serveroutput on;
declare
  type refcursor is ref cursor;
  v_ref_postype refcursor;
  v_postype varchar2(20);
  v_desc varchar2(50);
begin
  procpkg.procrefcursor('a',v_ref_postype);
  loop
    fetch  v_ref_postype into v_postype,v_desc;
    exit when v_ref_postype%notfound;
    dbms_output.put_line('posType:'|| v_postype || ';description:' || v_desc);
  end loop;
end;
注意：对于游标变量，不能使用for循环来处理。因为for循环会隐式的执行open动作。而通过open for来打开的游标%isopen是为true的。也就是默认打开的。Open一个已经open的游标是错误的。所以不能使用for循环来处理游标变量。

我们主要讨论的是如何通过jdbc调用来处理这个输出参数。
Java代码
conn = this.getDataSource().getConnection();  
CallableStatement call = conn.prepareCall("{call procpkg.procrefcursor(?,?)}");  
call.setString(1, null);  
call.registerOutParameter(2, OracleTypes.CURSOR);  
call.execute();  
ResultSet rsResult = (ResultSet) call.getObject(2);  
while (rsResult.next()) {  
  String posType = rsResult.getString("posType");  
  String description = rsResult.getString("description");  
  ......  
} 

conn = this.getDataSource().getConnection();
CallableStatement call = conn.prepareCall("{call procpkg.procrefcursor(?,?)}");
call.setString(1, null);
call.registerOutParameter(2, OracleTypes.CURSOR);
call.execute();
ResultSet rsResult = (ResultSet) call.getObject(2);
while (rsResult.next()) {
  String posType = rsResult.getString("posType");
  String description = rsResult.getString("description");
  ......
}
这就是jdbc的处理方法。

Ibatis处理方法：
1.参数配置
Java代码
<parameterMap id="PosTypeMAP" class="java.util.Map">   
<parameter property="p" jdbcType="VARCHAR" javaType="java.lang.String" />   
<parameter property="p_ref_postypeList" jdbcType="ORACLECURSOR" javaType="java.sql.ResultSet" mode="OUT" typeHandler="com.palic.elis.pos.dayprocset.integration.dao.impl.CursorHandlerCallBack" />   
</parameterMap>  
 
2.调用过程  
  <procedure id ="procrefcursor" parameterMap ="PosTypeMAP">  
      {call procpkg.procrefcursor(?,?)}  
  </procedure>  
 
3.定义自己的处理器  
  public class CursorHandlerCallBack implements TypeHandler{  
    public Object getResult(CallableStatement cs, int index) throws SQLException {  
        ResultSet rs = (ResultSet)cs.getObject(index);  
        List result = new ArrayList();  
        while(rs.next()) {  
            String postype =rs.getString(1);  
            String description = rs.getString(2);  
            CodeTableItemDTO posTypeItem = new CodeTableItemDTO();  
            posTypeItem.setCode(postype);  
            posTypeItem.setDescription(description);  
            result.add(posTypeItem);  
        }  
        return result;  
    }  
 
 
 
4. dao方法  
    public List procPostype() {  
        String p = "";  
        Map para = new HashMap();  
        para.put("p",p);  
        para.put("p_ref_postypeList",null);  
         this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procrefcursor",  para);  
         return (List)para.get("p_ref_postypeList");  
    } 

<parameterMap id="PosTypeMAP" class="java.util.Map">
<parameter property="p" jdbcType="VARCHAR" javaType="java.lang.String" />
<parameter property="p_ref_postypeList" jdbcType="ORACLECURSOR" javaType="java.sql.ResultSet" mode="OUT" typeHandler="com.palic.elis.pos.dayprocset.integration.dao.impl.CursorHandlerCallBack" />
</parameterMap>

2.调用过程
  <procedure id ="procrefcursor" parameterMap ="PosTypeMAP">
      {call procpkg.procrefcursor(?,?)}
  </procedure>

3.定义自己的处理器
  public class CursorHandlerCallBack implements TypeHandler{
public Object getResult(CallableStatement cs, int index) throws SQLException {
ResultSet rs = (ResultSet)cs.getObject(index);
        List result = new ArrayList();
while(rs.next()) {
String postype =rs.getString(1);
String description = rs.getString(2);
CodeTableItemDTO posTypeItem = new CodeTableItemDTO();
posTypeItem.setCode(postype);
posTypeItem.setDescription(description);
result.add(posTypeItem);
}
return result;
}



4. dao方法
public List procPostype() {
String p = "";
Map para = new HashMap();
para.put("p",p);
para.put("p_ref_postypeList",null);
this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procrefcursor",  para);
return (List)para.get("p_ref_postypeList");
}
这个跟jdbc的方式非常的相似.
我们使用的是ibatis的2.0版本，比较麻烦。
如果是使用2.2以上版本就非常简单的。
因为可以在parameterMap中定义一个resultMap.这样就无需要自己定义处理器了。
可以从分析2.0和2.0的dtd文件知道。

上面的两种方式都是非常的复杂，如果仅仅是需要返回一个结果集，那就完全可以使用函数来实现了。
Java代码
create or replace package procpkg is  
   type refcursor is ref cursor;  
   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);  
   function procpostype(p varchar2) return PosTypeTable;   
end procpkg;  
 
create or replace package body procpkg is  
  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)  
  is  
    v_posTypeList PosTypeTable;  
  begin  
    v_posTypeList :=PosTypeTable();--初始化嵌套表  
    v_posTypeList.extend;  
    v_posTypeList(1) := PosType('A001','客户资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(2) := PosType('A002','团体资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(3) := PosType('A003','受益人变更');  
    v_posTypeList.extend;  
    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));  
  end;  
 
  function procpostype(p varchar2) return PosTypeTable  
  as  
   v_posTypeList PosTypeTable;  
  begin  
      v_posTypeList :=PosTypeTable();--初始化嵌套表  
    v_posTypeList.extend;  
    v_posTypeList(1) := PosType('A001','客户资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(2) := PosType('A002','团体资料变更');  
    v_posTypeList.extend;  
    v_posTypeList(3) := PosType('A003','受益人变更');  
    v_posTypeList.extend;  
    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
    return  v_posTypeList;  
  end;  
end procpkg; 

create or replace package procpkg is
   type refcursor is ref cursor;
   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);
   function procpostype(p varchar2) return PosTypeTable;
end procpkg;

create or replace package body procpkg is
  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)
  is
    v_posTypeList PosTypeTable;
  begin
    v_posTypeList :=PosTypeTable();--初始化嵌套表
    v_posTypeList.extend;
    v_posTypeList(1) := PosType('A001','客户资料变更');
    v_posTypeList.extend;
    v_posTypeList(2) := PosType('A002','团体资料变更');
    v_posTypeList.extend;
    v_posTypeList(3) := PosType('A003','受益人变更');
    v_posTypeList.extend;
    v_posTypeList(4) := PosType('A004','续期交费方式变更');
    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));
  end;

  function procpostype(p varchar2) return PosTypeTable
  as
   v_posTypeList PosTypeTable;
  begin
      v_posTypeList :=PosTypeTable();--初始化嵌套表
    v_posTypeList.extend;
    v_posTypeList(1) := PosType('A001','客户资料变更');
    v_posTypeList.extend;
    v_posTypeList(2) := PosType('A002','团体资料变更');
    v_posTypeList.extend;
    v_posTypeList(3) := PosType('A003','受益人变更');
    v_posTypeList.extend;
    v_posTypeList(4) := PosType('A004','续期交费方式变更');
    return  v_posTypeList;
  end;
end procpkg;
ibatis配置
Java代码
<resultMap id="posTypeResultMap" class="com.palic.elis.pos.common.dto.CodeTableItemDTO">  
   <result property="code" column="posType"/>  
   <result property="description" column="description"/>  
</resultMap>  
 
  <select id="procPostype" resultMap="posTypeResultMap">  
    select * from table(cast (procpkg.procpostype(#value#) as PosTypeTable))  
  </select> 

<resultMap id="posTypeResultMap" class="com.palic.elis.pos.common.dto.CodeTableItemDTO">
   <result property="code" column="posType"/>
   <result property="description" column="description"/>
</resultMap>

  <select id="procPostype" resultMap="posTypeResultMap">
    select * from table(cast (procpkg.procpostype(#value#) as PosTypeTable))
  </select>Dao的写法跟普通查询一样
Java代码
public List queryPostype() {  
  return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null);  
} 

public List queryPostype() {
  return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null);
}
有几点需要注意，这里不能使用索引表，而是嵌套表。