Oracle PL/SQL：将查询结果转储到文件中

Question

我正在处理pl sql存储过程。 我需要的是做一个选择，使用游标，并为每个记录使用值构建一个字符串。 最后我需要把它写入一个文件。 我尝试使用dbms_output.put_line（“toto”），但缓冲区大小很小，因为我有大约1400万行。 我从unix ksh调用我的过程。 我在想使用“spool on”（在ksh端）来转储我的过程结果，但我不知道如何去做（如果可能的话）

任何人都有任何想法？

Answer 1

除非真的有必要，否则我不会使用程序。

如果调用使用SQL 加上剧本，只是把下面的内容test.sql（在SET s是SQLPlus FAQ去除噪声）：

SET ECHO OFF 
SET NEWPAGE 0 
SET SPACE 0 
SET PAGESIZE 0 
SET FEEDBACK OFF 
SET HEADING OFF 
SET TRIMSPOOL ON 
SET TAB OFF 

Select owner || ';' || object_name 
From all_objects; 

QUIT 

和输出重定向到文件（test.txt）：

sqlplus user/passwd@instance @ test.sql > test.txt 

---

如果你真的需要做的东西在PL/SQL，考虑把该进的功能和Ca LL它每个记录：

Create Or Replace Function calculate_my_row(in_some_data In Varchar2) 
    Return Varchar2 
As 
Begin 
    Return in_some_data || 'something-complicated'; 
End calculate_my_row; 

电话：

Select owner || ';' || calculate_my_row(object_name) 
From all_objects; 

业绩可能遭受负面，但它应该工作。请确保，尽管如此，您尝试使用纯粹的SQL无法完成。

---

阅读您的评论我觉得解析函数Lag是你所需要的。

这个例子追加*的情况下val值发生了变化：

With x As (
     Select 1 id, 'A' val FROM dual 
Union Select 2 id, 'A' val FROM dual 
Union Select 3 id, 'B' val FROM dual 
Union Select 4 id, 'B' val FROM dual 
) 
--# End of test-data 
Select 
    id, 
    val, 
    Case When (val <> prev_val Or prev_val Is Null) Then '*' End As changed 
From (
    Select id, val, Lag(val) Over (Order By id) As prev_val 
    From x 
) 
Order By id 

返回

 ID V C 
---------- - - 
     1 A * 
     2 A 
     3 B * 
     4 B 

Answer 2

utl_file是你的朋友 http://www.adp-gmbh.ch/ora/plsql/utl_file.html 但是写入数据到服务器上的文件系统，所以你可能需要你的DBA的帮助。

Answer 3

汤姆凯特已经回答了这个，看

Flat

从this question on Ask Tom

Answer 4

如果输出的每一行都是表格中一行操作的结果，那么存储函数与Peter Lang的答案一起可以完成您所需的操作。

create function create_string(p_foobar foobar%rowtype) return varchar2 as 
begin 
    do_some_stuff(p_foobar); 
    return p_foobar.foo || ';' ||p_foobar.bar; 
end; 
/

如果它要复杂得多，也许你可以使用一个流水线表函数

create type varchar_array 
    as table of varchar2(2000) 
/

create function output_pipelined return varchar_array PIPELINED as 
    v_line varchar2(2000); 
begin 
    for r_foobar in (select * from foobar) 
    loop 
    v_line := create_string(r_foobar); 
    pipe row(v_line); 
    end loop; 
    return; 
end; 
/

select * from TABLE(output_pipelined);