Oracle PL/SQL 編5 - カーソル、カーソル for ループ、例外識別子、例外処理 ■カーソル操作 (フェッチ、カーソル移動) set serveroutput on; declare jcrec 受注m%rowtype; cursor cu is select * from 受注m where 品番 = 'a001'; begin open cu; loop fetch cu into jcrec; exit when cu%notfound; dbms_output.put_line (jcrec.受注番号); end loop; close cu; end; / ■カーソル変数操作 (フェッチ、カーソル移動) set serveroutput on; declare type tpjcrec is ref cursor return 受注m%rowtype; --type