自定义数组
单维数组
语法:TYPE varray_name IS VARRAY(size) OF element_type [NOT NULL];
type dw_varray is varray(6) of varchar2(20); #定义六个元素的数组,字符类型为varchar2(20),
date_one dw_varray := dwvarray() #初始化数组;括号中可带值;
多维数组
先定义记录类型:(适用于自定义字段的数组)
语法
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 ] );
TYPE emp_type IS RECORD
( emp_id employee_table.emp_id%TYPE,
emp_name employee_table.emp_name%TYPE,
emp_gender employee_table.emp_gender%TYPE ); #以上根据某表字段类型创建3个元素的记录类型,只能存一条记录!
TYPE emp_type_array IS TABLE OF emp_type INDEX BY BINARY_INTEGER; #定义一个新类型为组数,实则将3个元素的记录封装成一个元素,与固定长度数组相比,该类型为不限长数组,可以存不限定个元素。
TYPE emp_type_array IS TABLE OF employee_table%rowtype INDEX BY BINARY_INTEGER; (这样定义无需先定义记录类型了)
具体应用:
emp_rec_array emp_type_array;
emp_rec emp_type;
赋值:
emp_rec.emp_id := 300000000;
emp_rec.emp_name := 'Barbara';
emp_rec.emp_gender := 'Female';#3元素类型的赋值
emp_rec_array(1) := emp_rec;#转变为一维
emp_rec.emp_id := 300000008;
emp_rec.emp_name := 'Rick';
emp_rec.emp_gender := 'Male';
emp_rec_array(2) := emp_rec;
另一种方法赋值:(批量赋值)
select emp_id,.emp_name,emp_gender bulk collect into emp_rec_array from employee_table
遍历多维数组:
FOR i IN 1..emp_rec_array.count LOOP
DBMS_OUTPUT.PUT_LINE('i='||i
||', emp_id ='||emp_rec_array(i).emp_id
||', emp_name ='||emp_rec_array(i).emp_name
||', emp_gender = '||emp_rec_array(i).emp_gender);
END LOOP;
将自定义数组作为参数:
数组的方法:
COUNT 返回集合中元素的个数
DELETE 删除集合中所有元素
DELETE(x) 删除元素下标为x的元素 对VARRAY非法
DELETE(x,y) 删除元素下标从X到Y的元素 对VARRAY非法
EXIST(x) 如果集合元素x已经初始化,则返回TRUE, 否则返回FALSE
EXTEND 在集合末尾添加一个元素 对Index_by非法
EXTEND(x) 在集合末尾添加x个元素 对Index_by非法
EXTEND(x,n) 在集合末尾添加元素n的x个副本 对Index_by非法
FIRST 返回集合中的第一个元素的下标号,对于VARRAY集合始终返回1。
LAST 返回集合中最后一个元素的下标号, 对于VARRAY返回值始终等于COUNT.
LIMIT 返回VARRY集合的最大的元素个数 Index_by集合和嵌套表无用
NEXT(x) 返回在第x个元素之后及紧挨着它的元素值,如果x是最后一个元素,返回null.
PRIOR(x) 返回在第x个元素之前紧挨着它的元素的值,如果x是第一个元素,则返回null。
TRIM 从集合末端开始删除一个元素 对于index_by不合法 RIM(x) 从集合末端开始删除x个元素