Strange request: varchar2 as multiple rows..

Question

Hi all.
I have a varchar2 field with a delimiter and want the output in multiple records based on the delimiter.
Ex: if the table name is XYZ and the data is as below
XYZ
field1~~~ field2~~~ field3
1~~~test1,test2,test3,test4~~~123123
2~~~test5,test6,test4~~~432423
the result need to be as follows...
field1~~~ field2~~~ field3
1~~~test1~~~123123
1~~~test2~~~123123
1~~~test3~~~123123
1~~~test4~~~123123
2~~~test5~~~432423
2~~~test6~~~432423
2~~~test4~~~432423
Appreciate any help.
Thanks NPR

Answer 1

Here's an implementation of a split function.
  FUNCTION simple_split (
    p_text        IN   VARCHAR2,
    p_delimiter   IN   VARCHAR2 DEFAULT ',')
    RETURN varchar2_array
  IS
    k_delim_len   CONSTANT PLS_INTEGER      := LENGTH (p_delimiter);
    l_tokens               varchar2_array   := varchar2_array ();
    l_text_to_split        VARCHAR2 (32767);
    l_delim_pos            PLS_INTEGER;
  BEGIN
    l_tokens.DELETE;
    l_text_to_split := p_text;
    WHILE l_text_to_split IS NOT NULL
    LOOP
      l_delim_pos := INSTR (l_text_to_split, p_delimiter);
      IF l_delim_pos > 0
      THEN
        l_tokens.EXTEND;
        l_tokens (l_tokens.LAST) :=
                                 SUBSTR (l_text_to_split, 1, l_delim_pos - 1);
        l_text_to_split :=
                          SUBSTR (l_text_to_split, l_delim_pos + k_delim_len);
      ELSE
        l_tokens.EXTEND;
        l_tokens (l_tokens.LAST) := l_text_to_split;
        l_text_to_split := NULL;
      END IF;
    END LOOP;
    RETURN l_tokens;
  END simple_split;