疯狂

STANDING ON THE SHOULDERS OF GIANTS
posts - 481, comments - 486, trackbacks - 0, articles - 1
  BlogJava :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 管理

存储过程常用技巧,以及游标,自治事务

Posted on 2011-03-04 14:35 疯狂 阅读(2295) 评论(0)  编辑  收藏 所属分类: java database


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

1.存储过程结构
1.1 第一个存储过程

Java代码
1.create or replace procedure proc1(  
2.  p_para1 varchar2,  
3.  p_para2 out varchar2,  
4.  p_para3 in out varchar2  
5.)as   
6. v_name varchar2(20);  
7.begin  
8.  v_name := '张三丰';  
9.  p_para3 := v_name;  
10.  dbms_output.put_line('p_para3:'||p_para3);  
11.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代码
1.create or replace procedure proc1(  
2.  p_para1 varchar2,  
3.  p_para2 out varchar2,  
4.  p_para3 in out varchar2  
5.)as   
6. v_name varchar2(20);  
7.begin  
8.  p_para1 :='aaa';  
9.  p_para2 :='bbb';  
10.  v_name := '张三丰';  
11.  p_para3 := v_name;  
12.  dbms_output.put_line('p_para3:'||p_para3);  
13.  null;  
14.end;  
15.      
16.Warning: Procedure created with compilation errors  
17. 
18.SQL> show error;  
19.Errors for PROCEDURE LIFEMAN.PROC1:  
20. 
21.LINE/COL ERROR  
22.-------- ----------------------------------------------------------------------  
23.8/3      PLS-00363: expression 'P_PARA1' cannot be used as an assignment target  
24.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代码
1.create or replace procedure proc1(  
2.  p_para1 varchar2,  
3.  p_para2 out varchar2,  
4.  p_para3 in out varchar2  
5.)as   
6. v_name varchar2(20);  
7.begin  
8.  v_name := '张三丰';  
9.  p_para3 := v_name;  
10.  dbms_output.put_line('p_para1:'||p_para1);  
11.  dbms_output.put_line('p_para2:'||p_para2);  
12.  dbms_output.put_line('p_para3:'||p_para3);  
13.end;  
14. 
15.SQL> var p1 varchar2(10);  
16.SQL> var p2 varchar2(10);  
17.SQL> var p3 varchar2(10);  
18.SQL> exec :p1 :='aaaa';  
19.SQL> exec :p2 :='bbbb';  
20.SQL> exec :p3 :='cccc';  
21.SQL> exec proc1(:p1,:p2,:p3);  
22.p_para1:aaaa  
23.p_para2:  
24.p_para3:张三丰  
25.SQL> exec dbms_output.put_line(:p2);  
26. 
27. 
28.PL/SQL procedure successfully completed  
29.p2  
30.--------- 
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.1.3 存储过程参数宽度  
2.create or replace procedure proc1(  
3.  p_para1 varchar2,  
4.  p_para2 out varchar2,  
5.  p_para3 in out varchar2  
6.)as   
7. v_name varchar2(2);  
8.begin  
9.  v_name := p_para1;  
10.end;  
11. 
12.SQL> var p1 varchar2(10);  
13.SQL> var p2 varchar2(20);  
14.SQL> var p3 varchar2(30);  
15.SQL> exec :p1 :='aaaaaa';  
16.SQL> exec proc1(:p1,:p2,:p3);  
17.      
18.      
19.ORA-06502: PL/SQL: numeric or value error: character string buffer too small  
20.ORA-06512: at "LIFEMAN.PROC1", line 8 
21.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代码
1.create or replace procedure proc1(  
2.  p_para1 varchar2,  
3.  p_para2 out varchar2,  
4.  p_para3 in out varchar2  
5.)as   
6. v_name varchar2(2);  
7.begin  
8.  p_para2 :='aaaaaaaaaaaaaaaaaaaa';  
9.end;  
10.SQL> var p1 varchar2(1);  
11.SQL> var p2 varchar2(1);  
12.SQL> var p3 varchar2(1);  
13.SQL> exec :p2 :='a';  
14.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代码
1.SQL> select dump(:p2) from dual;  
2.DUMP(:P2)  
3.---------------------------------------------------------------------------  
4.Typ=1 Len=20: 97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97 
5.p2  
6.---------  
7.aaaaaaaaaaaaaaaaaaaa  
8.      
9.    再来看看IN OUT参数的宽度  
10.create or replace procedure proc1(  
11.  p_para1 varchar2,  
12.  p_para2 out varchar2,  
13.  p_para3 in out varchar2  
14.)as   
15. v_name varchar2(2);  
16.begin  
17.  p_para3 :='aaaaaaaaaaaaaaaaaaaa';  
18.end;  
19. 
20.SQL> var p1 varchar2(1);  
21.SQL> var p2 varchar2(1);  
22.SQL> var p3 varchar2(1);  
23.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代码
1.create or replace procedure procdefault(p1 varchar2,  
2.                                        p2 varchar2 default 'mark')  
3.as   
4.begin  
5.  dbms_output.put_line(p2);  
6.end;  
7. 
8.SQL> set serveroutput on;  
9.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代码
1.create or replace procedure procdefault2(p1 varchar2 default 'remark',  
2.                                        p2 varchar2 )  
3.as   
4.begin  
5.  dbms_output.put_line(p1);  
6.end; 
create or replace procedure procdefault2(p1 varchar2 default 'remark',
                                        p2 varchar2 )
as
begin
  dbms_output.put_line(p1);
end;第一个参数有默认值,第二个参数没有。如果我们想使用第一个参数的默认值时
exec procdefault2('aa');
这样是会报错的。
那怎么变呢?可以指定参数的值。

Java代码
1.SQL> exec procdefault2(p2 =>'aa'); 
SQL> exec procdefault2(p2 =>'aa');
remark
这样就OK了,指定aa传给参数p2


2. 存储过程内部块
2.1 内部块
我们知道了存储过程的结构,语句块由begin开始,以end结束。这些块是可以嵌套。在语句块中可以嵌套任何以下的块。

Java代码
1.Declare … begin … exception … end;  
2.create or replace procedure innerBlock(p1 varchar2)  
3.as   
4.  o1 varchar2(10) := 'out1';  
5.begin  
6.  dbms_output.put_line(o1);  
7.  declare   
8.    inner1 varchar2(20);  
9.  begin  
10.    inner1 :='inner1';  
11.    dbms_output.put_line(inner1);  
12. 
13.    declare   
14.      inner2 varchar2(20);  
15.    begin  
16.      inner2 := 'inner2';  
17.      dbms_output.put_line(inner2);  
18.    end;  
19.  exception   
20.    when others then  
21.      null;  
22.  end;  
23.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代码
1.type t_table is table of varchar2(20) index by binary_integer;  
2. 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代码
1.type t_nestTable is table of varchar2(20);  
2.v_class t_nestTable ; 
type t_nestTable is table of varchar2(20);
v_class t_nestTable ;仅是这样声明是不能使用的,必须对嵌套表进行初始化,对嵌套表进行初始化可以使用它的构造函数

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

Java代码
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 选用何种游标?
显示游标分为:普通游标,参数化游标和游标变量三种。
下面以一个过程来进行说明

Java代码
1.create or replace procedure proccursor(p varchar2)  
2.as   
3.v_rownum number(10) := 1;  
4.cursor c_postype is select pos_type from pos_type_tbl where rownum =1;  
5.cursor c_postype1 is select pos_type from pos_type_tbl where rownum = v_rownum;  
6.cursor c_postype2(p_rownum number) is select pos_type from pos_type_tbl where rownum = p_rownum;  
7.type t_postype is ref cursor ;  
8.c_postype3 t_postype;  
9.v_postype varchar2(20);  
10.begin  
11.  open c_postype;  
12.  fetch c_postype into v_postype;  
13.  dbms_output.put_line(v_postype);  
14.  close c_postype;  
15.  open c_postype1;  
16.  fetch c_postype1 into v_postype;  
17.  dbms_output.put_line(v_postype);  
18.  close c_postype1;  
19.  open c_postype2(1);  
20.  fetch c_postype2 into v_postype;  
21.  dbms_output.put_line(v_postype);  
22.  close c_postype2;  
23.  open c_postype3 for select pos_type from pos_type_tbl where rownum =1;  
24.  fetch c_postype3 into v_postype;  
25.  dbms_output.put_line(v_postype);  
26.  close c_postype3;  
27.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代码
1.create or replace procedure proccycle(p varchar2)  
2.as   
3.cursor c_postype is select pos_type, description from pos_type_tbl where rownum < 6;  
4.v_postype varchar2(20);  
5.v_description varchar2(50);  
6.begin  
7.open c_postype;  
8.  if c_postype%found then  
9.    dbms_output.put_line('found true');  
10.  elsif c_postype%found = false then  
11.    dbms_output.put_line('found false');  
12.  else 
13.    dbms_output.put_line('found null');  
14.  end if;  
15.  loop  
16.   fetch c_postype into v_postype,v_description ;  
17.   exit when c_postype%notfound;  
18.   dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
19.  end loop;  
20.  close c_postype;  
21.dbms_output.put_line('---loop end---');  
22.  open c_postype;  
23.    fetch c_postype into v_postype,v_description;  
24.    while c_postype%found loop  
25.      dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
26.      fetch c_postype into v_postype,v_description ;  
27.    end loop;  
28. 
29.  close c_postype;  
30.dbms_output.put_line('---while end---');  
31.  for v_pos in c_postype loop  
32.    v_postype := v_pos.pos_type;  
33.    v_description := v_pos.description;  
34.    dbms_output.put_line('postype:'||v_postype||',description:'||v_description);  
35.  end loop;  
36.  dbms_output.put_line('---for end---');  
37.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代码
1.open c_postype;  
2. if c_postype%found then  
3.   dbms_output.put_line('found true');  
4. elsif c_postype%found = false then  
5.   dbms_output.put_line('found false');  
6. else 
7.   dbms_output.put_line('found null');  
8. 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代码
1.loop  
2.   fetch c_postype into v_postype,v_description ;  
3.   exit when c_postype%notfound;  
4.   ……  
5.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代码
1.   fetch c_postype into v_postype,v_description;  
2.while c_postype%found loop  
3.   ……  
4.      fetch c_postype into v_postype,v_description ;  
5.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代码
1.for v_pos in c_postype loop  
2.   v_postype := v_pos.pos_type;  
3.   v_description := v_pos.description;  
4.   …  
5. 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代码
1.create or replace procedure procexception(p varchar2)  
2.as   
3.  v_postype varchar2(20);  
4.begin  
5.   select pos_type into v_postype from pos_type_tbl where 1=0;  
6.    dbms_output.put_line(v_postype);  
7.end;  
8.     
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代码
1.SQL> exec procexception('a');  
2.报错  
3.ORA-01403: no data found  
4.ORA-06512: at "LIFEMAN.PROCEXCEPTION", line 6 
5.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代码
1.create or replace procedure procexception(p varchar2)  
2.as   
3.  v_postype varchar2(20);  
4.    
5.begin  
6.   select pos_type into v_postype from pos_type_tbl where 1=0;  
7.    dbms_output.put_line(v_postype);  
8.exception   
9.  when no_data_found then  
10.    dbms_output.put_line('没找到数据');  
11.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代码
1.create or replace procedure procexception(p varchar2)  
2.as   
3.  v_postype varchar2(20);  
4.    
5.begin  
6.  begin  
7.   select pos_type into v_postype from pos_type_tbl where 1=0;  
8.    dbms_output.put_line(v_postype);  
9. exception   
10.  when no_data_found then  
11.    v_postype := '';  
12.  end;  
13.  dbms_output.put_line(v_postype);  
14.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代码
1.create or replace procedure procexception(p varchar2)  
2.as   
3.  v_postype varchar2(20);  
4.  cursor c_postype is select pos_type  from pos_type_tbl where 1=0;  
5.begin  
6.  open c_postype;  
7.    fetch c_postype into v_postype;  
8.  close c_postype;  
9.  dbms_output.put_line(v_postype);  
10.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代码
1.create or replace procedure procexception2(p varchar2)  
2.as   
3.  v_postype varchar2(20);  
4.   
5.begin  
6.  begin  
7.    select pos_type into v_postype from pos_type_tbl where rownum < 5;  
8.  exception  
9.    when no_data_found then  
10.      v_postype :=null;  
11.    when too_many_rows then  
12.      raise_application_error(-20000,'对v_postype赋值时,找到多条数据');  
13.  end;  
14. dbms_output.put_line(v_postype);  
15.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代码
1.create or replace package procpkg is  
2.   type refcursor is ref cursor;  
3.   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);  
4.end procpkg;  
5. 
6.create or replace package body procpkg is  
7.  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)  
8.  is  
9.    v_posTypeList PosTypeTable;  
10.  begin  
11.    v_posTypeList :=PosTypeTable();--初始化嵌套表  
12.    v_posTypeList.extend;  
13.    v_posTypeList(1) := PosType('A001','客户资料变更');  
14.    v_posTypeList.extend;  
15.    v_posTypeList(2) := PosType('A002','团体资料变更');  
16.    v_posTypeList.extend;  
17.    v_posTypeList(3) := PosType('A003','受益人变更');  
18.    v_posTypeList.extend;  
19.    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
20.    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));  
21.  end;  
22.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代码
1.create or replace type PosType as Object (  
2.  posType varchar2(20),  
3.  description varchar2(50)  
4.); 
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代码
1.set serveroutput on;  
2.declare   
3.  type refcursor is ref cursor;  
4.  v_ref_postype refcursor;  
5.  v_postype varchar2(20);  
6.  v_desc varchar2(50);  
7.begin  
8.  procpkg.procrefcursor('a',v_ref_postype);  
9.  loop  
10.    fetch  v_ref_postype into v_postype,v_desc;  
11.    exit when v_ref_postype%notfound;  
12.    dbms_output.put_line('posType:'|| v_postype || ';description:' || v_desc);  
13.  end loop;  
14.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代码
1.conn = this.getDataSource().getConnection();  
2.CallableStatement call = conn.prepareCall("{call procpkg.procrefcursor(?,?)}");  
3.call.setString(1, null);  
4.call.registerOutParameter(2, OracleTypes.CURSOR);  
5.call.execute();  
6.ResultSet rsResult = (ResultSet) call.getObject(2);  
7.while (rsResult.next()) {  
8.  String posType = rsResult.getString("posType");  
9.  String description = rsResult.getString("description");  
10.  ......  
11.} 
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代码
1.<parameterMap id="PosTypeMAP" class="java.util.Map">   
2. <parameter property="p" jdbcType="VARCHAR" javaType="java.lang.String" />   
3. <parameter property="p_ref_postypeList" jdbcType="ORACLECURSOR" javaType="java.sql.ResultSet" mode="OUT" typeHandler="com.palic.elis.pos.dayprocset.integration.dao.impl.CursorHandlerCallBack" />   
4.</parameterMap>  
5. 
6.2.调用过程  
7.  <procedure id ="procrefcursor" parameterMap ="PosTypeMAP">  
8.      {call procpkg.procrefcursor(?,?)}  
9.  </procedure>  
10. 
11.3.定义自己的处理器  
12.  public class CursorHandlerCallBack implements TypeHandler{  
13.    public Object getResult(CallableStatement cs, int index) throws SQLException {  
14.        ResultSet rs = (ResultSet)cs.getObject(index);  
15.        List result = new ArrayList();  
16.        while(rs.next()) {  
17.            String postype =rs.getString(1);  
18.            String description = rs.getString(2);  
19.            CodeTableItemDTO posTypeItem = new CodeTableItemDTO();  
20.            posTypeItem.setCode(postype);  
21.            posTypeItem.setDescription(description);  
22.            result.add(posTypeItem);  
23.        }  
24.        return result;  
25.    }  
26. 
27. 
28. 
29.4. dao方法  
30.    public List procPostype() {  
31.        String p = "";  
32.        Map para = new HashMap();  
33.        para.put("p",p);  
34.        para.put("p_ref_postypeList",null);  
35.         this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procrefcursor",  para);  
36.         return (List)para.get("p_ref_postypeList");  
37.    } 
<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代码
1.create or replace package procpkg is  
2.   type refcursor is ref cursor;  
3.   procedure procrefcursor(p varchar2, p_ref_postypeList  out refcursor);  
4.   function procpostype(p varchar2) return PosTypeTable;   
5.end procpkg;  
6. 
7.create or replace package body procpkg is  
8.  procedure procrefcursor(p varchar2, p_ref_postypeList out  refcursor)  
9.  is  
10.    v_posTypeList PosTypeTable;  
11.  begin  
12.    v_posTypeList :=PosTypeTable();--初始化嵌套表  
13.    v_posTypeList.extend;  
14.    v_posTypeList(1) := PosType('A001','客户资料变更');  
15.    v_posTypeList.extend;  
16.    v_posTypeList(2) := PosType('A002','团体资料变更');  
17.    v_posTypeList.extend;  
18.    v_posTypeList(3) := PosType('A003','受益人变更');  
19.    v_posTypeList.extend;  
20.    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
21.    open p_ref_postypeList for  select * from table(cast (v_posTypeList as PosTypeTable));  
22.  end;  
23. 
24.  function procpostype(p varchar2) return PosTypeTable  
25.  as  
26.   v_posTypeList PosTypeTable;  
27.  begin  
28.      v_posTypeList :=PosTypeTable();--初始化嵌套表  
29.    v_posTypeList.extend;  
30.    v_posTypeList(1) := PosType('A001','客户资料变更');  
31.    v_posTypeList.extend;  
32.    v_posTypeList(2) := PosType('A002','团体资料变更');  
33.    v_posTypeList.extend;  
34.    v_posTypeList(3) := PosType('A003','受益人变更');  
35.    v_posTypeList.extend;  
36.    v_posTypeList(4) := PosType('A004','续期交费方式变更');  
37.    return  v_posTypeList;  
38.  end;  
39.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代码
1.<resultMap id="posTypeResultMap" class="com.palic.elis.pos.common.dto.CodeTableItemDTO">  
2.   <result property="code" column="posType"/>  
3.   <result property="description" column="description"/>  
4. </resultMap>  
5. 
6.  <select id="procPostype" resultMap="posTypeResultMap">  
7.    select * from table(cast (procpkg.procpostype(#value#) as PosTypeTable))  
8.  </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代码
1.public List queryPostype() {  
2.  return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null);  
3.} 
public List queryPostype() {
  return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null);
}
有几点需要注意,这里不能使用索引表,而是嵌套表。
另外就是把嵌套表强制转换为普通表。
转载自:http://www.javaeye.com/topic/311176

Oracle中Cursor介绍
转自:http://www.javaeye.com/topic/649874
一  概念
游标是SQL的一个内存工作区,由系统或用户以变量的形式定义。游标的作用就是用于临时存储从数据库中提取的数据块。在某些情况下,需要把数据从存放在磁盘的表中调到计算机内存中进行处理,最后将处理结果显示出来或最终写回数据库。这样数据处理的速度才会提高,否则频繁的磁盘数据交换会降低效率。
二  类型
  Cursor类型包含三种: 隐式Cursor,显式Cursor和Ref Cursor(动态Cursor)。
1. 隐式Cursor:
1).对于Select …INTO…语句,一次只能从数据库中获取到一条数据,对于这种类型的DML Sql语句,就是隐式Cursor。例如:Select /Update / Insert/Delete操作。
2)作用:可以通过隐式Cusor的属性来了解操作的状态和结果,从而达到流程的控制。Cursor的属性包含:
SQL%ROWCOUNT 整型 代表DML语句成功执行的数据行数
SQL%FOUND  布尔型  值为TRUE代表插入、删除、更新或单行查询操作成功
SQL%NOTFOUND 布尔型 与SQL%FOUND属性返回值相反
SQL%ISOPEN 布尔型 DML执行过程中为真,结束后为假
3) 隐式Cursor是系统自动打开和关闭Cursor.
下面是一个Sample:

Sql代码 复制代码
  1. Set Serveroutput on;   
  2.   
  3. begin  
  4.     update t_contract_master set liability_state = 1 where policy_code = '123456789';   
  5.        
  6.     if SQL%Found then  
  7.        dbms_output.put_line('the Policy is updated successfully.');   
  8.        commit;   
  9.     else  
  10.       dbms_output.put_line('the policy is updated failed.');   
  11.     end if;   
  12.   
  13. end;   
  14.   
  15. /  


在PL/SQL中run:

Sql代码 复制代码
  1. SQL>    
  2.     
  3. the policy is updated failed.   
  4.     
  5. PL/SQL procedure successfully completed  


2. 显式Cursor:
(1) 对于从数据库中提取多行数据,就需要使用显式Cursor。显式Cursor的属性包含:
游标的属性   返回值类型   意    义 
%ROWCOUNT   整型  获得FETCH语句返回的数据行数 
%FOUND  布尔型 最近的FETCH语句返回一行数据则为真,否则为假 
%NOTFOUND   布尔型 与%FOUND属性返回值相反 
%ISOPEN 布尔型 游标已经打开时值为真,否则为假 

(2) 对于显式游标的运用分为四个步骤:
 定义游标---Cursor  [Cursor Name]  IS;
 打开游标---Open  [Cursor Name];
 操作数据---Fetch  [Cursor name]
 关闭游标---Close [Cursor Name],这个Step绝对不可以遗漏。
(3)以下是三种常见显式Cursor用法。
1)

Sql代码 复制代码
  1. Set serveroutput on;   
  2.   
  3. declare    
  4.     ---define Cursor   
  5.     Cursor cur_policy is  
  6.      select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account   
  7.      from t_contract_master cm   
  8.      where cm.liability_state = 2   
  9.      and cm.policy_type = 1   
  10.      and cm.policy_cate in ('2','3','4')   
  11.      and rownum < 5   
  12.      order by cm.policy_code desc;   
  13.     curPolicyInfo cur_policy%rowtype;---定义游标变量   
  14. Begin  
  15.    open cur_policy; ---open cursor   
  16.    Loop    
  17.      --deal with extraction data from DB   
  18.      Fetch cur_policy into curPolicyInfo;   
  19.      Exit when cur_policy%notfound;   
  20.             
  21.      Dbms_Output.put_line(curPolicyInfo.policy_code);   
  22.    end loop;   
  23.    Exception    
  24.      when others then  
  25.          close cur_policy;   
  26.          Dbms_Output.put_line(Sqlerrm);   
  27.             
  28.    if cur_policy%isopen then     
  29.     --close cursor    
  30.       close cur_policy;   
  31.    end if;   
  32. end;   
  33.   
  34. /  



2)

Sql代码 复制代码
  1. Set serveroutput on;   
  2.   
  3. declare    
  4.     Cursor cur_policy is  
  5.      select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account   
  6.      from t_contract_master cm   
  7.      where cm.liability_state = 2   
  8.      and cm.policy_type = 1   
  9.      and cm.policy_cate in ('2','3','4')   
  10.      and rownum < 5   
  11.      order by cm.policy_code desc;   
  12.      v_policyCode t_contract_master.policy_code%type;   
  13.      v_applicantId t_contract_master.applicant_id%type;   
  14.      v_periodPrem t_contract_master.period_prem%type;   
  15.      v_bankCode t_contract_master.bank_code%type;   
  16.      v_bankAccount t_contract_master.bank_account%type;   
  17. Begin  
  18.    open cur_policy;   
  19.    Loop    
  20.      Fetch cur_policy into v_policyCode,   
  21.                            v_applicantId,   
  22.                            v_periodPrem,   
  23.                            v_bankCode,   
  24.                            v_bankAccount;   
  25.      Exit when cur_policy%notfound;   
  26.             
  27.      Dbms_Output.put_line(v_policyCode);   
  28.    end loop;   
  29.    Exception    
  30.      when others then  
  31.          close cur_policy;   
  32.          Dbms_Output.put_line(Sqlerrm);   
  33.             
  34.    if cur_policy%isopen then      
  35.       close cur_policy;   
  36.    end if;   
  37. end;   
  38. /  



3)

Sql代码 复制代码
  1. Set serveroutput on;   
  2.   
  3. declare    
  4.     Cursor cur_policy is  
  5.      select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account   
  6.      from t_contract_master cm   
  7.      where cm.liability_state = 2   
  8.      and cm.policy_type = 1   
  9.      and cm.policy_cate in ('2','3','4')   
  10.      and rownum < 5   
  11.      order by cm.policy_code desc;   
  12. Begin  
  13.    For rec_Policy in cur_policy loop   
  14.        Dbms_Output.put_line(rec_policy.policy_code);   
  15.    end loop;   
  16.    Exception    
  17.      when others then  
  18.          Dbms_Output.put_line(Sqlerrm);   
  19.             
  20. end;   
  21.   
  22. /  


run pl/sql,执行结果如下:

Sql代码 复制代码
  1. SQL>    
  2.     
  3. 8780203932   
  4. 8780203227   
  5. 8780203218   
  6. 8771289268   
  7.     
  8. PL/SQL procedure successfully completed  


3. Ref Cursor(动态游标):
1) 与隐式Cursor,显式Cursor的区别:Ref Cursor是可以通过在运行期间传递参数来获取数据结果集。而另外两种Cursor,是静态的,在编译期间就决定数据结果集。
2) Ref cursor的使用:
 Type [Cursor type name] is ref cursor
 Define 动态的Sql语句
 Open cursor
 操作数据---Fetch  [Cursor name]
 Close Cursor
下面是一个Sample:

Sql代码 复制代码
  1. Set serveroutput on;   
  2.   
  3. Declare  
  4.     ---define cursor type name   
  5.     type cur_type is ref cursor;   
  6.     cur_policy cur_type;   
  7.     sqlStr varchar2(500);   
  8.     rec_policy t_contract_master%rowtype;   
  9. begin  
  10.    ---define 动态Sql   
  11.    sqlStr := 'select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account from t_contract_master cm   
  12.      where cm.liability_state = 2    
  13.      and cm.policy_type = 1    
  14.      and cm.policy_cate in (2,3,4)    
  15.      and rownum < 5    
  16.      order by cm.policy_code desc ';   
  17. ---Open Cursor   
  18.   open cur_policy for sqlStr;   
  19.   loop   
  20.        fetch cur_policy into rec_policy.policy_code, rec_policy.applicant_id, rec_policy.period_prem,rec_policy.bank_code,rec_policy.bank_account;   
  21.        exit when cur_policy%notfound;   
  22.           
  23.        Dbms_Output.put_line('Policy_code:'||rec_policy.policy_code);   
  24.      
  25.   end loop;   
  26. close cur_policy;       
  27.   
  28. end;   
  29. /  



4.常见Exception

Sql代码 复制代码
  1. 1.  错 误 名 称 错误代码    错 误 含 义      
  2. 2.  CURSOR_ALREADY_OPEN ORA_06511   试图打开已经打开的游标      
  3. 3.  INVALID_CURSOR  ORA_01001   试图使用没有打开的游标      
  4. 4.  DUP_VAL_ON_INDEX    ORA_00001   保存重复值到惟一索引约束的列中      
  5. 5.  ZERO_DIVIDE ORA_01476   发生除数为零的除法错误      
  6. 6.  INVALID_NUMBER  ORA_01722   试图对无效字符进行数值转换      
  7. 7.  ROWTYPE_MISMATCH    ORA_06504   主变量和游标的类型不兼容      
  8. 8.  VALUE_ERROR ORA_06502   转换、截断或算术运算发生错误      
  9. 9.  TOO_MANY_ROWS   ORA_01422   SELECTINTO…语句返回多于一行的数据      
  10. 10. NO_DATA_FOUND   ORA_01403   SELECTINTO…语句没有数据返回      
  11. 11. TIMEOUT_ON_RESOURCE ORA_00051   等待资源时发生超时错误      
  12. 12. TRANSACTION_BACKED_OUT  ORA_00060   由于死锁,提交失败      
  13. 13. STORAGE_ERROR   ORA_06500   发生内存错误      
  14. 14. PROGRAM_ERROR   ORA_06501   发生PL/SQL内部错误      
  15. 15. NOT_LOGGED_ON   ORA_01012   试图操作未连接的数据库      
  16. 16. LOGIN_DENIED    ORA_01017   在连接时提供了无效用户名或口令   

函数里面进行update操作,发现这样子的错误会抛以下的DML错误,如下:
ORA-14551: cannot perform. a DML operation inside a query -

查询资料发现:
对数据库有写操作(INSERT、UPDATE、DELETE、CREATE、ALTER、COMMIT)的函数,是无法简单的用SQL来调用的.


解决办法如下,只需在声明中添加 PRAGMA AUTONOMOUS_TRANSACTION


Java代码
1.CREATE OR REPLACE FUNCTION FUN_SET_PROJECT_COST (V_BUDGET_OBJECT_ID  IN VARCHAR2,V_ADJUST_ID  IN VARCHAR2)  
2.RETURN VARCHAR2  
3.IS  
4.PRAGMA AUTONOMOUS_TRANSACTION; 
CREATE OR REPLACE FUNCTION FUN_SET_PROJECT_COST (V_BUDGET_OBJECT_ID  IN VARCHAR2,V_ADJUST_ID  IN VARCHAR2)
RETURN VARCHAR2
IS
PRAGMA AUTONOMOUS_TRANSACTION;


PRAGMA AUTONOMOUS_TRANSACTION自治事务

当前的存储过程作为已有事务的子事务运行,子事务的commit,rollback操作不影响父事务的状态

在你的一个事务(外层事务)中可以定义一个或几个自治事务。自治事务可以独立commit,不对外层事务产生影响,同样外层事务的 rollback 也对自治事务没有影响。通常可以考虑将自治事务定义成一个过程,在外层的事务中调用。


---------------

  1、去掉重复记录 保留一条

DELETE FROM A_TEST
WHERE UNAME IN (  SELECT UNAME
                      FROM A_TEST
                     GROUP BY UNAME
                    HAVING COUNT(UNAME) > 1    )
   AND ROWID NOT IN ( SELECT MIN(ROWID)
                       FROM A_TEST
                      GROUP BY UNAME
                     HAVING COUNT(UNAME) > 1   )

 

 2、替换字段根据指定的字符

update QF_KEYWORDS set KEYWORD=REPLACE(KEYWORD, ',' , '')

 

3、oracle job时间

 

 

 

 

每天运行一次 'SYSDATE + 1'

每小时运行一次 'SYSDATE + 1/24'

10分钟运行一次 'SYSDATE + 10/60*24'

30秒运行一次 'SYSDATE + 30/(60*24*60)'

每隔一星期运行一次 'SYSDATE + 7'

 

 

每天午夜12 'TRUNC(SYSDATE + 1)'

每天早上830 'TRUNC(SYSDATE + 1) + 8*60+30/(24*60)'

每星期二中午12 'NEXT_DAY(TRUNC(SYSDATE ), ''TUESDAY'' ) + 12/24'

每个月第一天的午夜12 'TRUNC(LAST_DAY(SYSDATE ) + 1)'

每个季度最后一天的晚上11 'TRUNC(ADD_MONTHS(SYSDATE + 2/24, 3 ), 'Q' ) -1/24'

每星期六和日早上610 'TRUNC(LEAST(NEXT_DAY(SYSDATE, ''SATURDAY"), NEXT_DAY(SYSDATE, "SUNDAY"))) + 6×60+10/24×60'

 

每天凌晨0点执行

TRUNC(sysdate+1)

每天凌晨1点执行

TRUNC(sysdate+1)+1/24

每天早上830分执行

TRUNC(SYSDATE+1)+(8*60+30)/(24*60)

 

3、每周定时执行

例如:

每周一凌晨2点执行

TRUNC(next_day(sysdate,1))+2/24

TRUNC(next_day(sysdate,'星期一'))+2/24

每周二中午12点执行

TRUNC(next_day(sysdate,2))+12/24

TRUNC(next_day(sysdate,'星期二'))+12/24

 

4、每月定时执行

例如:

每月1日凌晨0点执行

TRUNC(LAST_DAY(SYSDATE)+1)

每月1日凌晨1点执行

TRUNC(LAST_DAY(SYSDATE)+1)+1/24

 

5、每季度定时执行

每季度的第一天凌晨0点执行

TRUNC(ADD_MONTHS(SYSDATE,3),'q')

每季度的第一天凌晨2点执行

TRUNC(ADD_MONTHS(SYSDATE,3),'q')+2/24

每季度的最后一天的晚上11点执行

TRUNC(ADD_MONTHS(SYSDATE+ 2/24,3),'q')-1/24

 

6、每半年定时执行

例如:

每年71日和11日凌晨1点执行

ADD_MONTHS(TRUNC(sysdate,'yyyy'),6)+1/24

 

7、每年定时执行

例如:

每年11日凌晨2点执行

ADD_MONTHS(TRUNC(sysdate,'yyyy'),12)+2/24

根据规律来算,其实就非常简单了。 

4、oracle查询表名:

select table_name from all_tables t where table_name like '%SEND%'

当库中的表中太多太多的时候,可以查询所有库中的表名

  

 

 

5、创建索引:

CREATE INDEX "IPIQXT"."TZHS10_SUBMIT" ON "IPIQXT"."TZHS10_SUBMIT"

  (

    "ID"

  )

  PCTFREE 10 INITRANS 2 MAXTRANS 255 NOLOGGING COMPUTE STATISTICS STORAGE

  (

    INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT

  )

  TABLESPACE "MBOP" ;

6、创建job

 

--两种方法 三十分钟执行一次存储过程DAYBAKDATA

 

1、VARIABLE jobno number;

BEGIN

   DBMS_JOB.SUBMIT(:jobno, 'DAYBAKDATA;', sysdate , 'SYSDATE+30/1440');

   commit;

END;

 

2DECLARE

  X NUMBER;

BEGIN

  SYS.DBMS_JOB.SUBMIT

  ( job       => X

   ,what      => 'DAYBAKDATA;'

   ,next_date => SYSDATE+30/1440

   ,interval  => 'SYSDATE+30/1440'

   ,no_parse  => FALSE

  );

  SYS.DBMS_OUTPUT.PUT_LINE('Job Number is: ' || to_char(x));

COMMIT;

7、打印

 

dbms_output.put_line('归档了一条彩信发送状态');

 

8、创建索引

CREATE INDEX "MY_SUBMIT4" ON "MY_SUBMIT4"

  (

    "ID"

  )

 

 

10、创建触发器

create or replace

TRIGGER bjcbsend

   AFTER INSERT ON a_SUBMIT

   FOR EACH ROW

DECLARE

BEGIN

 

 

   --sql操作 以上是插入数据时候的触发器 以下注释的是如果你想要修改某个字段的时候的触发器 只需把INSERT改成UPDATE  然后加上以下代码

   --  if updating('字段') and :NEW.字段> '100'  then
   --       执行sql操作

   -- end if;

   --END;

 

9、创建序列

CREATE SEQUENCE "IPIQXT"."SEQ_ABLEPHOTO"

MINVALUE 1 MAXVALUE 9999999999999999999999999999

INCREMENT BY 1 START WITH 20000 CACHE 20 NOORDER NOCYCLE ;

 

 10、创建函数

--从表T_a 中取出phone 条件是AREANO =传入的参数areano1

create or replace
function vphone (areano1 in varchar2)
return varchar2
is
  phone1 varchar2(20);
  begin
      select phone into phone1 from T_a where rownum=1 and AREANO = areano1 and flag 

   return(phone1);
end ;


只有注册用户登录后才能发表评论。


网站导航: