oracle存储过程字符串数组
❶ 关于oracle 存储过程 如何切割一个字符串 转化为字符数组，然后遍历该数组： 类似ab，12；cd，55；k，7
给你写了个包，包体代码如下：
CREATE OR REPLACE PACKAGE BODY Pkg_Bai IS
-- 自定义个数组类型
TYPE Typ_Str_Array IS TABLE OF VARCHAR2(200) INDEX BY BINARY_INTEGER;
PROCEDURE Prc_String_To_Array(Pv_i_String IN VARCHAR2,
Pv_i_Identifier IN VARCHAR2,
Pt_o_Array OUT Typ_Str_Array) IS
Lv_Tmpstr VARCHAR2(200);
Lv_Changed_String VARCHAR2(4000);
BEGIN
-- 初始化
Lv_Changed_String := Pv_i_String;
-- 拆分逻辑
-- 1.字符串中没有标识符
IF Instr(Pv_i_String, Pv_i_Identifier, 1, 1) = 0 THEN
Pt_o_Array(Pt_o_Array.Count + 1) := Pv_i_String;
ELSE
-- 2.字符串中有标识符
WHILE Instr(Lv_Changed_String, Pv_i_Identifier, 1, 1) > 0 LOOP
Lv_Tmpstr := Substr(Lv_Changed_String,
1,
Instr(Lv_Changed_String, Pv_i_Identifier, 1, 1) - 1);
Pt_o_Array(Pt_o_Array.Count + 1) := Lv_Tmpstr;
Lv_Changed_String := Substr(Lv_Changed_String,
Instr(Lv_Changed_String, Pv_i_Identifier, 1, 1) + 1,
Length(Lv_Changed_String));
END LOOP;
-- 3.最有一个被拆分出来的字符串中不含标识符
IF NOT Lv_Changed_String IS NULL THEN
-- 将最后一个保存
Pt_o_Array(Pt_o_Array.Count + 1) := Lv_Changed_String;
END IF;
END IF;
EXCEPTION
WHEN OTHERS THEN
NULL;
END;
PROCEDURE Prc_Test(Pv_i_Str IN VARCHAR2) IS
--定义数组
Lt_Array Typ_Str_Array;
Ln_Count NUMBER; -- 数组元素个数
Ln_Num NUMBER;
Lv_Value VARCHAR2(30);
BEGIN
Prc_String_To_Array(Pv_i_Str, ';', Lt_Array);
-- 循环数组
FOR i IN 1 .. Lt_Array.Count LOOP
-- 获取每个元素中数值
Ln_Num := To_Number(TRIM(Substr(Lt_Array(i), Instr(Lt_Array(i), ',', -1) + 1)));
IF Ln_Num > 20 THEN
Lv_Value := TRIM(Substr(Lt_Array(i), 1, Instr(Lt_Array(i), ',', -1) - 1));
INSERT INTO a (col_a) VALUES (lv_value);
END IF;
END LOOP;
END;
END Pkg_Bai;
调用Prc_Test来分隔字符串并按要求比较后插入a表。我测试过，没有问题。
需要注意的是，数据的要求：字符串中每组数据间使用英文小写分号分隔，同一组数据字母在前，数字在后，以英文小写逗号分隔。测试一下吧。
欢迎采纳，不采纳你都对不起我这20分钟。呵呵......
❷ oracle存储过程中如何使用数组
首先你需要定义一个数组类型，然后定义这个数组变量
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 的元素，不带参数删除整个数组元素
❸ oracle 存储过程，如何传入一个数组
这个是不行的，数组内容必须首先在存储过程里定义好数组类型，然后给予定义好的数据类型定义数组型变量。存储过程的入参是做不到的。一般情况下，采用字符串的方式，并给每项用特定的分隔符的方式传入，然后在存储过程中按照分隔符解析出每一项，插到存储过程的定义的数组的每一项上去。
❹ Oracle中怎么实现类似数组的功能，比如存储过程我传入一个长字符串，按照固定格式拆分成多个
给你个存储过程
CREATE PROCEDURE p_split
@c varchar(8000),
@split varchar(5)
as
declare @t table( word varchar(20) )
begin
while(charindex(@split,@c)<>0)
begin
insert @t( word) values (substring(@c,1,charindex(@split,@c)-1))
set @c = stuff(@c,1,charindex(@split,@c),'') -- 删除指定长度的字符并在指定的起始点插入另一组字符
end
insert @t(word) values (@c) ---最后一个不含分隔的加进来
select distinct * from @t
end
GO
还是用表变量
❺ oracle存储过程 遍历字符串
不用循环不行么，一个sql就搞定啦
selectcfrom
(withtestas(select'21,32,43'cfromal)
selectsubstr(t.ca,instr(t.ca,',',1,c.lv)+1,instr(t.ca,',',1,c.lv+1)-(instr(t.ca,',',1,c.lv)+1))ASc
from(select','||c||','ASca,length(c||',')-nvl(length(REPLACE(c,',')),0)AScntFROMtest)t,
(<=100)cwherec.lv<=t.cnt)
'21,32,43' --这个你换成你要查的字符串，数字字母什么都可以，只要逗号分隔就好
❻ oracle存储过程怎么将变量扔进数组
先自定义集合类型变量类型，然后定义对应的变量，直接把集合类型穿给存储过程就可以了，不用在存储过程中搞，应用程序中搞好传过去就可以了，我都是这样搞的