oracle存储过程查数据并生成文件怎么实现？
发布网友
发布时间：2022-04-22 12:54
共2个回答
热心网友
时间：2023-06-28 16:25
分几个步骤
1，创建输出路径，比如你要在c盘test目录下输出，你就先要建立好这个test路径
2，sqlplus下以sysdba登录，执行以下语句
3，create or replace directory TMP as 'c:\test';
4，grant read,write on directory TMP to 你要生成文件的用户;
5，alter system set utl_file_dir='c:\test' scope=spfile;
以上步骤执行完，需要重启数据库
6，最重要的一步开始了，创建存储过程
create or replace PROCEDURE SP_OUTPUTis
file_handle utl_file.file_type;
Write_content VARCHAR2(1024);
Write_file_name VARCHAR2(50);
v_id int;
v_form varchar2(10);
cursor cur_sp_out
is
select id,form from a;
begin
open cur_sp_out;
loop
fetch cur_sp_out into v_id,v_form;
exit when cur_sp_out%notfound;
write_file_name := to_char(SYSDATE,'YYYYMMDD')||'.txt';
file_handle := utl_file.fopen('TMP',write_file_name,'a');
write_content := v_id||' '||v_form;
--write file
IF utl_file.is_open(file_handle) THEN
utl_file.put_line(file_handle,write_content);
END IF;
--close file
utl_file.fclose(file_handle);
end loop;
close cur_sp_out;
end;
我建立了一个跟你一样的测试表，数据如下
create table a(id int,form varchar2(10));
insert into a values (1,'你好');
insert into a values (2,'你很好');
然后执行存储过程
beginSP_OUTPUT;
end;
执行完毕后，你在c盘test路径下会发现已经有新文件生成
文件内容
存储过程的话，如果表名和字段名跟你一致的话，你无须修改
追问我在哪儿控制导出为前一天当天的数据，比如2013-11-12？我的字段里面有date这个字段追答
哦，那稍微改动一下就行，我那个是生成当天的了，你用下边这个
create or replace PROCEDURE SP_OUTPUTis
file_handle utl_file.file_type;
Write_content VARCHAR2(1024);
Write_file_name VARCHAR2(50);
v_id int;
v_form varchar2(10);
cursor cur_sp_out
is
select id,form from a where to_char(日期,'yyyymmdd')=to_char(sysdate-1,'yyyymmdd'); --如果表里有日期字段的话这么用就行
begin
open cur_sp_out;
loop
fetch cur_sp_out into v_id,v_form;
exit when cur_sp_out%notfound;
write_file_name := to_char(SYSDATE-1,'YYYYMMDD')||'.txt';--如果这个地方要修改文件名的话，在sysdate处减1就好，其他不用改
file_handle := utl_file.fopen('TMP',write_file_name,'a');
write_content := v_id||' '||v_form;
--write file
IF utl_file.is_open(file_handle) THEN
utl_file.put_line(file_handle,write_content);
END IF;
--close file
utl_file.fclose(file_handle);
end loop;
close cur_sp_out;
end;
热心网友
时间：2023-06-28 16:25
select trim (to_char (operating_unit)) c_org_id,
trim (to_char (sysdate +12/24, 'YYYY-MM-DD_HH24.MI.SS')) c_datetimestamp
from apps.org_organization_definitions
where organization_code = 'JiangsuChangzhou'
--以下创建文件（既然你要tab隔开，那就直接以tsv作为后缀）
spool .\Delivery\CZ_Booking_Report_&&datetimestamp..TSV
--query start @这里加入文件头描述，可有可无
select 'The report was launched @ '||to_char (sysdate + 12/24, 'YYYY-MM-DD_Day_HH:MM:SS') from al -- approximate timezone translation
/
--以下是输出表格的表头标题（3列为例）
select 'Operating_id' ||chr(9)||
'order_number' ||chr(9)||
'XXEGE_OM_DEFAULT_CODE'
from al
/
--以下查询数据行
select hou.name ||chr(9)||
ooh.order_number ||chr(9)||
ooh.CUST_PO_NUMBER
from OM.tableX
--这句是你要的“前一天”条件。
where ooh.date like to_date('&&2', 'yyyy-mm-dd')+13/24
/
select 'The report was Finished @ '||to_char (sysdate + 13/24, 'YYYY-MM-DD_Day_HH:MM:SS') from al
/
spool off
