| Oracle存储过程中去掉重复字符串函数 |
|
| |
|
|
以下函数是本人在编写Oracle数据库存储过程时写的函数,觉得该函数通用性较强,因此发表出来供需要的人参考。 这个函数的功能主要是用于去除给定字符串中重复的字符串.在使用中需要指定字符串的分隔符.示例: str := MyReplace('13,14,13,444', ','); 输出: 13,14,444
create or replace function MyReplace(oldStr varchar2,
sign varchar2) return varchar2 is
str varchar2(1000);
currentIndex number;
startIndex number;
endIndex number;
type str_type is table of varchar2(30)
index by binary_integer;
arr str_type;
Result varchar2(1000);
begin
if oldStr is null then
return ('');
end if;
str := oldStr;
currentIndex := 0;
startIndex := 0;
loop
currentIndex := currentIndex + 1;
endIndex := instr(str, sign, 1, currentIndex);
if (endIndex <= 0) then
exit;
end if;
arr(currentIndex) := trim(substr(str, startIndex + 1,
endIndex - startIndex - 1));
startIndex := endIndex;
end loop; 取最后一个字符串: arr(currentIndex) := substr(str, startIndex + 1, length(str)); 去掉重复出现的字符串: for i in 1.. currentIndex - 1 loop
for j in i + 1..currentIndex loop
if arr(i) = arr(j) then
arr(j) := '';
end if;
end loop;
end loop;
str := '';
for i in 1..currentIndex loop
if arr(i) is not null then
str := str || sign || arr(i); 数组置空: arr(i) := '';
end if;
end loop; 去掉前面的标识符: Result := substr(str, 2, length(str));
return(Result);
end MyReplace; Linux联盟收集整理
 |
频道声明：本频道的文章除部分特别声明禁止转载的专稿外，可以自由转载.但请务必注明出出处和原始作者 文章版权归本频道与文章作者所有.对于被频道转载文章的个人和网站,我们表示深深的谢意。
| 原始作者:佚名 |
录入时间:2007-1-3 3:34:10 |
| 信息来源:不详 |
投稿信箱:itqoo@126.com |
|
|
 |
|
|
|
| 教程录入：itqoo 责任编辑：itqoo |
|
上一个教程： Oracle与SQL Server之间的数据迁移
下一个教程： 使用Oracle9i全索引扫描快速访问数据 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！） 