执行TEXT_IO后如何从目标打开CSV文件

时间:2019-05-17 05:39:37

标签: csv oracle11g oracleforms oracle-fusion-middleware

我有一些代码,可以从select语句生成CSV文件。为此,我使用了TEXT_IO过程。此过程在目标路径上创建了CSV文件。现在,我要在执行过程后从目标路径打开CSV文件。

代码:

PROCEDURE REPORT_CSV IS

 CURSOR c_data IS
 SELECT hofid,
       mofid,
       mofname,
       rid,
       cnicno
 FROM   mof
 where hofid = '1131716869';

 v_file        client_text_io.file_type;   
 v_delimiter VARCHAR2(1) := ',';

BEGIN

 v_file := CLIENT_TEXT_IO.FOpen( 'E:\Report_MOF.csv', 'W' );

 FOR cur_rec IN c_data LOOP
 CLIENT_TEXT_IO.PUT_LINE(v_file,
                  cur_rec.hofid    || ',' ||
                  cur_rec.mofid    || ',' ||
                  cur_rec.mofname      || ',' ||
                  cur_rec.rid      || ',' ||
                  cur_rec.cnicno);
 END LOOP;

 client_text_io.fclose (v_file);

 EXCEPTION 
 WHEN OTHERS THEN
 MESSAGE(SQLCODE || SQLERRM);

END;

0 个答案:

没有答案