UTL_FILE.IS_OPEN help

Question

Hi,
In report generation procedure,Before opening the file i'm checking like below,But code review put below comment.Please advice me to incorporate this comment..I have confusion on this comment.
IF UTL_FILE.IS_OPEN (v_csv_file)  THEN
        UTL_FILE.FCLOSE (v_csv_file);
    END IF;
    v_csv_file := UTL_FILE.FOPEN (v_file_location, v_csv_filename, 'W',32767);
code review comment:
1. UTL_FILE is used to check the file is closed before opening it at the start of both %CSV procs.  To me, this is a clear opportunity to encapsulate that check and the exception handling in a separate proc.  That way the code to do the opening and handling is written just once and is used more like a service.

Answer 1

Hi BluShadow,
Thanks for reply,
I Was understand the comments, but how i can proceed to implement i have a confusion since whether it should be function /procedure ?
I assume a  procedure like below...But it's not working..can you please advice or correct it?
PROCEDURE file_check(p_csv_file UTL_FILE.FILE_TYPE IS
   BEGIN
      IF close_in AND UTL_FILE.IS_OPEN (p_csv_file) THEN
         UTL_FILE.FCLOSE (p_csv_file);
      END IF;
Exception
When others then
UTL_FILE.FCLOSE (p_csv_file);
   END;
currently my code is like below
v_csv_file      UTL_FILE.FILE_TYPE;
v_csv_filename  VARCHAR2(70) := 'subject_report_csv_'||i_year||'_'||i_month||'_'||i_school||'.csv';
v_file_location VARCHAR2(50) := 'CAND_RESULTS';  --FOR LIVE
v_data_line   VARCHAR2(4000);
BEGIN
    -- File maintenance
    IF UTL_FILE.IS_OPEN (v_csv_file)  THEN
        UTL_FILE.FCLOSE (v_csv_file);
    END IF;
    v_csv_file := UTL_FILE.FOPEN (v_file_location, v_csv_filename, 'W');