地址:http://www.cnblogs.com/chinafine/archive/2010/07/12/1776102.html
我们在进行pl/sql编程时打交道最多的就是存储过程了。存储过程的结构是非常的简单的,我们在这里除了学习存储过程的基本结构外,还会学习编写存储过程时相关的一些实用的知识。如:游标的处理,异常的处理,集合的选择等等
1.存储过程结构
1.1 第一个存储过程
- 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
- 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.
- 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 是真正的按引用传递参数。即可作为传入参数也可以作为传出参数。
- 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类型的参数的宽度。
- 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
- 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 参数的默认值
存储过程的参数可以设置默认值
- 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不能指定默认值
对于有默认值的参数不是排在最后的情况。
- 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');
这样是会报错的。
那怎么变呢?可以指定参数的值。
- SQL> exec procdefault2(p2 =>'aa');
SQL> exec procdefault2(p2 =>'aa');
remark
这样就OK了,指定aa传给参数p2
2. 存储过程内部块
2.1 内部块
我们知道了存储过程的结构,语句块由begin开始,以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;
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表,不能存储于数据库中,元素的个数没有限制,下标可以为负值。
- 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开始,并且需要初始化
- type t_nestTable is table of varchar2(20);
- v_class t_nestTable ;
type t_nestTable is table of varchar2(20); v_class t_nestTable ;
仅是这样声明是不能使用的,必须对嵌套表进行初始化,对嵌套表进行初始化可以使用它的构造函数
- v_class :=t_nestTable('a','b','c');
v_class :=t_nestTable('a','b','c');
变长数组,变长数组与高级语言的数组类型非常相似,下标以1开始,元素个数有限。
- 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 选用何种游标?
显示游标分为:普通游标,参数化游标和游标变量三种。
下面以一个过程来进行说明
- 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编程时,经常需要循环读取结果集的数据。进行逐行处理,这个过程就需要对游标进行循环。对游标进行循环的方法有多种,我们在此一一分析。
- 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这些游标的属性。
- 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 循环
- 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循环。
- 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循环
- 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这种异常,没有严重到要让程序中断的地步,可以完全交给由程序进行处理。
- 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;
执行这个过程
- 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. 直接加上异常处理。
- 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做为一个独立的块,在这个块中进行异常处理
- 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.使用游标
- 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哦。这就不能使用游标了,必须使用内部块。
- 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类型匹配。这就是对象与关系数据库的阻抗吧。数据库的对象并不能够完全转换为编程语言的对象,还必须使用关系数据库的处理方式。
- 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,游标变量从这个嵌套表中进行查询。外部程序调用这个游标。
所以这个过程需要定义两个类型。
- 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来调用这个过程非常简单。
- 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调用来处理这个输出参数。
- 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.参数配置
- <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文件知道。
上面的两种方式都是非常的复杂,如果仅仅是需要返回一个结果集,那就完全可以使用函数来实现了。
- 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配置
- <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的写法跟普通查询一样
- public List queryPostype() {
- return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null);
- }
public List queryPostype() { return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null); }
有几点需要注意,这里不能使用索引表,而是嵌套表。
另外就是把嵌套表强制转换为普通表。
相关推荐
Oracle存储过程常用技巧 Oracle存储过程是一种强大的数据库对象,它可以帮助开发者简化复杂的业务逻辑,并提高数据库的安全性和性能。在 Oracle 中,存储过程是一种特殊的 PL/SQL 程序,它可以接受输入参数,执行...
本文将从 Oracle 存储过程的基础知识开始,逐步深入到 Oracle 存储过程的高级应用,包括 Hibernate 调用 Oracle 存储过程和 Java 调用 Oracle 存储过程的方法。 Oracle 存储过程基础知识 Oracle 存储过程是 Oracle...
oracle 存储过程导出excel oracle 存储过程导出excel oracle 存储过程导出excel oracle 存储过程导出excel oracle 存储过程导出excel
Oracle存储过程unwrap解密工具主要用于处理Oracle数据库中的加密存储过程。在Oracle数据库系统中,为了保护敏感代码或数据,开发人员有时会选择对存储过程进行加密。然而,当需要查看、调试或恢复这些加密的存储过程...
以下是对“oracle存储过程解锁”这一主题的深入解析。 ### 标题:“oracle存储过程解锁” #### 解析: 在Oracle数据库中,存储过程是一种预先编译并存储在数据库中的SQL代码块,用于执行复杂的业务逻辑或数据处理...
在Oracle存储过程中,`IN`参数用于传递数据到过程,`OUT`参数则允许过程向调用者返回数据。而`SYS_REFCURSOR`是Oracle提供的一种特殊类型,它允许存储过程动态地打开一个游标(即结果集)并将其作为`OUT`参数返回。 ...
总结起来,"帆软报表Oracle存储过程解决storeParameter1参数试用插件"主要是针对在调用无参数Oracle存储过程时出现的异常问题提供的一种解决方案。通过安装并配置这个插件,用户可以顺利地在帆软报表中调用不包含...
本文实例讲述了Python使用cx_Oracle调用Oracle存储过程的方法。分享给大家供大家参考,具体如下: 这里主要测试在Python中通过cx_Oracle调用PL/SQL。 首先,在数据库端创建简单的存储过程。 create or replace ...
Oracle存储过程是数据库管理系统中的一种重要特性,它允许开发者编写一系列SQL语句和PL/SQL块,形成可重复使用的代码单元。这篇博客“oracle存储过程-帮助文档”可能提供了关于如何创建、调用和管理Oracle存储过程...
可以将SQL Server存储过程转为oracle存储过程的工具
oracle存储过程加密破解 0
### Oracle存储过程、函数与DBLink详解 #### 一、Oracle存储过程简介 在Oracle数据库中,存储过程是一种预编译好的SQL代码集合,它可以接受输入参数、返回单个值或多个值,并能够执行复杂的数据库操作。存储过程...
ibatis调用oracle存储过程分页
以下是一个简单的示例,展示了如何调用一个不带参数的Oracle存储过程: ```java Session session = sessionFactory.openSession(); Transaction transaction = session.beginTransaction(); session....
以下是一些关于"ORACLE存储过程性能优化技巧"的关键知识点: 1. **绑定变量**:使用绑定变量可以减少解析次数,提高执行效率。当存储过程中的参数作为SQL查询的一部分时,应避免直接拼接字符串,而是使用?作为占位...
Oracle存储过程是数据库管理系统Oracle中的一个关键特性,它允许开发者编写一组预编译的SQL和PL/SQL语句,以实现特定的业务逻辑或数据库操作。这篇教程将深入讲解Oracle存储过程的各个方面,帮助你从基础到高级全面...
### Oracle存储过程批量提交知识点详解 在Oracle数据库中,存储过程是一种重要的数据库对象,它可以包含一系列SQL语句和控制流语句,用于实现复杂的业务逻辑处理。存储过程不仅可以提高应用程序性能,还可以确保...
本文将详细讲解如何在C#中使用自定义列表(List)作为参数调用Oracle存储过程,以及实现这一功能的关键技术和注意事项。 首先,我们需要了解Oracle数据库中的PL/SQL类型,例如VARCAR2、NUMBER等,它们对应于C#中的...
Oracle存储过程是数据库管理系统Oracle中的一种重要特性,用于封装一系列SQL和PL/SQL代码,以实现特定的功能。在Oracle中,存储过程可以提高应用程序的性能,因为它减少了与数据库的交互次数,并允许在数据库级别...