在ORACLE存储过程中使用数组 .

最新推荐文章于 2023-09-05 08:41:29 发布

heqiyu34

最新推荐文章于 2023-09-05 08:41:29 发布

阅读量2.4k

点赞数

分类专栏： Oracle 文章标签： oracle 存储 integer table exception 测试

Oracle 专栏收录该内容

161 篇文章

订阅专栏

本文详细介绍了在PL/SQL中如何通过TYPE和TableofRecord实现数组操作，包括单维数组和多维数组的定义及使用方法，并通过示例展示了具体应用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

在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; --创建一个NUMBER类型的，以数值【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;
用下面语句声明数组类型
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 存储过程返回数组的方法：

　　1.建立包

　　create or replace package test is
　　TYPE filename_array IS TABLE OF varchar2(1);
　　filename filename_array;
　　end test;

　　2. 建立存储过程

　　create or replace procedure test_array(v_cfjg out test.filename_array ) is
　　begin DECLARE i number;
　　D_cfjg dic_cfjg%rowTYPE;
　　-- D_nr dic_cfjg%rowTYPE;
　　cursor c1 is SELECT * FROM dic_cfjg;
　　BEGIN
　　i:=0;
　　v_cfjg := test.filename_array(); --数组初始化
　　open c1;
　　LOOP fetch c1 into D_cfjg;
　　EXIT WHEN c1%NOTFOUND ;
　　i:=i+1;
　　v_cfjg.EXTEND;
　　-- DBMS_OUTPUT.PUT_LINE(TO_CHAR(D_cfjg.dm));
　　v_cfjg(v_cfjg.count):=D_cfjg.dm;
　　DBMS_OUTPUT.PUT_LINE(v_cfjg(v_cfjg.count));
　　-- 测试
　　-- FETCH C1 INTO D_cfjg;
　　-- EXIT WHEN c1%NOTFOUND ;
　　END LOOP;
　　end;
　　EXCEPTION
　　WHEN TOO_MANY_ROWS THEN
　　DBMS_OUTPUT.PUT_LINE('TOO_MANY_ROWS');
　　WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE(sqlerrm);
　　end test_array;

来源： http://blog.youkuaiyun.com/dxcboy/article/details/5652403