如何在ORACLE中定义一个数组

Posted 2023-04-12

参考技术A 集合：是具有相同定义的元素的聚合。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

oracle 包中定义全局变量

我有个问题就是如何在包中存储全局变量然后得出它的值,我的需求是这样的就是以下函数中在条件type=1的条件下得出多个quantity，如何累加这些quantity得到他们的总和？还有就是包中还有个存储过程，存储过程调用这个函数。请大家帮忙想下
假设包中有一个函数
function fun_test(para number,type number)return varchar2
is
quantity
begin
if type = 1
then
selete sum(1) into quantity from table
where 条件;
return quantity
end if;
end;
可能我描述的不是很清楚，3楼的朋友没有理解我的意图，要是简单的V1:=V2就好了。是这样的在if type = 1
条件里边要进来几次的，所以得出的quantity是几个数值，我要把这几个数值累加起来 .请问2楼的朋友游标怎么个累加呢？譬如：cursor cur_fac is select 字段 from table ,然后呢？

这得用游标了，每次得出来后相加就行了，或者你说的是||，自己找下关于游标的例子吧 .
function fun_test(para number,type number)return varchar2
is
--客户名称游标
cursor cur_fac is select 字段 from table where xx;
quantity
temp1
temp2

begin

--打开客户名称游标，逐一对每个客户进行数据统计
open cur_fac
loop
fetch cur_fac into temp1;
exit when cur_fac r%NOTFOUND;

selete xx into temp2 from table
where temp1=xx;
quantity := quantity + temp2;

end loop;
close cust_name_cursor;

return quantity ;
exception
null;

end 参考技术A --package
create or replace package p_name as
function f_name(v1 in out number) return number;
procedure p_name(v1 in out number);
end p_name;
--package body
create or replace package body p_name is
function f_name(v1 in out number) return number is
v2 number;
begin
return v2;
end;
--function
create or replace function f_name(v1 in out number) return number is
v2 number;
begin
v2 := v1; return v2;
end;
几种写法都给你 你自己参考了写吧。。。 参考技术B function fun_test(para number,type number)return varchar2
is
quantity number(15,2):=0;
temp number(15,2):=0;
begin
if type = 1
then
selete sum(1) into temp from table
where 条件;
quantity:=quantity+temp;
dbms_output.put_line(temp);
return quantity
end if;

end;