定義記錄數據類型。它類似於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]);
數組是具有相同數據類型的一組成員的集合。每個成員都有一個唯一的下標,它取決於成員在數組中的位置。在PL/SQL中,數組數據類型是VARRAY(variable array,即可變數組)。
定義VARRAY數據類型的語法如下:
TYPE VARRAY_NAMEIS VARRAY(SIZE) OF ELEMENT_TYPE [NOT NULL];
其中,varray_name是VARRAY數據類型的名稱,size是正整數,表示可以容納的成員的最大數量,每個成員的數據類型是element_typeo默認時,成員可以取空值,否則需要使用NOT NULL加以限制。
定義記錄表(或索引表)數據類型。它與記錄類型相似,但它是對記錄類型的擴展。它可以處理多行記錄,類似於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。
--組織機構結構表 CREATE TABLE SF_ORG ( ORG_ID INT NOT NULL, --組織機構主鍵ID ORG_NAME VARCHAR2(50),--組織機構名稱 PARENT_ID INT--組織機構的父級 ) --一級組織機構 INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES(1, '一級部門1',0); --二級部門 INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES(2, '二級部門2',1); INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES(3, '二級部門3',1); INSERT INTO SF_ORG(ORG_ID, ORG_NAME, PARENT_ID) VALUES(4, '二級部門4',1);
先定義一個只與SF_ORG表中某幾個列的數據類型相同的記錄數據類型TYPE_ORG_RECORD,然後聲明一個該數據類型的記錄變量V_ORG_RECORD,最後用替換變量&ORG_ID接受輸入的雇員編碼,查詢並顯示該雇員的這幾列中的信息。注意,在使用RECORD數據類型的變量時要用“.”運算符指定記錄變量名限定詞。
一個記錄類型的變量只能保存從數據庫中查詢出的一行記錄,如果查詢出了多行記錄,就會出現錯誤。
DECLARE TYPE TYPE_ORG_RECORD IS RECORD( V_ORG_NAME SF_ORG.ORG_NAME%TYPE, V_PARENT_ID SF_ORG.PARENT_ID%TYPE); V_ORG_RECORD TYPE_ORG_RECORD; BEGIN SELECT ORG_NAME,PARENT_ID INTO V_ORG_RECORD FROM SF_ORG SO WHERE SO.ORG_ID=&ORG_ID; DBMS_OUTPUT.PUT_LINE('部門名稱:' || V_ORG_RECORD.V_ORG_NAME); DBMS_OUTPUT.PUT_LINE('上級部門編碼:' || TO_CHAR(V_ORG_RECORD.V_PARENT_ID)); END;
先定義一個能保存5個VARCHAR2(25)數據類型的成員的VARRAY數據類型ORG_VARRAY_TYPE,然後聲明一個該數據類型的VARRAY變量V_ORG_VARRAY,最後用與ORG_VARRAY_TYPE數據類型同名的構造函數語法給V_ORG_VARRAY變量賦予初值並顯示賦值結果。
注意,在引用數組中的成員時.需要在一對括號中使用順序下標,下標從1開始而不是從0開始。
DECLARE TYPE ORG_VARRAY_TYPE IS VARRAY(5) OF VARCHAR2(25); V_ORG_VARRAY ORG_VARRAY_TYPE; BEGIN V_ORG_VARRAY := ORG_VARRAY_TYPE('1','2','3','4','5'); DBMS_OUTPUT.PUT_LINE('輸出1:' || V_ORG_VARRAY(1) || '、'|| V_ORG_VARRAY(2) || '、'|| V_ORG_VARRAY(3) || '、'|| V_ORG_VARRAY(4)); DBMS_OUTPUT.PUT_LINE('輸出2:' || V_ORG_VARRAY(5)); V_ORG_VARRAY(5) := '5001'; DBMS_OUTPUT.PUT_LINE('輸出3:' || V_ORG_VARRAY(5)); END;
這個和VARRAY類似。但是賦值方式稍微有點不同,不能使用同名的構造函數進行賦值。具體的如下:
DECLARE TYPE ORG_TABLE_TYPE IS TABLE OF VARCHAR2(25) INDEX BY BINARY_INTEGER; V_ORG_TABLE ORG_TABLE_TYPE; BEGIN V_ORG_TABLE(1) := '1'; V_ORG_TABLE(2) := '2'; V_ORG_TABLE(3) := '3'; V_ORG_TABLE(4) := '4'; V_ORG_TABLE(5) := '5'; DBMS_OUTPUT.PUT_LINE('輸出1:' || V_ORG_TABLE(1) || '、'|| V_ORG_TABLE(2) || '、'|| V_ORG_TABLE(3) || '、'|| V_ORG_TABLE(4)); DBMS_OUTPUT.PUT_LINE('輸出2:' || V_ORG_TABLE(5)); END;
采用bulkcollect可以將查詢結果一次性地加載到collections中。而不是通過cursor一條一條地處理。
DECLARE TYPE T_TYPE IS TABLE OF SF_ORG%ROWTYPE; V_TYPE T_TYPE; BEGIN SELECT ORG_ID,ORG_NAME,PARENT_ID BULK COLLECT INTO V_TYPE FROM SF_ORG WHERE SF_ORG.ORG_ID <= 3; FOR V_INDEX IN V_TYPE.FIRST .. V_TYPE.LAST LOOP DBMS_OUTPUT.PUT_LINE(V_TYPE(V_INDEX).C1 || ' ' || V_TYPE(V_INDEX).C2); END LOOP; END;
采用bulkcollect可以將查詢結果一次性地加載到collections中。而不是通過cursor一條一條地處理。
DECLARE TYPE TEST_EMP IS RECORD ( C1 SF_ORG.ORG_NAME%TYPE, C2 SF_ORG.PARENT_ID%TYPE ); TYPE T_TYPE IS TABLE OF TEST_EMP; V_TYPE T_TYPE; BEGIN SELECT ORG_NAME, PARENT_ID BULK COLLECT INTO V_TYPE FROM SF_ORG WHERE SF_ORG.ORG_ID <= 3; FOR V_INDEX IN V_TYPE.FIRST .. V_TYPE.LAST LOOP DBMS_OUTPUT.PUT_LINE(V_TYPE(V_INDEX).C1 || ' ' || V_TYPE(V_INDEX).C2); END LOOP; END;
VARRAY和TABLE集合不能直接對其進行查詢。只能對其進行遍歷。