Reading text file to populate table

Question

I am getting following error
5/10/01 1:08 PM Execution failed: ORA-20053: Read Error
5/10/01 1:08 PM ORA-06512: at line 8
5/10/01 1:08 PM End Executing PL/SQL block
When I run the same program in for loop for 100 times it runs fine. But does not work if I run the loop till end of file.
PROCEDURE READTEXT ( p_FileDir IN varchar2,
p_FileName IN varchar2,
p_OpenMode IN varchar2)
AS
v_file utl_file.file_type;
v_line varchar2(2700);
v_rec_id bu340.rec_id%type;
v_num_lines bu340.num_lines%type;
v_typist_orig bu340.typist_orig%type;
BEGIN
v_file := utl_file.fopen(p_FileDir,p_FileName,p_OpenMode);
LOOP
BEGIN
utl_file.get_line(v_file,v_LINE);
EXCEPTION
when NO_DATA_FOUND then
EXIT;
END;
v_rec_id := substr(v_line,1,4);
v_typist_orig := substr(v_line,7,2);
INSERT INTO BU340 (rec_id,typist_orig)
VALUES (v_rec_id,v_typist_orig);
END LOOP;
utl_file.fclose(v_file);
commit;
EXCEPTION
when utl_file.invalid_operation then
utl_file.fclose(v_file);
raise_application_error(-20051,'Invalid Operation');
when utl_file.invalid_FileHandle then
utl_file.fclose(v_file);
raise_application_error(-20052,'Invalid FileHandle');
when utl_file.read_error then
utl_file.fclose(v_file);
raise_application_error(-20053,'Read Error');
when others then
utl_file.fclose(v_file);
raise;
END;
null

Answer 1

I guess what is happening is since you have more than 100 records it runs fine if you try 1 .. 100 but if you try end of file it enters the code for exception. The Exit is not working the way you want it to work so it falls through due to which you are getting a read error since there is no data.
Your Code sample :
LOOP
BEGIN
utl_file.get_line(v_file,v_LINE);
EXCEPTION
when NO_DATA_FOUND then
EXIT;
END;
v_rec_id := substr(v_line,1,4);
You can try either of this
1. Remove Begin and End statement.
2. EXCEPTION
EXIT when NO_DATA_FOUND;
I guess it is of some help.
null