Oracle PL / SQL关联数组

PL / SQL支持三种数组，或PL / SQL集合。

关联数组最初称为PL / SQL表。

关联数组允许我们创建单维数组。

关联数组可以基于几乎任何数据类型。

例

以下PL / SQL过程演示如何声明关联数组或PL / SQL表。

声明关联数组包括两个步骤。

• 声明新的TYPE。
• 声明该TYPE的一个新变量。

declare

    TYPE name_table IS TABLE OF EMP.name%TYPE INDEX BY BINARY_INTEGER;
    t_name name_table;
    n_name binary_integer;

begin
  t_name(1)  := 'First';
  t_name(10) := 'Last';
  
  SYS.DBMS_OUTPUT.put_line(t_name(1));
  SYS.DBMS_OUTPUT.put_line(t_name(10));
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
  n_name := t_name.first();
  SYS.DBMS_OUTPUT.put_line('The first element is '||n_name||'.');
  n_name := t_name.next(n_name);
  SYS.DBMS_OUTPUT.put_line('The next element is '||n_name||'.');
  n_name := t_name.last();
  SYS.DBMS_OUTPUT.put_line('The last element is '||n_name||'.');
  n_name := t_name.prior(n_name);
  SYS.DBMS_OUTPUT.put_line('The prior element is '||n_name||'.');
  if t_name.exists(1) then
    SYS.DBMS_OUTPUT.put_line('Element 1 exists.');
  end if;
  SYS.DBMS_OUTPUT.put_line('deleting element 10');
  t_name.delete(10);
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
  SYS.DBMS_OUTPUT.put_line('deleting all elements');
  t_name.delete();
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
end;
/

注意

声明关联数组的语法如下：

TYPE <plsql_table_type_name> IS TABLE OF <data_type> 
INDEX BY BINARY_INTEGER; 

<plsql_table_type_name>是要提供给新的PL / SQL表TYPE的名称，

<data_type>是用于表或关联数组中的元素的数据类型。

使用以下语法声明基于新类型的关联数组：

<variable_name> <plsql_table_type_name>; 

<variable_name>是PL / SQL表的标识符，<plsql_table_type_name>是TYPE的名称。

注意2

关联数组可以是稀疏填充的。

我们不需要连续添加项到数组。

我们可以将它们添加到-2,147,483,647和2,147,483,647之间的任何指数值。

下表列出了PL / SQL表（关联数组）内置函数和过程。

对于PL / SQL表，还可以使用varchar2数据类型作为索引值。

所以在任何你看到的binary_integer的引用，你可以替换它varchar2。

方法	描述
count()	返回元素的数量
delete(ain_index in binary_integer)	删除指定的元素
delete()	删除所有元素
exists（ain_index in binary_integer）	如果元素存在则返回TRUE; 否则为FALSE
first()	返回第一个元素的索引
last()	返回最后一个元素的索引
prior（ain_index in binary_integer）	返回指定元素之前的第一个元素的索引
next（binary_integer中的ain_index）	返回指定元素之后的第一个元素的索引

实例2

以下代码是基于行级锚点的PL / SQL表（关联数组）的示例。

declare
    TYPE name_table IS TABLE OF EMP%ROWTYPE INDEX BY BINARY_INTEGER;
    t_name name_table;
    n_name binary_integer;

begin
  t_name(1).name  := 'CSS';
  t_name(10).name := 'HTML';
  SYS.DBMS_OUTPUT.put_line(t_name(1).name);
  SYS.DBMS_OUTPUT.put_line(t_name(10).name);
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
  n_name := t_name.first();
  SYS.DBMS_OUTPUT.put_line('The first element is '||n_name||'.');
  n_name := t_name.next(n_name);
  SYS.DBMS_OUTPUT.put_line('The next element is '||n_name||'.');
  n_name := t_name.last();
  SYS.DBMS_OUTPUT.put_line('The last element is '||n_name||'.');
  n_name := t_name.prior(n_name);
  SYS.DBMS_OUTPUT.put_line('The prior element is '||n_name||'.');
  if t_name.exists(1) then
    SYS.DBMS_OUTPUT.put_line('Element 1 exists.');
  end if;
  SYS.DBMS_OUTPUT.put_line('deleting element 10');
  t_name.delete(10);
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
  SYS.DBMS_OUTPUT.put_line('deleting all elements');
  t_name.delete();
  SYS.DBMS_OUTPUT.put_line('There are '||t_name.count()||' elements.');
end;
/

注意3

上面的代码使用关键字％ROWTYPE来锚定到基于WORKERS表中的列的复合记录类型。

代码还使用带有点运算符（。）的复合记录的字段名称名称到PL / SQL表的名称和索引，以便将名称值存储在关联数组中。

记录类型

我们可以使用数据类型声明PL / SQL记录。

declare
    TYPE name_record is record (
    first_name                            EMP.first_name%TYPE,
    middle_name                           EMP.middle_name%TYPE,
    last_name                             EMP.last_name%TYPE );

    TYPE name_table is table of name_record index by binary_integer;
    t_name                                name_table;

begin
     t_name(1).first_name  := 'Jack';
     t_name(1).last_name   := 'Smith';
     t_name(2).first_name  := 'Jason';
     t_name(2).last_name   := 'O'Brain';

     SYS.DBMS_OUTPUT.put_line(t_name(1).last_name||', '||t_name(1).first_name);
     SYS.DBMS_OUTPUT.put_line(t_name(2).last_name||', '||t_name(2).first_name);
end;
/

注意4

声明PL / SQL记录的语法如下

TYPE <plsql_record_type_name> IS RECORD ( 
<field_name_1> <data_type_1>, 
<field_name_2> <data_type_2>,... 
<field_name_N> <data_type_N>); 

其中<plsql_record_type_name>是新的PL / SQL记录类型的名称，<field_name>是记录中字段的名称，<data_type>是相应字段的数据类型。

上面的代码使用点运算符（。），后跟记录中字段的名称，以寻址PL / SQL表中的复合数据类型值。

在PL / SQL块中创建复合数据类型的语法是行而不是记录。

然后我们可以将字段引用为列。

TYPE <plsql_row_type_name> IS ROW ( 
<column_name_1> <data_type_1>, 
<column_name_2> <data_type_2>,... 
<column_name_N> <data_type_N>); 

多维数组

以下代码演示了如何在PL / SQL记录中使用PL / SQL表，以便解决一维限制。

declare
    TYPE name_table is table of EMP.name%TYPE index by binary_integer;
    TYPE name_record is record (dim2 name_table );
    TYPE dim1 is table of name_record index by binary_integer;
    t_dim1 dim1;

begin
  t_dim1(1).dim2(1) := 'CSS HTML';
  t_dim1(1).dim2(2) := 'SQL';

  t_dim1(2).dim2(1) := 'Java';
  t_dim1(2).dim2(2) := 'Javascript';

  SYS.DBMS_OUTPUT.put_line(t_dim1(1).dim2(1));
  SYS.DBMS_OUTPUT.put_line(t_dim1(1).dim2(2));
  SYS.DBMS_OUTPUT.put_line(t_dim1(2).dim2(1));
  SYS.DBMS_OUTPUT.put_line(t_dim1(2).dim2(2));
end;
/

 CSDN：程序猿 寄语：
1、作为一个真正的程序员，首先应该尊重编程，热爱你所写下的程序，他是你的伙伴，而不是工具。
2、程序员可以让步，却不可以退缩，可以羞涩，却不可以软弱，总之，程序员必须是勇敢的。
3、编程是一种单调的生活，因此程序员比普通人需要更多的关怀，更多的友情。
4、程序不是年轻的专利，但是，他属于年轻。
5、没有情调，不懂浪漫，也许这是程序员的一面，但拥有朴实无华的爱是他们的另一面。
6、一个好汉三个帮，程序员同样如此。