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);