oracle中将自己定义的数据输出成一张表
year
--------
2012
2013
2014
但是数据库没有这样表，有没有不通过创建表的情况下通过SQL语录得到这个表。
最新回答
离情几度
2024-11-08 11:01:46
譬如要把文件生成在d盘下的test目录下：
1，在d盘根目录下新建test目录
2，sqlplus以system用sysdba登录
3，create or replace directory TMP as ’d:\test’;
4，grant read on directory TMP to user;
5，alter system set utl_file_dir='d:\test' scope=spfile;
然后建立存储过程，表是随便建了一个，最后的文件名按要求需要按照当前日期的前一天生成，所以后边文件名的地方write_file_name处就按照要求来了
create or replace PROCEDURE SP_OUTPUT
(
on_flag OUT NUMBER,
out_reason OUT VARCHAR2)
is
v_code number;
v_text varchar2(255);
file_handle utl_file.file_type;
Write_content VARCHAR2(1024);
Write_file_name VARCHAR2(50);
v_aaa varchar2(5);
v_bbb varchar2(5);
cursor cur_sp_out
is
select aaa,bbb
from aaa;
begin
open cur_sp_out;
loop
fetch cur_sp_out into v_aaa,v_bbb;
exit when cur_sp_out%notfound;
write_file_name := to_char(SYSDATE,'YYYYMMDD')||'.xls';
file_handle := utl_file.fopen('TMP',write_file_name,'a');
write_content := v_aaa||' '||v_bbb;
--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;
v_code := 0;
v_text := '完成';
exception
when others then
on_flag := SQLCODE;
out_reason := SQLERRM;
begin
IF utl_file.is_open(file_handle) THEN
utl_file.fclose(file_handle);
end IF;
end;
rollback;
end;
这样基本就完成了，但是建立完毕后需要重启数据库，否则文件写不进指定的目录下
需要注意的是： write_content := v_aaa||' '||v_bbb; 这个位置
v_aaa|| 和v_bbb中间引号的地方是TAB符，否则输出来的XLS文件中，会把这些字符串合在一个单元格中。
热门标签
