orcale 包,包体,函数,游标.(未完)

1,游标:

create or replace procedure pro1 (in_num number) is

     type m_cursor is ref cursor ;       -- 声明一个游标;
     v_cursor m_cursor ;                      --定义一个实体游标;
     v_emp emp%rowtype;                  --创建一个emp,每一行
     
     begin
       open v_cursor for select * from emp ;                 --打开游标.     记住for关键字     
       
       loop                               --开始遍历游标.
         
         fetch v_cursor into v_emp ;                   将游标的内容赋值给v_emp ;
         exit when v_cursor%notfound ;                    当游标到最后一个没有值了.
         dbms_output.put_line(v_emp.ename);
       end loop ;
         close v_cursor;                               ---关闭游标...(非常重要)
end ;