plsql
コレクションとレコード

分割関数の戻り値としてコレクションを使用する

型を宣言する必要があります。ここにt_my_list ;コレクションはsomething TABLE OF something

CREATE OR REPLACE TYPE t_my_list AS TABLE OF VARCHAR2(100);

ここに関数があります。コンストラクタの一種として使用される()と、コレクションの作成とEXTENDに役立つCOUNTキーワードとEXTENDキーワードが注目されています。

CREATE OR REPLACE
FUNCTION cto_table(p_sep in Varchar2, p_list IN VARCHAR2)
  RETURN t_my_list
AS
--- this function takes a string list, element being separated by p_sep
--                                                         as separator
  l_string VARCHAR2(4000) := p_list || p_sep;
  l_sep_index PLS_INTEGER;
  l_index PLS_INTEGER := 1;
  l_tab t_my_list     := t_my_list();
BEGIN
  LOOP
    l_sep_index := INSTR(l_string, p_sep, l_index);
    EXIT
  WHEN l_sep_index = 0;
    l_tab.EXTEND;
    l_tab(l_tab.COUNT) := TRIM(SUBSTR(l_string,l_index,l_sep_index - l_index));
    l_index            := l_sep_index + 1;
  END LOOP;
  RETURN l_tab;
END cto_table;
/

次に、SQLからTABLE()関数を使ってコレクションの内容を見ることができます。 SQL IN ( ..)ステートメント内のリストとして使用できます。

select * from A_TABLE 
 where A_COLUMN in ( TABLE(cto_table('|','a|b|c|d')) )
--- gives the records where A_COLUMN in ('a', 'b', 'c', 'd') --