Oracle 字符串分割 Split

 废话不多说直接上代码

 一、创建数组类型

 

CREATE OR REPLACE TYPE T_RET_TABLE IS TABLE OF VARCHAR2(512)

 二、创建字符串分割函数

 

CREATE OR REPLACE FUNCTION F_SPLIT_STRING(AS_STR   VARCHAR2,
                                          AS_SPLIT VARCHAR2)
  RETURN T_RET_TABLE IS
  -- Author  : Guomm
  -- Created : 2013/5/22 13:38:46
  -- Purpose : 字符串分割

  -- Params
  -- AS_STR : 要处理的字符串
  -- AS_SPLIT ：字符串分割符

  V_OUT     T_RET_TABLE;
  V_TMP     VARCHAR2(4000);
  V_ELEMENT VARCHAR2(4000);
BEGIN
  V_TMP := AS_STR;
  V_OUT := T_RET_TABLE();
  --如果存在匹配的分割符
  WHILE INSTR(V_TMP, AS_SPLIT) > 0 LOOP
    V_ELEMENT := SUBSTR(V_TMP, 1, INSTR(V_TMP, AS_SPLIT) - 1);
    V_TMP     := SUBSTR(V_TMP,
                        INSTR(V_TMP, AS_SPLIT) + LENGTH(AS_SPLIT),
                        LENGTH(V_TMP));
    V_OUT.EXTEND(1);
    V_OUT(V_OUT.COUNT) := V_ELEMENT;
  END LOOP;
  IF V_TMP IS NOT NULL THEN
    V_OUT.EXTEND(1);
    V_OUT(V_OUT.COUNT) := V_TMP;
  END IF;
  RETURN V_OUT;
END F_SPLIT_STRING;

    OK,到此功能已经实现，

 三、调用

 

SELECT * FROM TABLE(F_SPLIT_STRING('1,2,3,4,5,6',','))

DECLARE
  V_ARRAY T_RET_TABLE;
BEGIN
  V_ARRAY := F_SPLIT_STRING('1,2,3,4,5,6',',');
  FOR I IN 1..V_ARRAY.COUNT LOOP
     DBMS_OUTPUT.PUT_LINE(V_ARRAY(i));
  END LOOP;
END;