Oracle 自定义字符串转换数组函数

对于VB，Java、.Net或Js等等语言将字符串转换成数组非常方便，它们都提供了标准的转换函数，然而Oracle 官方没有提供类似的标准函数。但是，我们可以自己定一个类似的函数。

1.自定义类型：

Create Type CuxStrToArray Is Table Of Varchar2(2000);

2.自定义函数:

/*
Str1   被转换成数组的字符串
StrSplit 分隔符
*/
Create Function StrToArray(Str1 Varchar2, StrSplit Varchar2)
  Return CuxStrToArray Is
  l_Array CuxStrToArray;
Begin
  WITH A AS(
      SELECT Str1 A FROM DUAL)
      SELECT DECODE(B, 0, SUBSTR(A, C), SUBSTR(A, C, B - C)) bulk collect
        into l_Array
        FROM (SELECT A, B, (LAG(B, 1, 0) OVER(ORDER BY LV)) + 1 C
                FROM (SELECT A, INSTR(A, StrSplit, 1, LEVEL) B, LEVEL LV
                        FROM A
                      CONNECT BY LEVEL <=
                                 (LENGTH(A) - LENGTH(REPLACE(A, StrSplit, ''))) + 1));
  Return l_Array;                                
End StrToArray;

3.测试如下:

Declare
  l_Array CuxStrToArray;
  Str1 Varchar2(2000):='2010015447,WK7280MD,WX0057';
  StrSplit Varchar2(1):=',';
Begin
  l_Array := StrToArray(Str1,StrSplit);
  For i In 1..l_Array.Count Loop
    dbms_output.put_line('l_Array('||i||')='|| l_Array(i));
  End Loop;
End;

运行输出结果如下:

l_Array(1)=2010015447
l_Array(2)=WK7280MD
l_Array(3)=WX0057