mensagem não aparece

[Regina Andrade]

Pessoal,
tenho o código abaixo.
A primeira mensagem aparece, mas depois dela, não aparece nada.
Este código está na trigger when-validate-record de um bloco.
Não existe erro
Alguém tem idéia do que pode ser?

Selecionar tudo

Declare
	Col_Val				number;
	vItem					varchar2(30);
	vPrompt_Item	varchar2(30);
	Temp_Id			  Item;
  curr_row			NUMBER;
  curr_item 		varchar2(60);	
  w_Qtd					number;
Begin
  w_qtd := :Gme_Batch_Header.Qtd_Testes;
fnd_message.set_string('ENTROU NO WVR  '||to_char(w_qtd)); fnd_message.show;   
  --->>> Loop dos campos de Testes <<<---
  For j In 1..w_qtd Loop
    Col_Val      := 'CHARACTER'||j;
fnd_message.set_string('ENTROU NO LOOP '||COL_VAL); fnd_message.show;     
    vItem        := 'GME_TESTES.' || col_val;
    vPrompt_Item := 'GME_TESTES_PROMPT.' || col_val;
fnd_message.set_string('prompt_item'); fnd_message.show;       
    Temp_Id      := FIND_ITEM('GME_TESTES.'||col_val);
fnd_message.set_string('temp_id'); fnd_message.show;     
		--->>> Acessa os dados do campo <<<---
  	curr_row  := get_cur_rownum;
  	curr_item := name_in('SYSTEM.CURRENT_ITEM');
fnd_message.set_string('campo '||curr_item); fnd_message.show;  	
  	--->>> Consistencia somente para os Testes <<<---
  	If substr(curr_item,1,6) = 'CHARAC' then
      TESTES_VALIDACAO;
  	End If;
  End Loop;
fnd_message.set_string('ta saindo do wvr com '||:Qtd_Testes||' testes'); fnd_message.show;	  
Exception
When Others Then
  null;
End;]

Obrigada

[davidmeloboy]

Coloca uma mensagem com sqlerrm no exception pra ver se ta caindo la, e ver qual erro ta dando