Certifique-se de que possui direitos para utilização do UTL_FILE, caso não possua execute o comando abaixo
| grant execute on utl_file to <user> |
Segue o código
| -- Create directory create or replace directory UTL_FILE_TMP as 'C:\Okpt - DECLARE arquivo_ler UTL_File.File_Type; Linha Varchar2(1022); BEGIN arquivo_ler := UTL_File.Fopen('UTL_FILE_TMP','INSTALL.INI', 'R'); Loop UTL_File.Get_Line(arquivo_ler, Linha); insert into SPED_OAS_RES_2(ID,REG) VALUES (SEQ_SPED_RES.NEXTVAL, LINHA); End Loop; UTL_File.Fclose(arquivo_ler); Dbms_Output.Put_Line("Arquivo processado com sucesso."); EXCEPTION WHEN No_data_found THEN UTL_File.Fclose(arquivo_ler); Commit; WHEN UTL_FILE.INVALID_PATH THEN Dbms_Output.Put_Line("Diretório inválido."); UTL_File.Fclose(arquivo_ler); WHEN Others THEN Dbms_Output.Put_Line ("Problemas na leitura do arquivo."); UTL_File.Fclose(arquivo_ler); END; |
Nenhum comentário :
Postar um comentário