3

Oracle 9i を使用しています。

カーソルから配列にデータを取得しています:

FETCH contract_cur 
        BULK COLLECT INTO l_contract ;

しかし今、このl_contractを CLOB 変数l_clobに「変換」したい

それを行う簡単な方法はありますか?

または、SELECT ステートメントの行を単一の CLOB 変数に変換するにはどうすればよいですか?

ありがとう

編集:1列だけでなく、%ROWTYPEの配列であることに言及するのを忘れていました。

4

2 に答える 2

2

なんて醜いことでしょう。

それはすべて文字データですか、それともそこに数値や日付/時刻の値がありますか?その場合、それらを文字列に変換するときに、これらのデータ型にどの形式を使用しますか。

また、フィールドとレコードの区切り文字について考える必要があるかもしれません。

XMLを検討しましたか?

declare 
 v_clob clob;
 v_xml xmltype;
begin
 select xmlagg(XMLELEMENT("test",xmlforest(id,val)))
 into v_xml
 from test;
 select v_xml.getclobval
 into v_clob
 from dual;
 dbms_output.put_line(v_clob);
end;
/
于 2010-02-19T22:01:15.043 に答える
2

you can loop through your array and build the CLOB as you go:

SQL> DECLARE
  2     TYPE tab_vc IS TABLE OF VARCHAR2(4000);
  3     l_contract tab_vc;
  4     l_clob CLOB;
  5  BEGIN
  6     dbms_lob.createtemporary (l_clob, TRUE);
  7     SELECT to_char(dbms_random.STRING('a', 1000)) BULK COLLECT
  8       INTO l_contract
  9       FROM dual
 10     CONNECT BY LEVEL <= 100;
 11     FOR i IN 1..l_contract.count LOOP
 12        dbms_lob.writeappend(l_clob,
 13                             length(l_contract(i)),
 14                             l_contract(i));
 15     END LOOP;
 16     -- your code here
 17     dbms_lob.freetemporary(l_clob);
 18  END;
 19  /

PL/SQL procedure successfully completed

If you don't use l_contract for anything else you can build the CLOB directly from the cursor loop without the array step, it will save memory and will probably be faster:

SQL> DECLARE
  2     l_clob CLOB;
  3  BEGIN
  4     dbms_lob.createtemporary (l_clob, TRUE);
  5     FOR cc IN ( SELECT to_char(dbms_random.STRING('a', 1000)) txt
  6                   FROM dual
  7                 CONNECT BY LEVEL <= 100) LOOP
  8        dbms_lob.writeappend(l_clob,
  9                             length(cc.txt),
 10                             cc.txt);
 11     END LOOP;
 12     -- your code here
 13     dbms_lob.freetemporary(l_clob);
 14  END;
 15  /

PL/SQL procedure successfully completed
于 2010-02-19T16:30:14.333 に答える