使用INDEX BY BINARY_INTEGER的索引表，则实现同一执行结果，程序要做哪些相应的改变。

SET SERVEROUTPUT ON

DECLARE

TYPE dept_list IS TABLE OF dept.dname%TYPE INDEX BY BINARY_INTEGER;

TYPE top5_list IS TABLE OF dept.loc%TYPE INDEX BY BINARY_INTEGER;

dis_dept dept_list;

Num_5 top5_list;

BEGIN

dis_dept(1):='AMGN';

IF dis_dept IS NULL THEN

dis_dept(1) :=’AMGN’ ;

dis_dept(2) :=’BGEN’ ;

DBMS_OUTPUT.PUT_LINE('dis_dept表当前元素个数为：'||to_char(dis_dept.count));

END IF;

Num_5(1) := ‘ORCL’ ;

Num_5(2) := ‘CSCO’ ;

IF NOT Num_5.EXISTS(3) THEN

Num_5(3):='CPQ';

END IF;

Num_5(4):='DELL';

FOR COUNTER IN 1..4 LOOP

DBMS_OUTPUT.PUT_LINE(NUM_5(COUNTER));

END LOOP;

END;

ITPub博客

Oracle之可变数组