Help Procedure

Dúvidas, dicas e truques de SQL, Select, Update, Delete, cláusulas, operações com joins, Funções em SQLs, etc
  

Poston Fri, 02 May 2008 4:02 pm

Guys, where I must include the date as parameter in this script?


: Script
Code: Select all
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;
mariogus
Location: Porto Alegre - RS

Poston Mon, 05 May 2008 7:59 am

This Included!
PROCEDURE \"SP_ATUALIZA_TARIFADOR\" ( p_data in date)
bertosro
Location: São Paulo - SP

Bertosro
MSN / TALK - roberto.fernandes@gmail.com



Return to SQL

Who is online

Users browsing this forum: No registered users and 3 guests