Problem in execution of a function having clob datatype

Question

[http://www.orafaq.com/forum/t/128331/98870/]
Hi,
I had a Problem in executing a function having clob datatype.
Here below is my function.
create or replace type split_obj as object
    occurence_id number(10,0),
    splitvalue varchar2(1000)
create or replace type split_rec as table of split_obj;
create or replace FUNCTION Split_new1(
                                       p_string IN clob,
                                       p_delimiter IN VARCHAR2
                                     )  return split_rec  pipelined  is
    v_length NUMBER := dbms_lob.getlength(p_string);
      v_start NUMBER := 1;
     v_index NUMBER;
      V_temp NUMBER(10,0):=0;
   begin
WHILE(v_start <= v_length)
    LOOP
      v_index := dbms_lob.INSTR(p_string, p_delimiter, v_start);
       IF v_index = 0 THEN
         V_temp:=V_temp+1;
         PIPE ROW(split_obj(v_temp,dbms_lob.SUBSTR(p_string, v_length,v_start)));
         v_start := v_length + 1;
       ELSE
         v_temp:=v_temp+1;  
         PIPE ROW(split_obj(v_temp,dbms_lob.SUBSTR(p_string, v_index - v_start,v_start)));
         v_start := v_index + 1;
       END IF;
     END LOOP;
    return;
   end Split_new1;Here attached link contains the procedure trying to execute the function with huge string more than 400kb.
Could you pls let me know how to do the same in sqlplus and toad.
Thanks in advance.
Edited by: user512743 on Nov 27, 2008 4:31 AM

Answer 1

BluShadow wrote:
The problem is that in your execution of this you are trying to assign a value to the clob variable using
v_clob := '<string>'
where the string is greater than allowed in PL/SQL.
Whilst the CLOB itself can hold more data, the string is actually the equivalent of a VARCHAR2 so cannot exceed VARCHAR2 limits.
You should use the DBMS_LOB package to append data to your CLOB in chunks of no more than 32767 characters at a time.??? PL/SQL provides full CLOB support. There is no need to use DBMS_LOB (although you could). OP's function has logic errors. Anyway:
SQL> create or replace type split_obj as object
  2    (
  3      occurence_id number(10,0),
  4      splitvalue varchar2(1000)
  5    );
  6  /
Type created.
SQL> create or replace type split_rec as table of split_obj;
  2  /
Type created.
SQL> create or replace
  2    FUNCTION Split_new1(
  3                        p_string IN clob,
  4                        p_delimiter IN VARCHAR2
  5                       )
  6      return split_rec  pipelined
  7      is
  8          v_length NUMBER := length(p_string);
  9          v_start  NUMBER := 1;
10          v_end    NUMBER;
11          V_id     NUMBER :=0;
12          v_clob   CLOB   := p_string || p_delimiter;
13      begin
14          while(v_start <= v_length) loop
15            v_end := instr(v_clob, p_delimiter, v_start);
16            v_id  := v_id + 1;
17            pipe row(split_obj(v_id,substr(p_string,v_start,v_end - v_start)));
18            v_start := v_end + length(p_delimiter);
19          end loop;
20          return;
21  end Split_new1;
22  /
Function created.
SQL> create table test_table(x clob)
  2  /
Table created.
SQL> declare
  2      c clob;
  3  begin
  4      for i in 1..26 loop
  5        c := c || lpad(chr(ascii('a') + i - 1),1000,chr(ascii('a') + i - 1)) || ',';
  6      end loop;
  7      for i in 1..26 loop
  8        c := c || lpad(chr(ascii('A') + i - 1),1000,chr(ascii('A') + i - 1)) || ',';
  9      end loop;
10      for i in 1..26 loop
11        c := c || lpad(chr(ascii('a') + i - 1),1000,chr(ascii('a') + i - 1)) || ',';
12      end loop;
13      for i in 1..26 loop
14        if i > 1 then c := c || ','; end if;
15        c := c || lpad(chr(ascii('A') + i - 1),1000,chr(ascii('A') + i - 1));
16      end loop;
17      insert into test_table
18        values(c);
19  end;
20  /
PL/SQL procedure successfully completed.
SQL> select  length(x)
  2    from  test_table
  3  /
LENGTH(X)
    104103
SQL> select  t.occurence_id,
  2          length(splitvalue) len,
  3          substr(splitvalue,1,20) first_20
  4    from  test_table,
  5          table(Split_new1(x,',')) t
  6  /
OCCURENCE_ID        LEN FIRST_20
           1       1000 aaaaaaaaaaaaaaaaaaaa
           2       1000 bbbbbbbbbbbbbbbbbbbb
           3       1000 cccccccccccccccccccc
           4       1000 dddddddddddddddddddd
           5       1000 eeeeeeeeeeeeeeeeeeee
           6       1000 ffffffffffffffffffff
           7       1000 gggggggggggggggggggg
           8       1000 hhhhhhhhhhhhhhhhhhhh
           9       1000 iiiiiiiiiiiiiiiiiiii
          10       1000 jjjjjjjjjjjjjjjjjjjj
          11       1000 kkkkkkkkkkkkkkkkkkkk
OCCURENCE_ID        LEN FIRST_20
          12       1000 llllllllllllllllllll
          13       1000 mmmmmmmmmmmmmmmmmmmm
          14       1000 nnnnnnnnnnnnnnnnnnnn
          15       1000 oooooooooooooooooooo
          16       1000 pppppppppppppppppppp
          17       1000 qqqqqqqqqqqqqqqqqqqq
          18       1000 rrrrrrrrrrrrrrrrrrrr
          19       1000 ssssssssssssssssssss
          20       1000 tttttttttttttttttttt
          21       1000 uuuuuuuuuuuuuuuuuuuu
          22       1000 vvvvvvvvvvvvvvvvvvvv
OCCURENCE_ID        LEN FIRST_20
          23       1000 wwwwwwwwwwwwwwwwwwww
          24       1000 xxxxxxxxxxxxxxxxxxxx
          25       1000 yyyyyyyyyyyyyyyyyyyy
          26       1000 zzzzzzzzzzzzzzzzzzzz
          27       1000 AAAAAAAAAAAAAAAAAAAA
          28       1000 BBBBBBBBBBBBBBBBBBBB
          29       1000 CCCCCCCCCCCCCCCCCCCC
          30       1000 DDDDDDDDDDDDDDDDDDDD
          31       1000 EEEEEEEEEEEEEEEEEEEE
          32       1000 FFFFFFFFFFFFFFFFFFFF
          33       1000 GGGGGGGGGGGGGGGGGGGG
OCCURENCE_ID        LEN FIRST_20
          34       1000 HHHHHHHHHHHHHHHHHHHH
          35       1000 IIIIIIIIIIIIIIIIIIII
          36       1000 JJJJJJJJJJJJJJJJJJJJ
          37       1000 KKKKKKKKKKKKKKKKKKKK
          38       1000 LLLLLLLLLLLLLLLLLLLL
          39       1000 MMMMMMMMMMMMMMMMMMMM
          40       1000 NNNNNNNNNNNNNNNNNNNN
          41       1000 OOOOOOOOOOOOOOOOOOOO
          42       1000 PPPPPPPPPPPPPPPPPPPP
          43       1000 QQQQQQQQQQQQQQQQQQQQ
          44       1000 RRRRRRRRRRRRRRRRRRRR
OCCURENCE_ID        LEN FIRST_20
          45       1000 SSSSSSSSSSSSSSSSSSSS
          46       1000 TTTTTTTTTTTTTTTTTTTT
          47       1000 UUUUUUUUUUUUUUUUUUUU
          48       1000 VVVVVVVVVVVVVVVVVVVV
          49       1000 WWWWWWWWWWWWWWWWWWWW
          50       1000 XXXXXXXXXXXXXXXXXXXX
          51       1000 YYYYYYYYYYYYYYYYYYYY
          52       1000 ZZZZZZZZZZZZZZZZZZZZ
          53       1000 aaaaaaaaaaaaaaaaaaaa
          54       1000 bbbbbbbbbbbbbbbbbbbb
          55       1000 cccccccccccccccccccc
OCCURENCE_ID        LEN FIRST_20
          56       1000 dddddddddddddddddddd
          57       1000 eeeeeeeeeeeeeeeeeeee
          58       1000 ffffffffffffffffffff
          59       1000 gggggggggggggggggggg
          60       1000 hhhhhhhhhhhhhhhhhhhh
          61       1000 iiiiiiiiiiiiiiiiiiii
          62       1000 jjjjjjjjjjjjjjjjjjjj
          63       1000 kkkkkkkkkkkkkkkkkkkk
          64       1000 llllllllllllllllllll
          65       1000 mmmmmmmmmmmmmmmmmmmm
          66       1000 nnnnnnnnnnnnnnnnnnnn
OCCURENCE_ID        LEN FIRST_20
          67       1000 oooooooooooooooooooo
          68       1000 pppppppppppppppppppp
          69       1000 qqqqqqqqqqqqqqqqqqqq
          70       1000 rrrrrrrrrrrrrrrrrrrr
          71       1000 ssssssssssssssssssss
          72       1000 tttttttttttttttttttt
          73       1000 uuuuuuuuuuuuuuuuuuuu
          74       1000 vvvvvvvvvvvvvvvvvvvv
          75       1000 wwwwwwwwwwwwwwwwwwww
          76       1000 xxxxxxxxxxxxxxxxxxxx
          77       1000 yyyyyyyyyyyyyyyyyyyy
OCCURENCE_ID        LEN FIRST_20
          78       1000 zzzzzzzzzzzzzzzzzzzz
          79       1000 AAAAAAAAAAAAAAAAAAAA
          80       1000 BBBBBBBBBBBBBBBBBBBB
          81       1000 CCCCCCCCCCCCCCCCCCCC
          82       1000 DDDDDDDDDDDDDDDDDDDD
          83       1000 EEEEEEEEEEEEEEEEEEEE
          84       1000 FFFFFFFFFFFFFFFFFFFF
          85       1000 GGGGGGGGGGGGGGGGGGGG
          86       1000 HHHHHHHHHHHHHHHHHHHH
          87       1000 IIIIIIIIIIIIIIIIIIII
          88       1000 JJJJJJJJJJJJJJJJJJJJ
OCCURENCE_ID        LEN FIRST_20
          89       1000 KKKKKKKKKKKKKKKKKKKK
          90       1000 LLLLLLLLLLLLLLLLLLLL
          91       1000 MMMMMMMMMMMMMMMMMMMM
          92       1000 NNNNNNNNNNNNNNNNNNNN
          93       1000 OOOOOOOOOOOOOOOOOOOO
          94       1000 PPPPPPPPPPPPPPPPPPPP
          95       1000 QQQQQQQQQQQQQQQQQQQQ
          96       1000 RRRRRRRRRRRRRRRRRRRR
          97       1000 SSSSSSSSSSSSSSSSSSSS
          98       1000 TTTTTTTTTTTTTTTTTTTT
          99       1000 UUUUUUUUUUUUUUUUUUUU
OCCURENCE_ID        LEN FIRST_20
         100       1000 VVVVVVVVVVVVVVVVVVVV
         101       1000 WWWWWWWWWWWWWWWWWWWW
         102       1000 XXXXXXXXXXXXXXXXXXXX
         103       1000 YYYYYYYYYYYYYYYYYYYY
         104       1000 ZZZZZZZZZZZZZZZZZZZZ
104 rows selected.
SQL> As you can see, function works OK without DBMS_LOB on CLOB of 104103 bytes.
SY.