Oracle数据库实用教程.pptVIP

%isopen属性测试游标是否打开，如果没有打开游标就使用fetch语句，将提示错误信息。刚刚的例子修改为：declaretempsalscott.emp.sal%type;cursortempcursorisselect*fromscott.empwheresaltempsal;cursorrecordtempcursor%rowtype;begintempsal:=800;opentempcursor;iftempcursor%isopenthenfetchtempcursorintocursorrecord;dbms_output.put_line(to_char(cursorrecord.deptno));elsedbms_output.put_line(游标没有打开!);endif;closetempcursor;end;%found属性测试前一个fetch语句是否有值修改如下：declaretempsalscott.emp.sal%type;cursortempcursorisselect*fromscott.empwheresaltempsal;cursorrecordtempcursor%rowtype;begintempsal:=800;opentempcursor;iftempcursor%isopenthenfetchtempcursorintocursorrecord;iftempcursor%foundthendbms_output.put_line(to_char(cursorrecord.deptno));elsedbms_output.put_line(没有取到值);endif;elsedbms_output.put_line(游标没有打开!);endif;closetempcursor;end;％notfound属性%notfound是%found的反逻辑。％ROWCOUNT属性返回游标的行数修改如下：Declaretempsalscott.emp.sal%type;cursortempcursorisselect*fromscott.empwheresaltempsal;cursorrecordtempcursor%rowtype;rowcountsnumber;begintempsal:=800;opentempcursor;fetchtempcursorintocursorrecord;iftempcursor%foundthendbms_output.put_line(to_char(cursorrecord.deptno));dbms_output.put_line(to_char(tempcursor%rowcount));elsedbms_output.put_line(没有数据);endif;closetempcursor;end;游标与while循环例子--这里有一个参数游标的概念declarecursortempcursor(tempsalemp.sal%type)isselect*fromempwheresaltempsal;cursorrecordtempcursor%rowtype;beginopentempcursor(800);fetchtempcursorintocursorrecord;whiletempcursor%foundloopdbms_output.put_line(to_char(cursorrecord.deptno||||cursorrecord.ename));fetchtempcursorintocursorrecord;endloop;closetempcurso