如何在TEXT_IO过程中使用Form参数?

时间:2018-12-20 12:49:01

标签: oracle oracle10g oracleforms

我正在以oracle形式10g使用TEXT_IO过程,并且在按下按钮时触发了此过程

我在oracle表单上有很多参数。我想在下面的代码中使用表单参数。

PROCEDURE GEN_EXCEL IS

  IN_FILE TEXT_IO.FILE_TYPE;
  VC_HEAD Varchar2(32000);
  vc_file_path Varchar2(50) := 'C:\';

BEGIN

  IN_FILE := TEXT_IO.FOPEN(vc_file_path||'Test'||'.CSV','W'); 
  TEXT_IO.PUT_LINE(IN_FILE,'YOUR_TITLE'||chr(10));
  VC_HEAD := 'header1,header2,header3,header4';

  TEXT_IO.PUT_LINE(IN_FILE,VC_HEAD);
  FOR C1 IN ( SELECT column1, column2, column3, column4
              FROM Table_name)
  LOOP
   TEXT_IO.PUT_LINE(IN_FILE,C1.col1||','||C1.col2||','||C1.col3||','||C1.col4);
  END LOOP;

  TEXT_IO.FCLOSE(IN_FILE);
  MESSAGE('Excel file has been created!');
  MESSAGE('Excel file has been created!');

  EXCEPTION
  WHEN Others THEN
  TEXT_IO.FCLOSE(IN_FILE);
  MESSAGE('Error while writing file.');
  MESSAGE('Error while writing file.');
END;

如何以oracle 10g形式实现此目标?

0 个答案:

没有答案