Oracle存储过程之游标循环

create or replace procedure Test1

as

strresult varchar2(20);

cursor cursor1 is select empno from emp;

begin

strresult:='empno is ';

for everyrow in cursor1 loop

begin

strresult:=everyrow.empno;

dbms_output.put_line(strresult);

end ;

end loop;

end;