Pegar a linha do erro

[cleberzumba]

Pessoal, estou executando uma procedure e em caso de erro eu quero pegar a linha q deu erro nesta procedure e inserir em uma tabela de log. como eu faço para pegar essa linha do erro da procedure?

[Trevisolli]

Brother,

está trabalhando com LOOP?
Dá uma olhada neste exemplo:

Selecionar tudo

DECLARE 
 vlinha PLS_INTEGER := 0;
BEGIN
  FOR x IN 1..100
  LOOP
    BEGIN     
      vlinha := vlinha + 1;
      dbms_output.put_line('Teste ');
    EXCEPTION
      WHEN OTHERS THEN 
        raise_application_error(-20100, 'Erro na linha: '||vlinha||' Erro: '||SQLERRM);
    END;
  END LOOP;  
END; 

[cleberzumba]

valeu brother!!!