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;