Question

sql字符串怎么按逗号分割

Answer 1

[sql]
view
plaincopyprint?
create
or
replace
function
f_intellect_first_sales_prov(var_sales
in
varchar2,
var_first_sales
in
varchar2,
var_split
in
varchar2)
return
varchar2
is
result
varchar2(1);
/****************************************************
**
[sql]
view
plaincopyprint?
**
all
rights
reserved.
**
**
函数名称：f_intellect_first_sales_province
**
参
数：【名称】
【类型
】
【说明】
**
var_sales
varchar2
字符串1，逗号分隔的，如'aaa,bbb'
var_first_sales
varchar2
字符串2，逗号分割的，如'cc,aaa'
**
var_split
varchar2
要使用的分隔符
**
返
回
值：result
varchar2
处理后返回的值1/0
**
摘
要：如果字符串2中的某一个分割的字符串在字符串1中就返回1，否则返回0
**
**
当前版本：1.0
**
**
作
者：liuzhih
**
完成日期：2013年1月29日
**
备
注：
****************************************************/
var_element
varchar2(4000);
var_element2
varchar2(4000);
var_tmp
varchar2(4000);
var_tmp2
varchar2(4000);
begin
result
:=
'0';
var_tmp
:=
var_sales;
var_tmp2
:=
var_first_sales;
if
var_tmp2
is
null
or
var_tmp2
=''
then
return(result);
elsif
var_tmp
is
null
or
var_tmp
=''
then
return(result);
else
/*如果字符串1不为空，在后面加上一个特殊的字符,
这样循环时就可以直接在循环内部处理，不然需要在最外面循环出再一次处理var_tmp,因为最后一次var_tmp中不含有分隔符，不会进行loop循环*/
var_tmp
:=
var_tmp
||
var_split
||
'-1';
end
if;
while
instr(var_tmp,
var_split)
>
0
loop
/****循环字符串1，每次获得一个var_element****/
var_element
:=
substr(var_tmp,
1,
instr(var_tmp,
var_split)
-
1);
var_tmp
:=
substr(var_tmp,
instr(var_tmp,
var_split)
+
length(var_split),
length(var_tmp));
while
instr(var_tmp2,
var_split)
>
0
loop
/****循环字符串2，每次获得一个var_element2****/
var_element2
:=
substr(var_tmp2,
1,
instr(var_tmp2,
var_split)
-
1);
var_tmp2
:=
substr(var_tmp2,
instr(var_tmp2,
var_split)
+
length(var_split),
length(var_tmp2));
/*如果字符串1中有字符串2中的一个值，返回1*/
if
var_element
=
var_element2
then
result
:=
'1';
return(result);
end
if;
end
loop;
/*最后一个截取的var_tmp2
不会进入循环
所以在此处处理
如果字符串1中含有字符串2的一个值，返回1*/
if
var_element
=
var_tmp2
then
result
:=
'1';
return(result);
end
if;
end
loop;
return(result);
end
f_intellect_first_sales_prov;