在pl/sql中写一个类似Java中的split函数
create or replace type type_split as table of varchar2(50); –创建一个 type ,如果为了使split函数具有通用性,请将其size 设大些。
–创建function
create or replace function split
(
p_list varchar2,
p_sep varchar2 := ‘,’
) return type_split pipelined
is
l_idx pls_integer;
v_list varchar2(50) := p_list;
begin
loop
l_idx := instr(v_list,p_sep);
if l_idx > 0 then
pipe row(substr(v_list,1,l_idx-1));
v_list := substr(v_list,l_idx+length(p_sep));
else
pipe row(v_list);
exit;
end if;
end loop;
return;
end split;
SQL> select * from table(split(‘northsnow,塞北的雪’,’,’));
COLUMN_VALUE
————————————————–
northsnow
塞北的雪
SQL>
—————————————————————————————————————
PL/SQL中定义数组
declare
type tab_numbers is table of number; — 定义数组类型
lt tab_numbers; — 定义一个未初始化的数组
begin
lt := tab_numbers(); — 初始化一个空数组,无任何元素
lt.extend; — 扩展数组,扩展一个元素
lt(1) := 100; — 数组下标从1开始
lt.extend(3); — — 扩展数组,扩展3个元素
lt(2) := 1002;
lt(3) := 1003;
lt(4) := 1004;
— lt(5) := 0; 这里将不允许,因为不存在此下标之元素
for i in 1..lt.count loop — lt.count 取得数组元素个数
dbms_output.put_line(lt(i));
end loop;
end;
/