DECLARE

cursor mycur is select * from emp;
empInfo emp%ROWTYPE;
BEGIN
??????? open mycur;
??????? fetch mycur into empInfo;
??????? while(mycur%found)
???????? loop
????????????? dbms_output.put_line('编码:'||empInfo.Empno||';姓名:'||empInfo.Ename);
?????????????

-- ?使游标向下一行

????????? fetch mycur into empInfo;
???????? end loop;
???????
END;

?

?

注意 1： 在打开游标之前最好先判断游标是否已经是打开的。

??????? 通过 ISOPEN 判断，

格式：

游标%ISOPEN IF mycur%ISOPEN THEN

null ; ELSE

OPEN mycur ; END IF ;

注意 2：可以使用?ROWCOUNT 对游标所操作的行数进行记录。