Oracle之数组

Posted 2020-09-03 Wolf

[Oracle整理]Oracle之数组

说明：本内容是工作用到的知识点整理，来自工作中和网络。
代码于Oracle9上测试。

 

Oracle数组一般可以分为固定数组和可变数组

集合：是具有相同定义的元素的聚合。Oracle有两种类型的集合：

可变长数组（VARRAY）：可以有任意数量的元素，但必须预先定义限制值。

嵌套表：视为表中之表，可以有任意数量的元素，不需要预先定义限制值。

在PL/SQL中是没有数组(Array)概念的。但是如果程序员想用Array的话，就得变通一下，用TYPE   和Table   of   Record来代替多维数组，一样挺好用的。

固定数组

-- ============ char array =============== DECLARE   -- declare fixed array   TYPE arry_var IS VARRAY(2) OF VARCHAR2(10);   arry_name arry_var; BEGIN   -- init array   arry_name := arry_var(\'tom\', \'jim\',\'tim\');   dbms_output.put_line(arry_name(1));   dbms_output.put_line(arry_name(2)); END; -- ================ number array ======== DECLARE   -- declare fixed array   TYPE arry_num IS VARRAY(10) OF NUMBER;   arry_top arry_num; BEGIN   -- init array   arry_top := arry_num(1,2,3);   dbms_output.put_line(arry_top(1));   dbms_output.put_line(arry_top(2)); END;

1 VARRAY(10)变数数组大小为10

2OF NUMBER 表示数值类型是number

可变数组

一维数组

DECLARE   TYPE t_table IS TABLE OF VARCHAR2(30) INDEX BY BINARY_INTEGER;   v_table t_table;   v_cnt   NUMBER; BEGIN   v_table(1) := \'1\';   v_table(2) := \'3\';   v_table(3) := \'9\';   v_cnt := v_table.COUNT;   FOR i IN 1 .. v_cnt LOOP     dbms_output.put_line(v_table(i));     END LOOP; END;

多维数组

1 Create Table

create table XXUSER (   USER_ID   NUMBER,   USER_NAME VARCHAR2(255),   SEX       VARCHAR2(2),   AGE       NUMBER(3),   ADDRESS   VARCHAR2(2000) )

2 定义结果集（Record）

存放xxuser的部分字段

DECLARE   -- only 2 fileds   TYPE t_record_user IS RECORD(     user_id   xxuser.user_id%type,     user_name xxuser.user_name%type);   TYPE t_user IS TABLE OF t_record_user INDEX BY BINARY_INTEGER;   v_arry_user t_user; BEGIN   SELECT user_id, user_name BULK COLLECT INTO v_arry_user FROM xxuser;   FOR i IN 1 .. v_arry_user.COUNT LOOP     dbms_output.put_line(v_arry_user(i).user_name);   END LOOP; END;

3 使用ROWTYPE

存放xxuser的全部字段，比Record简洁。

DECLARE   -- ALL,XXUser(user_id, user_name, sex, age, address)   TYPE t_user IS TABLE OF xxuser%ROWTYPE INDEX BY BINARY_INTEGER;   v_arry_user t_user; BEGIN   SELECT * BULK COLLECT INTO v_arry_user FROM xxuser;   FOR i IN 1 .. v_arry_user.COUNT LOOP     dbms_output.put_line(v_arry_user(i).user_name || v_arry_user(i).sex);   END LOOP; END;

 

 

==================================================

 

 

 

 

对于集合类型，与单一的数据类型相比较而言，应该以一个整体的观念来考虑集合，即是一批类型相同的数据组合而非单一的数据。因此集
合类型集合的声明、赋值、初始化较之单一类型而言，有很大的不同。尤其是嵌套表与变长数组，在赋值之前必须先初始化。当嵌套表和变长数
组在声明时，它们都会自动地被设置成NULL值。也就是嵌套表和变长数组中集合不存在任何元素，并不是针对它所拥有的元素。可以使用系统定
义的与集合类型同名的函数来初始化集合。我们必须显式地调用构造函数为每一个变长数组和嵌套表变量进行初始化操作(对于关联数组来说，
是不需要使用构造函数进行初始化的)。

        有关集合类型的描述请参考：
        PL/SQL 联合数组与嵌套表 
        PL/SQL 变长数组
        PL/SQL --> PL/SQL记录 

一、联合数组的赋值

    联合数组的不需要初始化，直接赋值即可。(后续讲到的集合的初始化均指嵌套表与变长数组)

 

[sql] view plain copy

1. DECLARE    
2.    TYPE idx_loc_type IS TABLE OF VARCHAR2( 13 )    
3.                            INDEX BY BINARY_INTEGER;    
4.     
5.    loc_tab   idx_loc_type;    
6. BEGIN    
7.    loc_tab( 1 ) := \'NEW YORK\';                        -->联合数组不需要初始化，直接赋值即可    
8.    loc_tab( 2 ) := \'DALLAS\';    
9.    DBMS_OUTPUT.put_line( \' loc_tab(1) value is \' || loc_tab( 1 ) );    
10.    DBMS_OUTPUT.put_line( \' loc_tab(2) value is \' || loc_tab( 2 ) );    
11. END;    
12.     
13. --------------------------------------------------------------------------------------------------------     
14.     
15. DECLARE    
16.    TYPE idx_loc_type IS TABLE OF VARCHAR2( 13 )    
17.                            INDEX BY BINARY_INTEGER;    
18.     
19.    loc_tab     idx_loc_type;    
20.    v_counter   INTEGER := 0;    
21. BEGIN    
22.    FOR x IN ( SELECT loc FROM dept )       -->这里通过for 循环得到loc的值    
23.    LOOP    
24.       v_counter   := v_counter + 1;        -->使用一个v_counter变量来控制联合数组的下标    
25.       loc_tab( v_counter ) := x.loc;       -->将得到的loc的值赋值给联合数组中对应的一个下标位    
26.       DBMS_OUTPUT.put_line( \' loc_tab(\' || v_counter || \') value is \' || loc_tab( v_counter ) );    
27.    END LOOP;    
28. END;  

二、集合的初始化与赋值

1、初始化的方法
     集合类型主要分为三步来完成，一是声明，二是初始化，三是赋值。初始化和赋值可以在声明块中完成，也可以在执行块中完成。
        collection_name collection_type:=collection_type();   -->初始化集合为空(empty)
        
     集合的初始化主要是通过构造函数(构造函数即是声明类型是的类型名)来进行初始化，下面常用的初始化方法包括：
        a、在声明块声明集合，且在声明块中使用构造函数初始化为空(empty)但非NULL，在执行块中使用extend方式后进行赋值
        b、在声明块声明集合，在执行块中使用构造函数初始化为空(empty)但非NULL，在执行块中使用extend方式后赋值
        c、在声明块声明集合，在执行块中使用构造函数初始化时一并赋值
        d、在声明块声明集合，同时使用构造函数初始化并赋值，即三步合为一步来完成
     对于初始化为空的集合(empty)，后续需要使用extend方式来扩展容量，除非使用bulk collect into方式
             
2、集合赋值的方法
        collection_name(subscript) := expression;
        
3、赋值时可能引起的异常 
     在下面几种给集合元素赋值的情况下，可能会引起多种异常。
        a、如果下标索引不存在或无法转换成正确的数据类型，PL/SQL就会抛出预定义异常VALUE_ERROR。
                通常，下标是一个整数。但关联数组的下标也可以是VARCHAR2类型。 
        b、如果所给下标索引指向了一个未初始化的元素时，PL/SQL就会抛出SUBSCRIPT_BEYOND_COUNT异常。 
        c、如果集合被自动初始化为空值并且程序引用了其中的一个元素，PL/SQL会抛出COLLECTION_IS_NULL异常。

4、元素的引用
        collection_name(subscript)

     可以把其中的表元素作为参数传递。如verify_loc(nest_loc_tab(i))，verify_loc为函数或过程。

   

三、集合的初始化与赋值引用示例    

 

[sql] view plain copy

1. 1、未初始化集合的情形    
2. DECLARE    
3.    TYPE nest_loc_type IS TABLE OF VARCHAR2( 13 );    
4.     
5.    loc_tab   nest_loc_type;    
6. BEGIN    
7.    loc_tab( 1 ) := \'NEW YORK\';    
8.    loc_tab( 2 ) := \'DALLAS\';    
9.    DBMS_OUTPUT.put_line( \' loc_tab(1) value is \' || loc_tab( 1 ) );    
10.    DBMS_OUTPUT.put_line( \' loc_tab(2) value is \' || loc_tab( 2 ) );    
11. END;    
12.     
13. DECLARE    
14. *    
15. ERROR at line 1:    
16. ora-06531: Reference to uninitialized collection  -->收到了ora-06531错误提示，变长数组未初始化时会收到同样的错误提示    
17. ora-06512: at line 6    
18. --------------------------------------------------------------------------------------------------------    
19.     
20. 2、集合为NULL的判断    
21. DECLARE    
22.    TYPE nest_loc_type IS TABLE OF VARCHAR2( 13 );    
23.     
24.    loc_tab   nest_loc_type;    
25. BEGIN    
26.    IF loc_tab IS NULL THEN    
27.       DBMS_OUTPUT.put_line( \'Before initialization, the loc_tab is null.\' );    
28.    -- While the collection  is null, we cannot check its COUNT attribute.    
29.    --   DBMS_OUTPUT.PUT_LINE(\'It has \' || loc_tab.COUNT || \' elements.\');    
30.    ELSE    
31.       DBMS_OUTPUT.put_line( \'Before initialization, the loc_tab is not null.\' );    
32.    END IF;    
33.     
34.    loc_tab     := nest_loc_type( );         --> initialize empty nest table    
35.     
36.    IF loc_tab IS NULL THEN    
37.       DBMS_OUTPUT.put_line( \'After initialization, the loc_tab is null.\' );    
38.    ELSE    
39.       DBMS_OUTPUT.put_line( \'After initialization, the loc_tab is not null.\' );    
40.       DBMS_OUTPUT.put_line( \'It has \' || loc_tab.COUNT || \' elements.\' );    
41.    END IF;    
42. END;    
43.     
44. Before initialization, the loc_tab is null.    
45. After initialization, the loc_tab is not null.    
46. It has 0 elements.    
47.     
48. PL/SQL procedure successfully completed.    
49. --------------------------------------------------------------------------------------------------------    
50.     
51. 3、使用空构造函数在声明时进行初始化    
52. -->使用该方法初始化之后，表明嵌套表或变成数组是空的，但是非NULL，在执行块再对其赋值    
53. -->下面对变长数组进行初始化    
54. DECLARE    
55.    TYPE varry_loc_type IS VARRAY( 10 ) OF scott.dept.loc%TYPE;    
56.     
57.    varry_loc_tab   varry_loc_type := varry_loc_type( );                 -->仅仅是在集合变量之后使用空构造函数    
58. BEGIN    
59.    varry_loc_tab( 1 ) := \'NEW YORK\';                                    -->尽管变长数组被初始化，但仍然不能直接赋值            
60.    varry_loc_tab( 2 ) := \'DALLAS\';                                      -->这是由变长数组和嵌套表特性决定需要先做extend       
61.    DBMS_OUTPUT.put_line( \' varry_loc_tab(1) value is \' || varry_loc_tab( 1 ) );    
62.    DBMS_OUTPUT.put_line( \' varry_loc_tab(2) value is \' || varry_loc_tab( 2 ) );    
63. END;    
64.     
65. DECLARE    
66. *    
67. ERROR at line 1:    
68. ora-06533: subscript beyond count    
69. ora-06512: at line 6    
70. --------------------------------------------------------------------------------------------------------    
71.     
72. 4、使用空构造函数在声明时进行初始化，执行块使用extend方式扩展后赋值    
73. DECLARE    
74.    TYPE varry_loc_type IS VARRAY( 10 ) OF scott.dept.loc%TYPE;    
75.     
76.    varry_loc_tab   varry_loc_type := varry_loc_type( );              -->仅仅是在集合变量之后使用空构造函数    
77. BEGIN    
78.    varry_loc_tab.EXTEND;                                             -->需要使用extend方式扩展集合容量    
79.    varry_loc_tab( 1 ) := \'NEW YORK\';    
80.    varry_loc_tab.EXTEND;                                             -->需要使用extend方式扩展集合容量    
81.    varry_loc_tab( 2 ) := \'DALLAS\';    
82.    DBMS_OUTPUT.put_line( \' varry_loc_tab(1) value is \' || varry_loc_tab( 1 ) );    
83.    DBMS_OUTPUT.put_line( \' varry_loc_tab(2) value is \' || varry_loc_tab( 2 ) );    
84. END;    
85. --------------------------------------------------------------------------------------------------------    
86.     
87. 5、嵌套表的初始化,使用构造函数在执行块直接初始化并赋值    
88. DECLARE    
89.    TYPE nest_loc_type IS TABLE OF VARCHAR2( 13 );    
90.     
91.    loc_tab   nest_loc_type;    
92. BEGIN    
93.    loc_tab     :=    
94.       nest_loc_type( \'NEW YORK\'           -->使用声明时的类型nest_loc_type函数来进行初始化    
95.                     ,\'DALLAS\'    
96.                     ,\'CHICAGO\'    
97.                     ,\'BOSTON\' );    
98.     
99.    FOR i IN 1 .. loc_tab.COUNT    
100.    LOOP    
101.       DBMS_OUTPUT.put_line( \'loc_tab(\' || i || \') value is \' || loc_tab( i ) );    
102.    END LOOP;    
103. END;    
104. --------------------------------------------------------------------------------------------------------    
105.     
106. 6、含有NOT NULL嵌套表的初始化    
107. DECLARE    
108.    TYPE loc_type IS TABLE OF VARCHAR2( 13 ) NOT NULL;      -->定义了NOT NULL约束条件    
109.     
110.    loc_tab   loc_type;    
111. BEGIN    
112.    loc_tab     :=    
113.       loc_type( \'NEW york\'    
114.                ,NULL                                       -->构造时传递了NULL值    
115.                ,NULL    
116.                ,\'boston\' );    
117.     
118.    FOR i IN 1 .. loc_tab.COUNT    
119.    LOOP    
120.       DBMS_OUTPUT.put_line( \'loc_tab(\' || i || \') value is \' || loc_tab( i ) );    
121.    END LOOP;    
122. END;    
123.     
124. -->由于存在not null约束，初始化传递null值则收到错误提示    
125. ERROR at line 8:    
126. ora-06550: line 8, column 17:    
127. pls-00567: cannot pass NULL to a NOT NULL constrained formal parameter    
128. ora-06550: line 9, column 17:    
129. pls-00567: cannot pass NULL to a NOT NULL constrained formal parameter    
130. ora-06550: line 6, column 4:    
131. pl/SQL: Statement ignored    
132. --------------------------------------------------------------------------------------------------------    
133.     
134. 7、变长数组的初始化,使用构造函数直接初始化并赋值    
135. -->变长数组的初始化与嵌套表一样，可以使用构造函数直接初始化并赋值    
136. DECLARE    
137.    TYPE varry_loc_type IS VARRAY( 10 ) OF scott.dept.loc%TYPE;    
138.     
139.    varry_loc_tab   varry_loc_type;    
140. BEGIN    
141.    varry_loc_tab :=    
142.       varry_loc_type( \'NEW YORK\'    
143.                      ,\'DALLAS\'    
144.                      ,\'CHICAGO\'    
145.                      ,\'BOSTON\' );    
146.     
147.    FOR i IN varry_loc_tab.FIRST .. varry_loc_tab.LAST   -->注意此处使用了集合方法中的函数first和last来控制循环步长    
148.    LOOP    
149.       DBMS_OUTPUT.put_line( \'varry_loc_tab(\' || i || \') value is \' || varry_loc_tab( i ) );    
150.    END LOOP;    
151. END;    
152. --------------------------------------------------------------------------------------------------------    
153.     
154. 8、声明时初始化(构造)、并赋值    
155. DECLARE    
156.    TYPE nest_loc_type IS TABLE OF VARCHAR2( 13 ) NOT NULL;    
157.     
158.    nest_loc_tab   nest_loc_type := nest_loc_type( \'NEW YORK\', \'DALLAS\', \'CHICAGO\' ); -->在声明时直接初始化并赋值    
159. BEGIN    
160.    FOR i IN 1 .. nest_loc_tab.COUNT    -->注意此处调用了集合操作方法中的count函数    
161.    LOOP    
162.       DBMS_OUTPUT.put_line( \'nest_loc_tab(\' || i || \') value is \' || nest_loc_tab( i ) );    
163.    END LOOP;    
164. END;    
165. --------------------------------------------------------------------------------------------------------    
166.     
167. 9、SQL语句中使用构造函数    
168. CREATE OR REPLACE TYPE mail_type IS TABLE OF VARCHAR2( 100 );   -->创建一个嵌套表类型    
169.     
170. CREATE TABLE tb_tmp                   -->创建表tb_tmp    
171. (    
172.    empno   NUMBER( 4 )    
173.   ,ename   VARCHAR2( 10 )    
174.   ,mail    mail_type                  -->列mail的类型为mail_type    
175. )    
176. NESTED TABLE mail                     -->注意此处需要指定嵌套表的存储方式    
177.    STORE AS mail_tab;    
178.     
179. INSERT INTO tb_tmp    
180.    SELECT 8888, \'Jack\', mail_type( \'[e-mail]\', \'[e-mail]\' ) FROM dual;  -->插入数据时需要使用构造函数    
181.     
182. 10、集合与集合之间的赋值    
183. -->下面的例子声明了两个变长数组last_name_type和surname_type    
184. DECLARE    
185.    TYPE last_name_type IS VARRAY( 3 ) OF VARCHAR2( 64 );    
186.     
187.    TYPE surname_type IS VARRAY( 3 ) OF VARCHAR2( 64 );    
188.     
189.    -->下面声明了两个相同类型的变长数组并为其赋值，group1和group2使用了相同的构造函数    
190.    group1   last_name_type := last_name_type( \'Jones\', \'Wong\', \'Marceau\' );    
191.    group2   last_name_type := last_name_type( \'Klein\', \'Patsos\', \'Singh\' );    
192.    -->下面的group3使用了surname_type作为类型    
193.    group3   surname_type := surname_type( \'Trevisi\', \'Macleod\', \'Marquez\' );    
194. BEGIN    
195.    group1      := group2;                           -- >group1 和group2之间可以相互赋值    
196. --   group3 := group2;                             -->raises an error    PLS-00382: expression is of wrong type    
197. END;    
198. -- >group3和group2则不能赋值，因为两者为不同的数据类型    
199. -->尽管last_name_type与surname_type类型定义是相同的，但其实例化后，其集合变量不能互相赋值    
200. --------------------------------------------------------------------------------------------------------    
201.     
202. 11、使用NULL值集合为集合赋值    
203. DECLARE    
204.    TYPE nest_loc_type IS TABLE OF VARCHAR2( 30 );    
205.     
206.    nest_loc_tab         nest_loc_type := nest_loc_type( \'NEW YORK\', \'DALLAS\', \'CHICAGO\' );    
207.    empty_nest_loc_tab   nest_loc_type;                --> 嵌套表empty_nest_loc_tab没有初始化，此时被自动置为NULL    
208. BEGIN    
209.    IF nest_loc_tab IS NOT NULL THEN    
210.       DBMS_OUTPUT.put_line( \'OK, at first nest_loc_tab is not null.\' );    
211.    END IF;    
212.     
213.    nest_loc_tab := empty_nest_loc_tab;                -->将empty_nest_loc_tab的值(NULL)嵌套表赋值给nest_loc_tab    
214.     
215.    IF nest_loc_tab IS NULL THEN                       --> 此时nest_loc_tab被置为NULL，相当于没有初始化    
216.       DBMS_OUTPUT.put_line( \'OK, now nest_loc_tab has become null.\' );    
217.    END IF;    
218.     
219.    nest_loc_tab := nest_loc_type( \'NEW YORK\', \'DALLAS\', \'CHICAGO\' );  -->此时如果后续需要使用该嵌套表，应重新初始化它    
220. END;    
221.     
222. 12、记录类型的变长数组的初始化、赋值与元素引用    
223. DECLARE    
224.    TYPE emp_name_rec IS RECORD                             -->声明一个基于用户定义的记录类型    
225.    (    
226.       firstname   employees.first_name%TYPE    
227.      ,lastname    employees.last_name%TYPE    
228.      ,hiredate    employees.hire_date%TYPE    
229.    );    
230.     
231.    TYPE emplist_arr IS VARRAY( 10 ) OF emp_name_rec;       -->声明一个基于记录的变长数组，且最大尺寸为10    
232.     
233.    seniorsalespeople   emplist_arr;                        -->声明基于记录的变长数组变量    
234.     
235.    CURSOR c1 IS                                            -->声明游标，其列前面的记录类型相对照    
236.       SELECT first_name, last_name, hire_date FROM employees;    
237.     
238.    TYPE nameset IS TABLE OF c1%ROWTYPE;                    -->声明基于游标的记录类型    
239.     
240.    seniorten           nameset;                            -->声明基于游标记录类型的变量    
241.    endcounter          NUMBER := 10;                       -->变量endcounter计数器    
242. BEGIN    
243.    seniorsalespeople := emplist_arr( );                    -->初始化集合    
244.     
245.    SELECT first_name, last_name, hire_date                 -->从表中提取数据，且使用了BULK COLLECT INTO方式    
246.    BULK   COLLECT INTO seniorten    
247.    FROM   employees    
248.    WHERE  job_id = \'SA_REP\'    
249.    ORDER BY hire_date;    
250.     
251.    IF seniorten.LAST > 0 THEN    
252.       IF seniorten.LAST < 10 THEN                          -->如果小于10，则缩小变长数组的最大尺寸    
253.          endcounter  := seniorten.LAST;    
254.       END IF;    
255.     
256.       FOR i IN 1 .. endcounter     -->使用循环将游标类型变量中的元素逐条赋值给记录的变长数组变量seniorsalespeople并输出    
257.       LOOP    
258.          seniorsalespeople.EXTEND( 1 );    
259.          seniorsalespeople( i ) := seniorten( i );    
260.          DBMS_OUTPUT.    
261.          put_line(seniorsalespeople(i).lastname||\', \'||seniorsalespeople(i).firstname||\', \'||seniorsalespeople(i).hiredate);    
262.       END LOOP;    
263.    END IF;    
264. 以上是关于Oracle之数组的主要内容，如果未能解决你的问题，请参考以下文章

     数组 类型 在 存储过程中 使用

     oracle 数组长度

     oracle怎么使用数组

     oracle 存储过程 数组循环

     oracle数组 拼到sql的in子句中去

     Oracle Study之--Oracle 11gR2构建RAC之hosts文件故障