DECLARE
v_file_handle utl_file.file_type;
v_buffer VARCHAR2(32767);
BEGIN
v_file_handle := utl_file.fopen('TEST_DIR', 'CR_Create_Jobs.sql', 'r');
dbms_output.put_line('v_file_handle');
LOOP
BEGIN
utl_file.get_line(v_file_handle, v_buffer);
dbms_output.put_line(v_buffer);
EXCEPTION
WHEN no_data_found THEN
EXIT;
END;
END LOOP;
utl_file.fclose(v_file_handle);
END;
/
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/8520577/viewspace-755733/
,如需转载,请注明出处,否则将追究法律责任。