Oracle9i笔记1(17)

end loop;

for i in EMP_TABLE.FIRST .. EMP_ST loop DBMS_OUTPUT.PUT_LINE(TO_CHAR(i) ||' '|| EMP_TABLE(i).salary); end loop; exception

when no_data_found then

DBMS_OUTPUT.PUT_LINE('未發現數據'); when others then

EMP_TABLE(i).ename ||' '||

DBMS_OUTPUT.PUT_LINE('錯誤'); end;

index by table 相當于一個計數列和表里的一個字段 index by table of record 一個計數列和一個表 附例： declare

type get_dept is table of dept.dept_name%type index by binary_integer; get_dpt get_dept; i number:=1;

cursor c_dpt is select dept.dept_name from dept order by dept.dept_name; begin

open c_dpt; loop

exit when c_dpt%notfound ; fetch c_dpt into get_dpt(i); i:=i+1; end loop; close c_dpt;

for i in get_dpt.first .. get_st loop

DBMS_OUTPUT.PUT_LINE('Department: '||get_dpt(i)); end loop;

exception

when no_data_found then

DBMS_OUTPUT.PUT_LINE('無數據!'); end;

搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，第一范文网，提供最新人文社科Oracle9i笔记1(17)全文阅读和word下载服务。