很长一段时间内PL/SQL开发人员必须有一个indexby表才能创建某个指定数据类型的或者PL/SQL记录的表因为他们只接受整型数据以从数组中提取数据所以类型声明的末尾子句以INDEX BY BINARY_INTEGER结束如果想以非整型值作为索引要么你必须创建一个存储过程来扫描需要的值要么你必须在一个单独的表上建立一个索引
set serveroutput on
declare
type valrec is record(key varchar()val varchar());
type valtbl is table of valrec index by binary_integer;
mytbl valtbl;
begin
mytbl()key := foo;
mytbl()val := bar;
for i in unt loop
if mytbl(i)key = foo then
dbms_outputput_line(mytbl(i)val);
end if;
end loop;
end;
/
PL/SQL允许使用indexby表创建某个指定数据类型或者PL/SQL记录的表然而如果想以非整型值作为索引要么你必须创建一个存储过程扫描你需要的值要么你必须在一个单独的表上建立一个索引Oraclei扩展了indexby表的语法允许字符串类型的索引叫做关联数组
有了字符串类型你现在就可以快速访问元素而不用再在每个元素间循环或者去知道它在数组中的位置
set serveroutput on
declare
type valtbl is table of varchar() index by varchar();
mytbl valtbl;
begin
mytbl(foo) := bar;
dbms_outputput_line(mytbl(foo));
end;
/
使用字符串索引的关联数组的一个有趣的特性是它们自动地通过当前的国际语言支持(NLS)设置排序FIRST和LAST函数返回数组中以字典序排列的第一个和最后一个健值NEXT和PRIOR允许你以字典序获取下一个和前一个键
set serveroutput on
declare
type valtbl is table of varchar() index by varchar();
mytbl valtbl;
key varchar();
begin
mytbl(b) := two;
mytbl(a) := one;
mytbl(c) := three;
key := mytblfirst;
while key is not null loop
dbms_outputput_line(mytbl(key));
key := mytblnext(key);
end loop;
end;
/
因为Oracle可以自动地将任何的数据类型转换为字符串类型所以能以字符串作为索引意味着可以以任何数据类型作为索引你可以使用这个方法把日期浮点值行二进制值和对象引用作为索引
set serveroutput on
declare
type timetbl is table of integer index by varchar();
mytbl timetbl;
key varchar();
begin
for row in (select * from emp) loop
key := to_char(rowhiredateYYYYMMDD);
if not mytblexists(key) then
mytbl(key) := ;
end if;
mytbl(key) := mytbl(key) + ;
end loop;
dbms_outputput_line(hiring barchart:);
dbms_outputput_line();
key := mytblfirst;
while key is not null loop
dbms_outputput_line(
to_char(to_date(keyYYYYMMDD)DD MON YYYY)
||: ||rpad(#mytbl(key)#));
key := mytblnext(key);
end loop;
end;
/
键值必须是唯一的并且是大小写敏感的在运行时改变NLS值可能会产生运行时错误对于关联数组的每一个操作NLS设置必须保持相同
关联数组必须在PL/SQL代码中手工建立其它的程序开发语言和接口不能把主机数组绑定到并联数组所以你就不能用字符串索引的关联数组使用BULK COLLECT