oracle组合数据类型,oracle复合数据类型-相关方法

oracle提供了一些内置的函数和方法来操作复合数据类型。

一、count 返回集合中的元素的个数

declare

type ename_table_type is table of varchar2(20) index by binary_integer ;

ename_table ename_table_type ;

begin

for i in 1..5 loop

ename_table(i):='a'||i ;

end loop ;

dbms_output.put_line('元素个数：'||ename_table.count) ;

for c in 1..ename_table.count loop

dbms_output.put_line(ename_table(c)) ;

end loop ;

end ;

二、exists 用于确定集合元素是否存在，如果存在则返回true，否则返回false

SQL> declare

2 type ename_table_type is table of varchar2(20);

3 ename_table ename_table_type ;

4 BEGIN

5       IF ename_table.exists(1) THEN

6             ename_table(1):='scot' ;

7       ELSE

8            dbms_output.put_line('嵌套表使用前要初始化');

9       END if ;

10 end;

11 /

嵌套表使用前要初始化

PL/SQL procedure successfully completed

三、first&last first返回集合第一个元素的下标，last返回集合最后一个元素的下标。

SQL> DECLARE

2 TYPE ename_varray_type IS table OF varchar2(20) INDEX BY binary_integer;

3 ename_varray ename_varray_type ;

4 BEGIN

5       ename_varray(1):='mary' ;

6       ename_varray(4):='scott' ;

7       ename_varray(5):='tiger' ;

8       ename_varray(7):='lucy' ;

9       dbms_output.put_line('第一个元素下标：'||ename_varray.first);

10       dbms_output.put_line('最后个元素下标：'||ename_varray.last);

11 end ;

12 /

第一个元素下标：1

最后个元素下标：7

PL/SQL procedure successfully completed

四、prior&next prior返回当前元素前一个元素的下标，next返回当前元素下一下元素的下标

SQL> DECLARE

2 TYPE ename_varray_type IS table OF varchar2(20) INDEX BY binary_integer;

3 ename_varray ename_varray_type ;

4 BEGIN

5       ename_varray(1):='mary' ;

6       ename_varray(4):='scott' ;

7       ename_varray(5):='tiger' ;

8       ename_varray(7):='lucy' ;

9       dbms_output.put_line('元素5的前一个元素下标：'||ename_varray.prior(5));

10       dbms_output.put_line('元素5的后一个元素下标：'||ename_varray.next(5));

11 end ;

12 /

元素5的前一个元素下标：4

元素5的后一个元素下标：7

PL/SQL procedure successfully completed

五、delete

DECLARE

TYPE ename_varray_type IS table OF varchar2(20) INDEX BY binary_integer;

ename_varray ename_varray_type ;

BEGIN

ename_varray(1):='mary' ;

ename_varray(4):='scott' ;

ename_varray(5):='tiger' ;

ename_varray(6):='lucy' ;

ename_varray(7):='LILI' ;

ename_varray(8):='join' ;

ename_varray(9):='wzj' ;

FOR c IN 1..ename_varray.count LOOP

IF ename_varray.exists(c) then

dbms_output.put_line('下标为'||c||'的值为：'||ename_varray(c));

END IF ;

END loop ;

ename_varray.delete(5);

dbms_output.put_line('删除下标为5的元素之后');

FOR c IN 1..ename_varray.count LOOP

IF ename_varray.exists(c) then

dbms_output.put_line('下标为'||c||'的值为：'||ename_varray(c));

END IF ;

END loop ;

ename_varray.delete(8,9);

dbms_output.put_line('删除下标为8,9的元素之后');

FOR c IN 1..ename_varray.count LOOP

IF ename_varray.exists(c) then

dbms_output.put_line('下标为'||c||'的值为：'||ename_varray(c));

END IF ;

END loop ;

end ;

delete删除所有元素，delete(n)删除下标为n的元素，delete(m,n)删除下标元素在［m，n］中的元素。

六、extend   只用于嵌套表和变长数组，用来扩展元素个数

SQL> DECLARE

2 TYPE ename_varray_type IS varray(10) OF varchar2(20);

3 ename_varray ename_varray_type :=ename_varray_type('');

4 BEGIN

5      FOR c IN 1..9 LOOp

6          ename_varray(c):='a'||c ;

7          ename_varray.extend ;

8      END LOOP ;

9      FOR c IN 1..ename_varray.count LOOP

10         dbms_output.put_line('下标为'||c||'的元素为：'||ename_varray(c));

11      END LOOP ;

12 end ;

13 /

下标为1的元素为：a1

下标为2的元素为：a2

下标为3的元素为：a3

下标为4的元素为：a4

下标为5的元素为：a5

下标为6的元素为：a6

下标为7的元素为：a7

下标为8的元素为：a8

下标为9的元素为：a9

下标为10的元素为：

PL/SQL procedure successfully completed