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;
/