PROCEDURE file_to_table (loc_in IN VARCHAR2, file_in IN VARCHAR2, table_in IN names_tabtype) IS /* Open file and get handle right in declaration */ names_file CONSTANT UTL_FILE.FILE_TYPE := UTL_FILE.FOPEN (loc_in, file_in, 'R'); /* counter used to create the Nth name. */ line_counter INTEGER := 1; BEGIN LOOP UTL_FILE.GET_LINE (names_file, table_in(line_counter)); line_counter := line_counter + 1; END LOOP; EXCEPTION WHEN NO_DATA_FOUND THEN UTL_FILE.FCLOSE (names_file); END;