oracle 经典习题 -游标

oralce 经典习题系列

oracle 游标(cursor)

The problem

1 游标的含义及分类?
2 使用游标的基本操作步骤都有哪些?
3 打开pet表,使用游标查看pet表的记录

The answer

以pet表为例

name owner Species sex birth death
fluffy Horold cat f 2003-10-12 2010-08-12
Claws Gwen cat m 2004-08-10 null
Buffy null dog f 2009-08-11 null
Fang Benny dog m 2000-05-15 null
Bowser Diane dog m 2003-04-16 2009-11-12
Chirpy null bird f 2008-05-19 null

代码实现:

--1  游标的含义及分类?如同指针指向一个结果集的头部,通过它可以操作行数据。
---Oracle游标可以分为显式游标和隐式游标两种之分。
--2  使用游标的基本操作步骤都有哪些?
/*1 声明游标
declare cursor cursor_name(游标名)
is select_statement(查询语句);
2 打开游标,
open cursor_name;
3操作数据 
fetch cursor_name into record变量
4关闭游标
close cursor_name;
*/
--3  打开pet表,使用游标查看pet表中specis ='dog'记录
select * from pet;

set SERVEROUTPUT ON;
declare
--声明游标
  cursor cur_pet is select * from pet where species ='dog';
  r_pet pet%rowtype;
begin
--打开游标
  open cur_pet;
  loop
--取出数据
    fetch cur_pet into r_pet;
    dbms_output.put_line(r_pet.name||'  '||r_pet.owner||'  '||r_pet.sex||' ');
  EXIT WHEN  cur_pet%NOTFOUND;
  end loop; 
--关闭游标
  close cur_pet;
end;
/*系统游标 sysrefcursor
1.声明 :delare cur_name sysrefcursor
2.打开:open cur_name for select ..... 在打开时候指定结果集
3.fetch  cur_name  into record变量
4. 关闭游标 close cur_name
*/

create or replace procedure sql_pet(curs_pet out sys_refcursor)
is
rec_pet pet%rowtype;
begin
  open curs_pet for select * from pet;
  LOOP
    fetch curs_pet into rec_pet;
    dbms_output.put_line(REC_pet.name||'  '||rEC_pet.owner||'  '||rEC_pet.sex||' ');
    exit when curs_pet%NOTFOUND;
  END LOOP;
  close curs_pet;
end;
set SERVEROUTPUT ON  ;
declare record_pet sys_refcursor;
begin
sql_pet(record_pet);
end;

你可能感兴趣的:(database,oracle,数据库,database)