未加星标

Oracle 自定义split 函数实例详解

字体大小 | |
[数据库(综合) 所属分类 数据库(综合) | 发布者 店小二05 | 时间 | 作者 红领巾 ] 0人收藏点击收藏

Oracle 自定义split 函数

Oracle没有提供split函数,但可以自己建立一个函数实现此功能。比如“abc defg  hijkl   nmopqr     stuvw  xyz”,分隔符是空格,但空格个数不定。

源代码:

CREATE OR REPLACE TYPE ty_str_split IS TABLE OF VARCHAR2 (4000);
CREATE OR REPLACE FUNCTION fn_var_split (
p_str IN VARCHAR2,
p_delimiter IN VARCHAR2
)
RETURN ty_str_split
IS
j INT := 0;
len INT := 0;
str VARCHAR2 (4000);
str_split ty_str_split := ty_str_split ();
v_str VARCHAR2 (4000) := RTRIM (LTRIM (p_str, p_delimiter), p_delimiter);
BEGIN
len := LENGTH (v_str);
WHILE len > 0
LOOP
j := INSTR (v_str, p_delimiter, 1);
IF j = 0
THEN
str := SUBSTR (v_str, 1);
len := 0;
str_split.EXTEND;
str_split (str_split.COUNT) := str;
ELSE
str := SUBSTR (v_str, 1, j - 1);
v_str := LTRIM (LTRIM (v_str, str), p_delimiter);
len := LENGTH (v_str);
str_split.EXTEND;
str_split (str_split.COUNT) := str;
END IF;
END LOOP;
RETURN str_split;
END fn_var_split;
/
测试:
结果:
1
12
123
1234
12345

DECLARE
CURSOR c
IS
SELECT * FROM TABLE (CAST (fn_var_split (';1;12;;123;;;1234;;;;12345;', ';') AS ty_str_split));
r c%ROWTYPE;
BEGIN
OPEN c;
LOOP
FETCH c INTO r;
EXIT WHEN c%NOTFOUND;
DBMS_OUTPUT.put_line (r.column_value);
END LOOP;
CLOSE c;
END;
/

感谢阅读,希望能帮助到大家,谢谢大家对本站的支持!

本文数据库(综合)相关术语:系统安全软件

主题: RIMUBUTSU谢大CUFUTICTI
分页:12
转载请注明
本文标题:Oracle 自定义split 函数实例详解
本站链接:http://www.codesec.net/view/523562.html
分享请点击:


1.凡CodeSecTeam转载的文章,均出自其它媒体或其他官网介绍,目的在于传递更多的信息,并不代表本站赞同其观点和其真实性负责;
2.转载的文章仅代表原创作者观点,与本站无关。其原创性以及文中陈述文字和内容未经本站证实,本站对该文以及其中全部或者部分内容、文字的真实性、完整性、及时性,不作出任何保证或承若;
3.如本站转载稿涉及版权等问题,请作者及时联系本站,我们会及时处理。
登录后可拥有收藏文章、关注作者等权限...
技术大类 技术大类 | 数据库(综合) | 评论(0) | 阅读(18)