Onde devo incluir a data como parâmetro nesse script?
Script:
create or replace PROCEDURE "SP_ATUALIZA_TARIFADOR" (p_data in date) as
cursor c_dados is
select linha
from dados_linha
where TRUNC(data_inclusao) = TRUNC(p_data);
--
v_dados dados_linha.linha%type;
begin
open c_dados;
loop
fetch c_dados into v_dados;
exit when c_dados%notfound;
--
begin
insert into dados_detalhe
( COD_CENTRAL,
COD_AUTORIZACAO,
DATA,
DURACAO_CHAMADA_FORMATADA,
LOCALIDADE,
HORA_DA_LIGACAO,
NUMERO_DISCADO,
TIPO,
CUSTO_COM_IMP_TARIFAS,
RAMAL,
PRESTADORA )
values
( decode(substr(v_dados,1,3),' ', null,to_number(substr(v_dados,1,3))),
decode(substr(v_dados,4,5),' ', null,to_number(substr(v_dados,4,5))),
TO_DATE(substr(v_dados,14,10),'DD/MM/RRRR'),
substr(v_dados,24,8),
substr(v_dados,32,25),
substr(v_dados,57,8),
substr(v_dados,65,10),
substr(v_dados,85,1),
decode(substr(v_dados,86,10),' ',null,to_number(substr(v_dados,86,10))),
decode(substr(v_dados,96,4), ' ', null,to_number(substr(v_dados,96,4))),
decode(substr(v_dados,100,3),' ', null,to_number(substr(v_dados,100,3))) );
--
exception
When Others Then
raise_application_error(-20001,'Erro v_dados-> '|| v_dados||' -> '||sqlerrm);
end;
end loop;
close c_dados;
end;