就是又温习了下下：

    -- 援引游标(动态游标)
declare
-- 声明援引游标类型
 type type_cursor is ref cursor;
 v_cursor type_cursor;
 v_info v_cursor%rowtype;-- 动态游标中不能利用标名%rowtype
 begin
     open v_cursor for select dname from emp,dept;
   loop
    fetch v_cursor into v_info;
     exit when v_cursor%notfound;
       dbms_output.put_line(v_info.ename||v_info.dname);
   end loop;
   close v_cursor;
 end;
 -- 体系游标（援引游标）
declare
-- 声明援引游标类型
 v_cursor sys_refcursor;
 v_info varchar2(50);
 begin
     open v_cursor for select dname from emp,dept;
   loop
    fetch v_cursor into v_info;
     exit when v_cursor%notfound;
       dbms_output.put_line(v_info);
   end loop;
   close v_cursor;
 end;
 
 select * from emp ;