我有一些代码,可以从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;