1  DECLARE
  2  V1 VARCHAR2(200); --32767
  3  F1 UTL_FILE.FILE_TYPE;
  4  BEGIN
  5  F1 := UTL_FILE.FOPEN('USER_DIR','TEST.txt','R');
  6  Loop
  7  BEGIN
  8  UTL_FILE.GET_LINE(F1,V1);
  9  dbms_output.put_line(V1);
 10  EXCEPTION WHEN No_Data_Found THEN EXIT; END;
 11  end loop;
 12  IF UTL_FILE.IS_OPEN(F1) THEN
 13  dbms_output.put_line('File is Open');
 14  end if;
 15  UTL_FILE.FCLOSE(F1);
 16* END;
SQL> /
DECLARE
*
ERROR at line 1:
ORA-29283: invalid file operation
ORA-06512: at "SYS.UTL_FILE", line 536
ORA-29283: invalid file operation
ORA-06512: at line 5


SQL> !touch /tmp/TEST.txt

SQL> /

PL/SQL procedure successfully completed.

SELECT * FROM all_directories;

--CREATE OR REPLACE DIRECTORY USER_DIR AS 'D:\Reading_File';
--GRANT read, write ON DIRECTORY USER_DIR TO PUBLIC ;
 
CREATE OR REPLACE DIRECTORY USER_DIR AS '/ora/oracle/';
GRANT read ON DIRECTORY USER_DIR TO PUBLIC;

DECLARE
 v1 VARCHAR2(200); --32767
 f1 UTL_FILE.FILE_TYPE;
BEGIN
  f1 := UTL_FILE.FOPEN('USER_DIR', 'TEST.txt', 'R');

  LOOP
    BEGIN
      UTL_FILE.GET_LINE(f1, v1);

      DBMS_OUTPUT.PUT_LINE(v1);
    EXCEPTION
      WHEN no_data_found THEN EXIT;
    END;
  END LOOP;

  IF UTL_FILE.IS_OPEN(f1) THEN
    DBMS_OUTPUT.Put_line('File is Open');
  END IF;

  UTL_FILE.FCLOSE(f1);

END;
/