使用Oracle PL / SQL For循环迭代逗号分隔的字符串

Question

我正在编写一段需要迭代字符串内容的代码，每个值都以,分隔。

e.g。我有elements

v_list_pak_like varchar2(4000) := 'PEBO,PTGC,PTTL,PTOP,PTA';

如何将它放入Array / Cursor中以在循环中迭代它？

for x in (elements)
loop
   -- do my stuff
end loop;

我正在寻找非常简单的方法，如果可能的话，避免声明关联数组。

是否可以创建一个函数，它会返回一些可用作for循环输入的内容（与https://stackoverflow.com/a/19184203/6019417中可以使用的while相反） ）？

非常感谢提前。

Answer 1

您可以在纯 SQL 中轻松完成。有多种方法，请参阅 Split comma delimited string into rows in Oracle

但是，如果你真的想在 PL / SQL 中这样做，那么你可以这样做：

SQL> set serveroutput on
SQL> DECLARE
  2    str VARCHAR2(100) := 'PEBO,PTGC,PTTL,PTOP,PTA';
  3  BEGIN
  4    FOR i IN
  5    (SELECT trim(regexp_substr(str, '[^,]+', 1, LEVEL)) l
  6    FROM dual
  7      CONNECT BY LEVEL <= regexp_count(str, ',')+1
  8    )
  9    LOOP
 10      dbms_output.put_line(i.l);
 11    END LOOP;
 12  END;
 13  /
PEBO
PTGC
PTTL
PTOP
PTA

PL/SQL procedure successfully completed.

SQL>

Answer 2

感谢Lalit的精彩指示，我能够创建一个可以从let test = UIView(frame: CGRectMake(x, y, width, height)) mainView.addSubview(test) 循环调用的函数：

创建类型和功能

for

然后如何在 for 循环中调用它：

CREATE OR REPLACE TYPE t_my_list AS TABLE OF VARCHAR2(100);
CREATE OR REPLACE
       FUNCTION comma_to_table(p_list IN VARCHAR2)
         RETURN t_my_list
       AS
         l_string VARCHAR2(32767) := p_list || ',';
         l_comma_index PLS_INTEGER;
         l_index PLS_INTEGER := 1;
         l_tab t_my_list     := t_my_list();
       BEGIN
         LOOP
           l_comma_index := INSTR(l_string, ',', l_index);
           EXIT
         WHEN l_comma_index = 0;
           l_tab.EXTEND;
           l_tab(l_tab.COUNT) := TRIM(SUBSTR(l_string,l_index,l_comma_index - l_index));
           l_index            := l_comma_index + 1;
         END LOOP;
         RETURN l_tab;
       END comma_to_table;
/

注意Oracle给出的默认名称declare v_list_pak_like varchar2(4000) := 'PEBO,PTGC,PTTL,PTOP,PTA'; begin FOR x IN (select * from (table(comma_to_table(v_list_pak_like)) ) ) loop dbms_output.put_line(x.COLUMN_VALUE); end loop; end; / ，这是我想要对结果使用所必需的。

按预期结果：

COLUMN_VALUE

Answer 3

declare
    type array_type is table of VARCHAR2(255) NOT NULL;
    my_array array_type := array_type('aaa','bbb','ccc');
begin
    for i in my_array.first..my_array.last loop
        dbms_output.put_line( my_array(i) );
    end loop;
end;

在第一行中，您定义一个您想要的任何类型的表格。

然后创建该类型的变量并使用一种构造函数为其赋值。

我在声明中初始化了它，但它也可以在 Pl Sql 的主体中完成。

然后从第一个索引到最后一个循环遍历数组。