Limpar Campo quando ocorrer uma mensagem

[priajf]

Boa Tarde Pessoal

Como faço para limpar um campo depois de uma mensagem. WAR

Selecionar tudo

Set_Alert_Property('war_alert', ALERT_MESSAGE_TEXT, 'Lotes não enviados. Deseja Receber?');
                 alert_button := Show_Alert('war_alert');
                        IF alert_button = alert_button2 THEN
                        	controle_DE_MSG('NOT','O recebimento dos lotes foi cancelado!');
                        :nr_lote := null;
                        :nr_controle := null;
                        :nr_dv := null;
                        end if; 

Situação é a seguinte.
Tenho uma tela

Selecionar tudo

 :nr_lote1 ---- :nr_controle1 -----:nr_dv1
          :nr_lote2 ---- :nr_controle2 -----:nr_dv2
          :nr_lote3 ---- :nr_controle3 -----:nr_dv3
          :nr_lote4 ---- :nr_controle4 -----:nr_dv4

recebo o primeiro lote, onde está tudo certo, sem aparecer a mensagem. E direto já pula para o :nr_lote2. E assim por diante. Se eu recebo um lote onde aparece a mensagem, com opção SIm ou CANCELAR. Se clico em SIM salva normalmente. Quando clico em cancela, limpa os campos na linha 2.(lembrando que tanto o sim, quando o cancelar o cursor fica num campo em branco), porem quando cancela e salva da mensagem que é obrigatório. Sendo que precisava q só salvasse.
Não sei se deu pra entender o problema
Mais desde já agradeço a Ajuda

[Diego_Mello]

Buenas.

Não entendi a tua explicação, mas imagino que na tua mensagem de erro deve ter um RAISE.
Logo, se tu por a msg pra baixo deve resolver.

Assim:

Selecionar tudo

set_alert_property('war_alert', alert_message_text, 'Lotes não enviados. Deseja Receber?');
alert_button := show_alert('war_alert');
IF alert_button = alert_button2
THEN
	:nr_lote := NULL;
	:nr_controle := NULL;
	:nr_dv := NULL;
	controle_de_msg('NOT', 'O recebimento dos lotes foi cancelado!');
END IF;

[priajf]

Consegui fazer com
go_block('nr_lote');
clear_Record;


valeu pela ajuda