字符串拆分函数 func_splitstr

create type str_split is table of varchar2(4000) ;
 1 CREATE OR REPLACE FUNCTION splitstr(p_string IN VARCHAR2, p_delimiter IN VARCHAR2)
    /**********************************************************************
     * xdshi add blockment 2015-09-21
     * 通用方法：按列返回分割字符串后的内容
     * 入参：p_string 分割字符串
     *       p_delimiter 分割符
     * 返回：每个分割出来的字符串
     **********************************************************************/
     RETURN str_split
     PIPELINED
 AS
     v_length   NUMBER := LENGTH(p_string);
     v_start    NUMBER := 1;
     v_index    NUMBER;
 BEGIN
     WHILE(v_start <= v_length)
     LOOP
         v_index := INSTR(p_string, p_delimiter, v_start);

         IF v_index = 0
         THEN
             PIPE ROW(SUBSTR(p_string, v_start));
             v_start := v_length + 1;
         ELSE
             PIPE ROW(SUBSTR(p_string, v_start, v_index - v_start));
             v_start := v_index + 1;
         END IF;
     END LOOP;

     RETURN;
 END splitstr;