oracle简单写文件

DECLARE

  testfile_handle UTL_FILE.file_type;

BEGIN

  testfile_handle := UTL_FILE.FOPEN('DMP_DIR', 'loge0001.txt', 'w');

  UTL_FILE.PUT_LINE(testfile_handle,

                    'rt_end_time:' ||

                    to_char(systimestamp, 'yyyy-mm-dd hh24:mi:ss:ff3'));

  UTL_FILE.FCLOSE(testfile_handle);

EXCEPTION

  WHEN OTHERS THEN

    DBMS_OUTPUT.PUT_LINE(SUBSTR(SQLERRM, 1, 2000));

    UTL_FILE.FCLOSE(testfile_handle);