oracle输出查询,Oracle 查询文件输出简介一

REM 当能大家也可以使用c来写，这个也比较简单，在 这里就不给介绍了

REM Remember to update initSID.ora, utl_file_dir='D:\oralce_log\utl' parameter

declare

oraload utl_file.file_type;

CURSOR sql_out IS

SELECT EMPNO||' ' || ENAME ||' ' || JOB || ' ' ||MGR || ' ' ||

HIREDATE || ' ' || SAL ||' '||COMM as A from emp_001;

sql_out_all sql_out%ROWTYPE;

begin

oraload := utl_file.fopen('D:\oralce_log\utl', 'tab1.txt', 'w');   --这里就是和 java 写文件是一个道理

OPEN sql_out;

LOOP

FETCH sql_out INTO sql_out_all;

EXIT WHEN sql_out%NOTFOUND;

utl_file.putf(oraload, '%s,%s\n',sql_out_all.A,'');

end loop;

utl_file.fclose(oraload);  -- 一定得关闭文件

end; /