1     說明

1.1       RECORD

定義記錄資料型別。它類似於C語言中的結構資料型別(STRUCTURE)，PL/SQL提供了將幾個相關的、分離的、基本資料型別的變數組成一個整體的方法，即RECORD複合資料型別。在使用記錄資料型別變數時，需要在宣告部分先定義記錄的組成、記錄的變數，然後在執行部分引用該記錄變數本身或其中的成員。

    定義記錄資料型別的語法如下：

TYPE RECORD_NAME IS RECORD(

V1  DATA_TYPE1 [NOT NULL][:=DEFAULT_VALUE],

V2  DATA_TYPE2 [NOT NULL][:=DEFAULT_VALUE],

VN  DATA_TYPEN [NOT NULL][:=DEFAULT_VALUE]);

1.2       VARRAY

陣列是具有相同資料型別的一組成員的集合。每個成員都有一個唯一的下標，它取決於成員在陣列中的位置。在PL/SQL中，陣列資料型別是

定義VARRAY資料型別的語法如下：

TYPE VARRAY_NAMEIS VARRAY(SIZE) OF ELEMENT_TYPE [NOT NULL];

其中，varray_name是VARRAY資料型別的名稱，size是正整數，表示可以容納的成員的最大數量，每個成員的資料型別是element_typeo預設時，成員可以取空值，否則需要使用NOT NULL加以限制。

1.3       TABLE

定義記錄表（或索引表）資料型別。它與記錄型別相似，但它是對記錄型別的擴充套件。它可以處理多行記錄，類似於C語言中的二維陣列，使得可以在PL/SQL中模仿資料庫中的表。

定義記錄表型別的語法如下：

TYPE TABLE NAME IS TABLE OF ELEMENT_TYPE [NOT NULL]

INDEX BY [BINARY_INTEGER|PLS_INTEGER|VARRAY2];

關鍵字INDEX BY表示建立一個主鍵索引，以便引用記錄表變數中的特定行。

BINARY_INTEGER的說明

如語句：TYPE NUMBERS  IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;其作用是,加了”INDEX BYBINARY_INTEGER ”後，NUMBERS型別的下標就是自增長，NUMBERS型別在插入元素時，不需要初始化，不需要每次EXTEND增加一個空間。

而如果沒有這句話“INDEXBY BINARY_INTEGER”，那就得要顯示對初始化，且每插入一個元素到NUMBERS型別的TABLE中時，都需要先EXTEND。

2     舉例

2.1       建立表結構以及資料準備

1. --組織機構結構表
2. CREATE TABLE SF_ORG
3. (
4. ORG_ID INT NOT NULL, --組織機構主鍵ID
5. ORG_NAME VARCHAR2( 50), --組織機構名稱
6. PARENT_ID INT --組織機構的父級
7. )
9. --一級組織機構
10. INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES( 1, '一級部門1', 0);
12. --二級部門
14. INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES( 2, '二級部門2', 1);
15. INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES( 3, '二級部門3', 1);
16. INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES( 4, '二級部門4', 1);

2.2       RECORD的使用舉例

先定義一個只與SF_ORG表中某幾個列的資料型別相同的記錄資料型別TYPE_ORG_RECORD，然後宣告一個該資料型別的記錄變數V_ORG_RECORD，最後用替換變數&ORG_ID接受輸入的僱員編碼，查詢並顯示該僱員的這幾列中的資訊。注意，在使用RECORD資料型別的變數時要用“.”運算子指定記錄變數名限定詞。

    一個記錄型別的變數只能儲存從資料庫中查詢出的一行記錄，如果查詢出了多行記錄，就會出現錯誤。

1. DECLARE
2. TYPE TYPE_ORG_RECORD IS RECORD(
3. V_ORG_NAME SF_ORG.ORG_NAME% TYPE,
4. V_PARENT_ID SF_ORG.PARENT_ID% TYPE);
5. V_ORG_RECORD TYPE_ORG_RECORD;
6. BEGIN
7. SELECT ORG_NAME,PARENT_ID INTO V_ORG_RECORD
8. FROM SF_ORG SO
9. WHERE SO.ORG_ID=&ORG_ID;
10. DBMS_OUTPUT.PUT_LINE('部門名稱：' || V_ORG_RECORD.V_ORG_NAME);
11. DBMS_OUTPUT.PUT_LINE('上級部門編碼：' || TO_CHAR(V_ORG_RECORD.V_PARENT_ID));
12. END;

2.3       VARRAY的使用舉例

先定義一個能儲存5個VARCHAR2(25)資料型別的成員的VARRAY資料型別ORG_VARRAY_TYPE，然後宣告一個該資料型別的VARRAY變數V_ORG_VARRAY，最後用與ORG_VARRAY_TYPE資料型別同名的建構函式語法給V_ORG_VARRAY變數賦予初值並顯示賦值結果。

注意，在引用陣列中的成員時．需要在一對括號中使用順序下標，下標從1開始而不是從0開始。

1. DECLARE
2. TYPE ORG_VARRAY_TYPE IS VARRAY( 5) OF VARCHAR2( 25);
3. V_ORG_VARRAY ORG_VARRAY_TYPE;
4. BEGIN
5. V_ORG_VARRAY := ORG_VARRAY_TYPE( '1', '2', '3', '4', '5');
6. DBMS_OUTPUT.PUT_LINE('輸出1：' || V_ORG_VARRAY(1) || '、'|| V_ORG_VARRAY(2) || '、'|| V_ORG_VARRAY(3) || '、'|| V_ORG_VARRAY(4));
7. DBMS_OUTPUT.PUT_LINE('輸出2：' || V_ORG_VARRAY(5));
8. V_ORG_VARRAY(5) := '5001';
9. DBMS_OUTPUT.PUT_LINE('輸出3：' || V_ORG_VARRAY(5));
10. END;

2.4       TABLE使用舉例

2.4.1      儲存單列多行

這個和VARRAY類似。但是賦值方式稍微有點不同，不能使用同名的建構函式進行賦值。具體的如下：

1. DECLARE
2. TYPE ORG_TABLE_TYPE IS TABLE OF VARCHAR2( 25)
3. INDEX BY BINARY_INTEGER;
4. V_ORG_TABLE ORG_TABLE_TYPE;
5. BEGIN
6. V_ORG_TABLE( 1) := '1';
7. V_ORG_TABLE(2) := '2';
8. V_ORG_TABLE(3) := '3';
9. V_ORG_TABLE(4) := '4';
10. V_ORG_TABLE(5) := '5';
11. DBMS_OUTPUT.PUT_LINE('輸出1：' || V_ORG_TABLE(1) || '、'|| V_ORG_TABLE(2) || '、'|| V_ORG_TABLE(3) || '、'|| V_ORG_TABLE(4));
12. DBMS_OUTPUT.PUT_LINE('輸出2：' || V_ORG_TABLE(5));
13. END;

2.4.2      儲存多列多行和ROWTYPE結合使用

採用bulkcollect可以將查詢結果一次性地載入到collections中。而不是通過cursor一條一條地處理。

1. DECLARE
2. TYPE T_TYPE IS TABLE OF SF_ORG%ROWTYPE;
3. V_TYPE T_TYPE;
4. BEGIN
5. SELECT ORG_ID,ORG_NAME,PARENT_ID BULK COLLECT INTO V_TYPE
6. FROM SF_ORG
7. WHERE SF_ORG.ORG_ID <= 3;
9. FOR V_INDEX IN V_TYPE.FIRST .. V_TYPE.LAST LOOP
10. DBMS_OUTPUT.PUT_LINE(V_TYPE(V_INDEX).C1 || ' ' || V_TYPE(V_INDEX).C2);
11. END LOOP;
12. END;

2.4.3      儲存多列多行和RECORD結合使用

採用bulkcollect可以將查詢結果一次性地載入到collections中。而不是通過cursor一條一條地處理。

1. DECLARE
2. TYPE TEST_EMP IS RECORD
3. (
4. C1 SF_ORG.ORG_NAME% TYPE,
5. C2 SF_ORG.PARENT_ID% TYPE
6. );
7. TYPE T_TYPE IS TABLE OF TEST_EMP;
8. V_TYPE T_TYPE;
9. BEGIN
10. SELECT ORG_NAME, PARENT_ID BULK COLLECT INTO V_TYPE
11. FROM SF_ORG
12. WHERE SF_ORG.ORG_ID <= 3;
14. FOR V_INDEX IN V_TYPE.FIRST .. V_TYPE.LAST LOOP
15. DBMS_OUTPUT.PUT_LINE(V_TYPE(V_INDEX).C1 || ' ' || V_TYPE(V_INDEX).C2);
16. END LOOP;
17. END;

3     問題

VARRAY和TABLE集合不能直接對其進行查詢。只能對其進行遍歷