Utl_file.putline - platform specific line termination character

Question

PUT_LINE terminates the line with the platform-specific line terminator character or characters.
But the porblem is this.
The file generator application can run in different platform,and hence it means I can have different line termination character.Is there anyway I can force it to generate Unix only line termination character (line termination char in Unix I guess is \n) .
In short programatically I want to control it.
I looked at UTL_FILE.PUTLINE but it doesnt have any option to control the line termination char.
Help.

Answer 1

here is the example, i am on HP UNIX
SQL> DECLARE
  2     l_text   VARCHAR2 (32767);
  3     v_file   UTL_FILE.FILE_TYPE;
  4  BEGIN
  5   -- OPEN FILE to write
  6     v_file :=  UTL_FILE.FOPEN (LOCATION          => 'NOTIFICATION',
  7                        filename          => 'Test.txt',
  8                        open_mode         => 'w',
  9                        max_linesize      => 32767
10                       );
11     UTL_FILE.PUT(v_file,'Hello' || CHR(10));
12 
13     UTL_FILE.PUT(v_file,'how are you' || CHR(10));
14 
15     UTL_FILE.PUT(v_file,'I am fine' || CHR(10));
16     UTL_FILE.FCLOSE (v_file);
17    ---- open file to read
18    v_file := UTL_FILE.FOPEN (LOCATION          => 'NOTIFICATION',
19                        filename          => 'Test.txt',
20                        open_mode         => 'r'
21                       
22                       );
23     BEGIN
24        LOOP
25           UTL_FILE.GET_LINE (v_file, l_text, 32767);
26           DBMS_OUTPUT.PUT_LINE (l_text);
27        END LOOP;
28     EXCEPTION
29        WHEN NO_DATA_FOUND
30        THEN
31           NULL;
32     END;
33      -- READ LAST LINE
34    -- DBMS_OUTPUT.PUT_LINE ('Last Line : |' || l_text || '|');
35     UTL_FILE.FCLOSE (v_file);
36  EXCEPTION
37     WHEN OTHERS
38     THEN
39        UTL_FILE.FCLOSE (v_file);
40  END;
41  /
Hello
how are you
I am fine
PL/SQL procedure successfully completed.
SQL> ed
Wrote file afiedt.buf
  1  DECLARE
  2     l_text   VARCHAR2 (32767);
  3     v_file   UTL_FILE.FILE_TYPE;
  4  BEGIN
  5   -- OPEN FILE to write
  6     v_file :=  UTL_FILE.FOPEN (LOCATION          => 'NOTIFICATION',
  7                        filename          => 'Test.txt',
  8                        open_mode         => 'w',
  9                        max_linesize      => 32767
10                       );
11     UTL_FILE.PUT(v_file,'Hello');
12     UTL_FILE.PUT(v_file,'how are you' );
13     UTL_FILE.PUT(v_file,'I am fine' );
14     UTL_FILE.FCLOSE (v_file);
15    ---- open file to read
16    v_file := UTL_FILE.FOPEN (LOCATION          => 'NOTIFICATION',
17                        filename          => 'Test.txt',
18                        open_mode         => 'r'
19                       );
20     BEGIN
21        LOOP
22           UTL_FILE.GET_LINE (v_file, l_text, 32767);
23           DBMS_OUTPUT.PUT_LINE (l_text);
24        END LOOP;
25     EXCEPTION
26        WHEN NO_DATA_FOUND
27        THEN
28           NULL;
29     END;
30      -- READ LAST LINE
31    -- DBMS_OUTPUT.PUT_LINE ('Last Line : |' || l_text || '|');
32     UTL_FILE.FCLOSE (v_file);
33  EXCEPTION
34     WHEN OTHERS
35     THEN
36        UTL_FILE.FCLOSE (v_file);
37* END;
38  /
Hellohow are youI am fine
PL/SQL procedure successfully completed.