Ajuda Procedure

Dúvidas, dicas e truques de SQL, Select, Update, Delete, cláusulas, operações com joins, Funções em SQLs, etc
mariogus
Rank: Analista Sênior
Rank: Analista Sênior
Mensagens: 157
Registrado em: Sex, 30 Nov 2007 1:17 pm
Localização: Porto Alegre - RS

Pessoal,

Onde devo incluir a data como parâmetro nesse script?


Script:

Selecionar tudo

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;
bertosro
Rank: Analista Júnior
Rank: Analista Júnior
Mensagens: 88
Registrado em: Sex, 18 Ago 2006 11:13 am
Localização: São Paulo - SP
Bertosro
MSN / TALK - roberto.fernandes@gmail.com

Já Esta Incluida!
PROCEDURE "SP_ATUALIZA_TARIFADOR" (p_data in date) as
Responder
  • Informação
  • Quem está online

    Usuários navegando neste fórum: Nenhum usuário registrado e 9 visitantes