oracle数据库split()方法的实现与测试

最新推荐文章于 2024-12-19 10:07:19 发布

MOVING

最新推荐文章于 2024-12-19 10:07:19 发布

阅读量113

点赞数

CC 4.0 BY-SA版权

分类专栏： oracle 文章标签： Oracle C C++ C# J#

本文链接：https://blog.youkuaiyun.com/hck341204/article/details/83809580

oracle 专栏收录该内容

66 篇文章

订阅专栏

本文介绍了一种在Oracle数据库中创建自定义类型和函数的方法，用于将字符串按指定分隔符进行拆分，并通过示例展示了如何使用这些自定义组件来处理实际的数据拆分任务。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

CREATE OR REPLACE TYPE ty_str_split IS TABLE OF VARCHAR2 (4000);  

CREATE OR REPLACE FUNCTION fn_split (p_str IN VARCHAR2, p_delimiter IN VARCHAR2)  
  RETURN ty_str_split  
IS  
  j INT := 0;  
  i INT := 1;  
  len INT := 0;  
  len1 INT := 0;  
  str VARCHAR2 (4000);  
  str_split ty_str_split := ty_str_split ();  
BEGIN  
  len := LENGTH (p_str);  
  len1 := LENGTH (p_delimiter);  

  WHILE j < len  
  LOOP  
    j := INSTR (p_str, p_delimiter, i);  

    IF j = 0  
    THEN  
        j := len;  
        str := SUBSTR (p_str, i);  
        str_split.EXTEND;  
        str_split (str_split.COUNT) := str;  

        IF i >= len  
        THEN  
          EXIT;  
        END IF;  
    ELSE  
        str := SUBSTR (p_str, i, j - i);  
        i := j + len1;  
        str_split.EXTEND;  
        str_split (str_split.COUNT) := str;  
    END IF;  
  END LOOP;  

  RETURN str_split;  
END fn_split;  
/  

测试：  

DECLARE  
  CURSOR c  
  IS  
    SELECT *  
      FROM TABLE (CAST (fn_split ('1;;12;;123;;1234;;12345', ';;') AS ty_str_split  
                  )  
              );  

  r c%ROWTYPE;  
BEGIN  
  OPEN c;  

  LOOP  
    FETCH c INTO r;  

    EXIT WHEN c%NOTFOUND;  
    DBMS_OUTPUT.put_line (r.column_value);  
  END LOOP;  

  CLOSE c;  
END;  
/   

结果：  
1  
12  
123  
1234  
12345

下面语句均不行 :
fn_split('4,5,6,78',',') 返回的是 collection

select fn_split('4,5,6,78',',')[0] from dual
select fn_split('4,5,6,78',',').first from dual

SELECT * FROM TABLE (CAST (fn_split('4,5,6,78',',') AS ty_str_split)) where rownum < 2;