Oracle 游标

--游标的属性
--（1）cur_name%rowcount  ：指出处理的行数
-- (2) cur_name%found     :处理了一行或多行返回TRUE否则FALSE 如 WHILE CUR%FOUND中
--（3）cur_name%notfound  :如果没有处理行返回TRUE，否则FALSE 如 EXIT WHEN CUR%NOTFOUND
--（4）cur_name%isopen    :如果处理之后不关闭游标，则为TRUE，关闭后为FALSE。发生在隐式游标中时
--   总是为FALSE；

declare
    tname student.name%type;
    tage  student.age%type;
begin
    select name,age into tname,tage from 
        student where id=‘S001‘;
        --如果返回多行，或零行，执行将报错。
    dbms_output.put_line(‘姓名=‘||tname||‘  年龄=‘||tage);
end;

--  定义游标（1）     
--  CURSOR cursor_name IS select_statement;    
cursor c_stu is select * from student;   
---------------------------------------------------------------------------------------
     
--  定义系统游标（2） ，使用参照3    
--  cursor_name SYS_REFCURSOR;系统游标    
c_stu sys_refcursor; 
---------------------------------------------------------------------------------------


--定义游标（3）
--先在包中定义游标，及用于检索的结构体，
--这里的结构体相当于  游标%rowtype
create or replace package p_stu
as
     type c_stu is ref cursor;
     type rc_stu is record
     (
         name student.name%type,
         age  student.age%type
     );
end;

--使用包中的游标
declare
    c_student p_stu.c_stu;
    crw_stu   p_stu.rc_stu;
begin
    open c_student for select name,age from student;
    loop
        fetch c_student into crw_stu;
        exit when c_student%notfound;
        dbms_output.put_line(‘姓名=‘||crw_stu.name||‘  年龄=‘||crw_stu.age);    
    
    end loop;
end;

--使用 FOR 循环遍历游标，不需要明确打开和关闭游标

declare
    --定义一个游标
    cursor c_stu is 
        select name,age from student;
    --定义一个游标变量
    cw_stu c_stu%rowtype;
begin      
    --使用for循环来使用这个游标
    for cw_stu in c_stu loop
        dbms_output.put_line(‘姓名=‘||cw_stu.name||‘ 年龄=‘||cw_stu.age);   
    end loop;
end;

--使用 fetch 游标 必须明确打开和关闭游标

declare
    --定义一个游标
    cursor c_stu is 
        select name,age from student;
    --定义一个游标变量
    cw_stu c_stu%rowtype;
begin
    --明确打开游标
    open c_stu; 
    loop        
        --提取一行数据到cw_stu
        fetch c_stu into cw_stu;        
        --判读是否提取到值，没取到值就退出       
        --取到值c_stu%notfound 是false        
        --取不到值c_stu%notfound 是true
        exit when c_stu%notfound;
        dbms_output.put_line(‘姓名=‘||cw_stu.name||‘ 年龄=‘||cw_stu.age);
    end loop;
    --明确关闭游标
    close c_stu; 
end;

--使用 while fetch 遍历数据  %found属性

declare
    --定义一个游标
    cursor c_stu is 
        select name,age from student;
    --定义一个游标变量
    cw_stu c_stu%rowtype;
begin
    open c_stu;  --明确打开游标
    fetch c_stu into cw_stu; --填充第一行数据，以便WHILE条件检索
    while c_stu%found loop
        dbms_output.put_line(‘姓名=‘||cw_stu.name||‘ 年龄=‘||cw_stu.age);
        fetch c_stu into cw_stu;  --每次检索前都需要填充数据
    end loop;
    close c_stu;  --明确关闭游标
end;

--带参游标
declare
    cursor c(sSal emp.sal%type, sEmpno emp.empno%type)
    is
    select * from emp where sal >= sSal and empno > sEmpno;
begin
    for record_data in c(2500, 6666) loop
        dbms_output.put_line(record_data.ename);
    end loop;
end;

--  注意：在declare块中使用存储过程返回的游标时：
-- （1）不能定义系统游标变量，编译错误。如：cw_Stu C_Stu%rowtype;
-- （2）可以使用结构体变量，但不能使用for循环如：for rw_stu in c_stu loop
--     将提示 c_stu ‘不是过程或尚未定义‘。
--  (3)游标不可显示打开或关闭，如 open c_stu;表达式类型错误。