Question

我在oracle 11g db上的pl / sql中编写了一个函数来导出遵循特定细节的表。其中一个细节是\ n作为断线。

PROCEDURE exportTableAScsv (p_tname varchar2) IS
    fileHandler     UTL_FILE.FILE_TYPE;
    l_theCursor     integer default dbms_sql.open_cursor;
    l_columnValue   varchar2(4000);
    l_status        integer;
    l_query         varchar2(1000) default 'select * from ' || p_tname;

    l_colCnt        number := 0;
    l_separator     varchar2(1) default '|';
    l_descTbl       dbms_sql.desc_tab;
    test_n          number:=0;
    filename        varchar2(100) := 'custom_export_'|| p_tname ||'_' ||    to_char(sysdate,'yyyymmddhhmmss')|| '.csv';
    ex_custom EXCEPTION;
    PRAGMA EXCEPTION_INIT( ex_custom, -20001 );

 BEGIN

 fileHandler := UTL_FILE.FOPEN('TEMPDIR', filename , 'W');
 dbms_sql.parse(  l_theCursor,  l_query, dbms_sql.native );
 dbms_sql.describe_columns( l_theCursor, l_colCnt, l_descTbl );
 . . .

 for i in 1 .. l_colCnt loop
     if (i>1) then
         UTL_FILE.put( fileHandler, l_separator || l_descTbl(i).col_name );
     else
         UTL_FILE.put( fileHandler, l_descTbl(i).col_name );
     end if;
     dbms_sql.define_column( l_theCursor, i, l_columnValue, 4000 );
 end loop;
 -- UTL_FILE.put_line(fileHandler,'')
 UTL_FILE.fflush(fileHandler)
 UTL_FILE.put( fileHandler, CHR(10) );

 l_status := dbms_sql.execute(l_theCursor);
 . . . 
 while ( SYS.dbms_sql.fetch_rows(l_theCursor) > 0 ) loop
     for i in 1 .. l_colCnt loop
         SYS.dbms_sql.column_value( l_theCursor, i, l_columnValue );
         if (i > 1) then
            utl_file.put( fileHandler, l_separator || l_columnValue );
         else
            utl_file.put( fileHandler, l_columnValue );
         end if;
     end loop;
    -- UTL_FILE.put_line(fileHandler,'')
    UTL_FILE.fflush(fileHandler)
    UTL_FILE.put( fileHandler, CHR(10) );
  end loop;

  dbms_sql.close_cursor(l_theCursor);
  UTL_FILE.FCLOSE(fileHandler);
EXCEPTION
 . . .
 UTL_FILE.FCLOSE(fileHandler);
 raise;
. . . 
END exportTableAScsv;

如标题中所述，尽管上面的代码，当我运行该函数时，我总是将数据提取为windows格式，\ r \ n作为行尾。 Oracle DB位于Windows机器上。附：不幸的是我无法将数据库放在linux机器上并使用put_line。

Answer 1

我怀疑这是由你使用UTL_FILE.FFLUSH引起的。引用the documentation（我的重点）：

FFLUSH将待处理数据物理写入由...标识的文件文件句柄。通常，写入文件的数据是缓冲的。该 FFLUSH过程强制将缓冲的数据写入文件。 必须使用换行符终止数据。

然而，在你的函数中，你在之前使用PUT来调用FFLUSH 来附加换行符。因为你在Windows机器上，所以你正在获得Windows换行符。

稍微放在一边;为什么这是一个功能，而不是一个程序？它作为一个过程更有意义，因为你不太可能希望人们能够从SQL中调用它。

pl / sql utl_file endline总是\ r \ n

1 个答案: