declare
创新互联建站是专业的同安网站建设公司，同安接单;提供成都做网站、成都网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行同安网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
--定义IntArray 类型，该类型是每个元素为int类型的数组
Type IntArray is table of int;
--定义一个IntArray 类型的变量
v_array IntArray := IntArray();
begin
--向数组中存入数据
for i in 1.. 100 loop
--需要扩展数组
v_array.extend;
v_array(i) := i;
end loop;
--输出数组的内容
for i in 1.. 100 loop
dbms_output.put_line(v_array(i));
end loop;
end;
SQL set serverout on;
SQL declare
2 --定义IntArray 类型，该类型是每个元素为int类型的数组
3 Type IntArray is table of int;
4 --定义一个IntArray 类型的变量
5 v_array IntArray := IntArray();
6 begin
7 --向数组中存入数据
8 for i in 1.. 100 loop
9 --需要扩展数组
10 v_array.extend;
11 v_array(i) := i;
12 end loop;
13
14 --输出数组的内容
15 for i in 1.. 100 loop
16 dbms_output.put_line(v_array(i));
17 end loop;
18 end;
19 /
1
2
3
4
5
6
7
8
9
10
此处省略90行
PL/SQL procedure successfully completed
SQL
在PL/SQL中是没有数组(Array)概念的,但是如果程序员想用Array的话,可以用TYPE和 Table of Record变通一下,来代替多维数组.
TYPE MTBL IS TABLE OF NVARCHAR2(256) INDEX BY BINARY_INTEGER;
这就是定义了一个下标为整数的字符串类型配列的类型。使用的时候
TBL MTBL；TBL就是配列对象。
TYPE MMTBL IS TABLE OF NVARCHAR2(256) INDEX BY BINARY_INTEGER;
TYPE MTBL IS TABLE OF MMTBL IS INDEX BY BINARY_INTEGER;
这种一层套一层的，就类似java里的二维数组。同理往下推。
除了构造函数外,集合还有很多内建函数，这些函数称为方法。
调用方法的语法如下：
collection.method
下表中列出oracle中集合的方法
方法 描述 使用限制
COUNT 返回集合中元素的个数
DELETE 删除集合中所有元素
DELETE() 删除元素下标为x的元素，如果x为null,则集合保持不变
对VARRAY非法
DELETE(,) 删除元素下标从X到Y的元素，如果XY集合保持不变
对VARRAY非法
EXIST() 如果集合元素x已经初始化，则返回TRUE, 否则返回FALSE
EXTEND 在集合末尾添加一个元素
对Index_by非法
EXTEND() 在集合末尾添加x个元素
对Index_by非法
EXTEND(,) 在集合末尾添加元素n的x个副本
对Index_by非法
FIRST 返回集合中的第一个元素的下标号，对于VARRAY集合始终返回1。
LAST 返回集合中最后一个元素的下标号, 对于VARRAY返回值始终等于COUNT.
LIMIT 返回VARRY集合的最大的元素个数，对于嵌套表和对于嵌套表和Index_by为null Index_by集合无用
NEXT() 返回在元素x之后及紧挨着它的元素的值，如果该元素是最后一个元素，则返回null.
PRIOR() 返回集合中在元素x之前紧挨着它的元素的值，如果该元素是第一个元素，则返回null。
TRI M 从集合末端开始删除一个元素
对于index_by不合法
TRIM() 从集合末端开始删除x个元素
对index_by不合法
使用实例：
Set serveroutput on
Declare
type my_text_table_type is table of
varchar2(200)
index by binary_integer;
l_text_table
my_text_table_type;
l_index number;
begin
for emp_rec in (select *
from emp) loop
l_text_table(emp_rec.empno):=emp_rec.ename;
end
loop;
l_index:= l_text_table.first;--使用first方法
loop
exit
when l_index is null;
dbms_output.put_line(l_index ||’:’||
l_text_table(l_index));
l_index :=l_text_table.next(l_index);
end loop;
end;
实例：
CREATE OR REPLACE PROCEDURE sample
is
TYPE
R_REC IS RECORD(INT NUMBER(6,2), CHR VARCHAR2(100));
TYPE T_REC IS
TABLE OF R_REC INDEX BY BINARY_INTEGER;
A_ZEI T_REC;
IX
NUMBER(10);
BEGIN
FOR IX IN 1..1000 LOOP
A_ZEI(IX).INT :=
IX;
A_ZEI(IX).CHR := TO_CHAR(A_ZEI(IX).INT,'9,999,999.99');
END
LOOP;
END;
或
CREATE OR REPLACE PROCEDURE P_EMP
IS
TYPE T_EMP
IS TABLE OF EMP%ROWTYPE INDEX BY BINARY_INTEGER;
A_EMP T_EMP;
I
BINARY_INTEGER := 0;
BEGIN
FOR REC IN (SELECT EMPNO,ENAME FROM EMP)
LOOP
I := I + 1;
A_EMP(I).EMPNO := REC.EMPNO;
A_EMP(I).ENAME := REC.ENAME;
END LOOP;
FOR K IN 1..I LOOP
DBMS_OUTPUT.PUT_LINE( A_EMP(K).EMPNO || ' ' || A_EMP(K).ENAME);
END
LOOP;
END;
集合：是具有相同定义的元素的聚合。Oracle有两种类型的集合：
可变长数组（VARRAY）：可以有任意数量的元素，但必须预先定义限制值。
嵌套表：视为表中之表，可以有任意数量的元素，不需要预先定义限制值。
在PL/SQL中是没有数组(Array)概念的。但是如果程序员想用Array的话，就得变通一下，用TYPE 和Table of
Record来代替多维数组，一样挺好用的。
emp_type 就好象一个table 中的一条record 一样，里面有id, name,gender等。emp_type_array 象个table,
里面含有一条条这样的record (emp_type)，就象多维数组一样。
--单维数组
DECLARE
TYPE emp_ssn_array IS TABLE OF NUMBER
INDEX BY
BINARY_INTEGER;
best_employees emp_ssn_array;
worst_employees
emp_ssn_array;
BEGIN
best_employees(1) := '123456';
best_employees(2)
:= '888888';
worst_employees(1) := '222222';
worst_employees(2) :=
'666666';
FOR i IN 1..best_employees.count
LOOP
DBMS_OUTPUT.PUT_LINE('i='|| i || ', best_employees= '
||best_employees(i)
|| ', worst_employees= ' ||worst_employees(i));
END
LOOP;
END;
--多维数组
DECLARE
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
);
TYPE emp_type_array IS TABLE OF emp_type INDEX BY
BINARY_INTEGER;
emp_rec_array emp_type_array;
emp_rec
emp_type;
BEGIN
emp_rec.emp_id := 300000000;
emp_rec.emp_name :=
'Barbara';
emp_rec.emp_gender := 'Female';
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;
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;
END;
-------------- Result
--------------
i=1, emp_id =300000000, emp_name =Barbara, emp_gender =
Female
i=2, emp_id =300000008, emp_name =Rick, emp_gender = Male
用下面语句声明数组类型
type intarray is varry(30) of integer;
用下面语句声明一个数组变量
declare
A intarray;用下面语句声明数组类型
type intarray is varry(30) of integer;
用下面语句声明一个数组变量
declare
A intarray;用下面语句声明数组类型
type intarray is varry(30) of integer;
用下面语句声明一个数组变量
declare
A intarray;
oracle这么强大的数据库能使用数组的
在oracle中，数组主要是用来存储批量数据，一次性的对数据库进行插入，更新，删除操作。
下面给你一个批量插入的例子，其他都类似的
这是我的blog上面有例子，你自己看看吧。
首先你需要定义一个数组类型，然后定义这个数组变量
declare
type a_type is table of number;
-- type a_type is array(10) of number;
-- 下面一种定义方式则指定了该数组的最大元素个数
a a_type := a_type(); -- 定义并初始化一个数组变量
begin
a.extend(3); -- 数组扩展到3个元素
a(1) := 1;
a(2) := 10;
a(3) := 100;
end;
另外数组还有一下方法和属性
first -- 第一个元素下标
last -- 最后一个元素下标
count -- 数组元素个数
prior(n) -- 下标 n 的前一个元素下标
next(n) -- 下标 n 后一个元素下标
extend(n) -- 添加 n 个数组元素，不带参数添加一个数组元素
delete(n) -- 删除数组中下标为 n 的元素，不带参数删除整个数组元素
