oracle存储过程案例及详解.docx

存储过程经典案例及详解收藏

以下案例都是在pl/sql环境运行无误的情况下，由本人整理收集的，大家可以放心浏览，案例中的分析有不妥之处望大家指正。

案例1：用fetch游标取值。declare

typecisref cursor;emp_sorc;

cnameemp.ename%type;csalemp.sal%type;

begin

openemp_sorforselectename,salfromempwheredeptno=10;loop

fetchemp_sorintocname,csal; --取游标的值给变量。

dbms_output.put_line(ename:||cname||sal||csal);exitwhenemp_sor%notfound;

endloop;closeemp_sor;end;

打开emp_sor游标之后，emp_sor指针从表的第一行开始往下移动，在指定位置取值，

并把该行的值赋给对应的变量。循环取值，每一次对应行的值赋给对应的变量。Fetch….into

每次提取一行。

案例2：用fetch游标取值，并循环打印出部门编号为10的员工的名字和薪水。declare

cursoremp_sorisselectename,salfromempwheredeptno=10;cnameemp.ename%type;

csalemp.sal%type;begin

openemp_sor;loop

fetchemp_sorintocname,csal; --取游标的值给变量。

dbms_output.put_line(ename:||cname||sal||csal);exitwhenemp_sor%notfound;

endloop;closeemp_sor;end;

案例3：运用记录变量接收游标指定的表数据。declare

cursoremp_sorisselectename,salfromempwheredeptno=10;typeemp_typeisrecord(

v_enameemp.ename%type,v_salemp.sal%type);

emp_type1emp_type;--用emp_type声明一个与emp_type类似的记录变量。该记录

有两列，与emp表的ename，sal同类型的列。begin

openemp_sor;loop

fetchemp_sorintoemp_type1;dbms_output.put_line(emp_type1.v_ename||;||emp_type1.v_sal);exitwhenemp_sor%notfound;

endloop;closeemp_sor;end;

/

注：记录变量没有游标变量实用。我们可以定义emp_type emp_sor%rowtype（emp_type

会有与游标emp_sor所对应的结果列一一对应，类型相同）会轻松许多，下边我们会用到。案例4：用for游标取值。

declare

cursoremp_sorisselectenamefromemp;typeename_table_typeistableofvarchar2(20);ename_tableename_table_type;

begin

openemp_sor;

fetchemp_sorbulkcollectintoename_table;foriin1..ename_table.countloop

dbms_output.put_line(ename_table(i));endloop;

closeemp_sor;end;

案例5：用for取值，带隐式游标会自动打开和关闭。

declare

cursoremp_sorisselectenamefromemp;begin

foremp_recordinemp_sor

loop

dbms_output.put_line(第||emp_sor%rowcount||雇员名:||emp_record.ename);endloop;

end;

案例6：declare

cursoremp_sor1isselectenamefromemp;

typeemp_tableistableofvarchar2(20);emp_table1emp_table;

begin

ifnot