create or replace procedure readfile(pdir varchar2,pfilename varchar2) is
wfilebuffer varchar2(300);
handle utl_file.file_type;
begin
handle:=utl_file.fopen(pdir,pfilename,'r'); loop
begin
utl_file.get_line(handle,wfilebuffer);
exception
when no_data_found then exit;
end;
//进行其他的处理
end loop; utl_file.fclose(handle);
end;
wfilebuffer varchar2(300);
handle utl_file.file_type;
begin
handle:=utl_file.fopen(pdir,pfilename,'r'); loop
begin
utl_file.get_line(handle,wfilebuffer);
exception
when no_data_found then exit;
end;
//进行其他的处理
end loop; utl_file.fclose(handle);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货