存储过程和游标.doc
我们在进展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 关键字开场为过程的语句块。存储过程的具体逻辑在这里来实现。异常处理块：关键字为e*ception ，为处理语句产生的异常。该局部为可选完毕块：由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. Warning: Procedure created with pilation errors 16. SQL> show error; 17. Errors forPROCEDURE LIFEMAN.PROC1: 18. LINE/COL ERROR 19. - - 20. 8/3PLS-00363: e*pression 'P_PARA1'cannot be used as an assignment target 21. 8/3PL/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 pilation errorsSQL> show error;Errors for PROCEDURE LIFEMAN.PROC1:LINE/COL ERROR- -8/3 PLS-00363: e*pression 'P_PARA1' cannot be used as an assignment target8/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. SQL> var p1 varchar2(10); 15. SQL> var p2 varchar2(10); 16. SQL> var p3 varchar2(10); 17. SQL> e*ec :p1 :='aaaa' 18. SQL> e*ec :p2 :='bbbb' 19. SQL> e*ec :p3 :='cccc' 20. SQL> e*ec proc1(:p1,:p2,:p3); 21. p_para1:aaaa 22. p_para2: 23. p_para3:三丰24. SQL> e*ec dbms_output.put_line(:p2); 25. PL/SQL procedure successfully pleted 26. p2 27. - 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> e*ec :p1 :='aaaa'SQL> e*ec :p2 :='bbbb'SQL> e*ec :p3 :='cccc'SQL> e*ec proc1(:p1,:p2,:p3);p_para1:aaaap_para2:p_para3:*三丰SQL> e*ec dbms_output.put_line(:p2);PL/SQL procedure successfully pletedp2-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. SQL> var p1 varchar2(10); 12. SQL> var p2 varchar2(20); 13. SQL> var p3 varchar2(30); 14. SQL> e*ec :p1 :='aaaaaa' 15. SQL> e*ec proc1(:p1,:p2,:p3); 16. ORA-06502: PL/SQL: numeric or value error: character string buffer too small 17. ORA-06512: at "LIFEMAN.PROC1", line 818. ORA-06512: at line 11.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> e*ec :p1 :='aaaaaa'SQL> e*ec proc1(:p1,:p2,:p3);ORA-06502: PL/SQL: numeric or value error: character string buffer too smallORA-06512: at "LIFEMAN.PROC1", line 8ORA-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> e*ec :p2 :='a' 14. SQL> e*ec 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> e*ec :p2 :='a'SQL> e*ec 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=1Len=20: 97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,975. p2 6. - 7. aaaaaaaaaaaaaaaaaaaa 8. 再来看看IN OUT参数的宽度9. create or replace procedure proc1( 10. p_para1 varchar2, 11. p_para2 out varchar2, 12. p_para3 in out varchar2 13. )as 14. v_name varchar2(2); 15. begin 16. p_para3 :='aaaaaaaaaaaaaaaaaaaa' 17. end; 18. SQL> var p1 varchar2(1); 19. SQL> var p2 varchar2(1); 20. SQL> var p3 varchar2(1); 21. SQL> e*ec 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,97p2-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> e*ec 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. SQL> set serveroutput on; 8. SQL> e*ec 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> e*ec 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;第一个参数有默认值，第二个参数没有。如果我们想使用第一个参数的默认值时 e*ec procdefault2('aa'); 这样是会报错的。那怎么变呢？可以指定参数的值。Java代码1. SQL> e*ec procdefault2(p2 =>'aa'); SQL> e*ec procdefault2(p2 =>'aa');remark 这样就OK了，指定aa传给参数p2 2. 存储过程部块 2.1 部块我们知道了存储过程的构造，语句块由begin开场，以end完毕。这些块是可以嵌套。在语句块中可以嵌套任何以下的块。Java代码1. Declare begin e*ception 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. declare 13. inner2 varchar2(20); 14. begin 15. inner2 := 'inner2' 16. dbms_output.put_line(inner2); 17. end; 18. e*ception 19. when others then 20. null; 21. end; 22. end; Declare begin e*ception 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; e*ception when others then null; end;end;需要注意变量的作用域。 3.存储过程的常用技巧 3.1 哪种集合" 我们在使用存储过程的时候经常需要处理记录集，也就是多条数据记录。分为单列多行和多列多行，这些类型都可以称为集合类型。我们在这里进展比拟这些集合类型，以便于在编程时做出正确的选择。索引表,也称为pl/sql表，不能存储于数据库中，元素的个数没有限制,下标可以为负值。Java代码1. type t_table is table of varchar2(20) inde* by binary_integer; 2. v_student t_table; type t_table is table of varchar2(20) inde* by binary_integer; v_student t_table;varchar2(20)表示存放元素的数据类型，binary_integer表示元素下标的数据类型。嵌套表，索引表没有 inde* 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 forselect 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. ifc_postype%found then 9. dbms_output.put_line('found true'); 10. elsif c_postype%found = falsethen 11. dbms_output.put_line('found false'); 12. else13. dbms_output.put_line('found null'); 14. end if; 15. loop 16. fetch c_postype into v_postype,v_description 17. e*it 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. whilec_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. close c_postype; 29. dbms_output.put_line('-while end-'); 30. forv_pos in c_postype loop 31. v_postype := v_pos.p
