type … is table of number index by binary_integer

/*未加index by binary_integer，则需要初始化numbers，
并且没插入一个元素到numbers类型的table中时，都需要先
extend
*/
declare
type numbers
istableofnumber;
n numbers:=numbers();
begin
 
n.extend;
 
n(1):=2;
 
n.extend;
 
n(2):=3;
 
for i
in1..n.count
loop
   
dbms_output.put_line(n(i));
   
endloop;
   
end;
/*加index by binary_integer，则numbers类型的下标是自动增长的，
numbers类型在插入元素时不需要初始化，不需要每次extend增加一个空间
*/
declare
 
type numbers
istableofnumberindexbybinary_integer;
 
n numbers;
begin
 
n(1) :=
2;
 
n(2) :=
3;
 
for i
in1 .. n.count
loop
   
dbms_output.put_line(n(i));
 
endloop;
end;
输出结果均为2,3