Help Procedure
Enviado: Sex, 02 Mai 2008 4:01 pm
Pessoal,
Onde deve ser passado o nome do arquivvo como parâmetro ?
Script:
Onde deve ser passado o nome do arquivvo como parâmetro ?
Script:
create or replace PROCEDURE "SP_INSERE_ARQ_TARIFADOR" (p_nome_arquivo in varchar2) as
v_linha varchar2(200);
f_arquivo utl_file.file_type;
v_arquivo varchar2(50);
begin
delete dados_linha;
f_arquivo := utl_file.fopen('/tmp',p_nome_arquivo,'R');
loop
begin
utl_file.get_line(f_arquivo,v_linha);
--
insert into dados_linha
( linha )
values
(substr(p_nome_arquivo,1,3)||substr(v_linha,4,110) );
--
Exception
When No_Data_Found Then
Exit;
When Others Then
raise_application_error(20001,'Erro v_linha-> '|| v_linha||' -> '||sqlerrm);
end;
end loop;
UTL_FILE.FCLOSE(F_ARQUIVO);
commit;
end;