Enviando Mensagem Alerta

Dicas do Oracle Forms Builder - Blocos, Itens, LOV, Canvas, Triggers, comandos, PLL, d2kwutil, FMB, Alert, menus, etc
Responder
ralm
Rank: Estagiário Júnior
Rank: Estagiário Júnior
Mensagens: 2
Registrado em: Qui, 31 Jan 2008 2:37 pm
Localização: São Paulo - SP

Boa tarde pessoal estou iniciando meus estudos com oracle forms e como está difícil achar algo na internet vou pesquisando pouco a pouco nos fóruns... Queria saber como faço quando eu clico no botão e aparece uma mensagem em forma de alert. Outra coisa seria como faço para um campo texto receber um valor digitado em um outro campo.

Abs.
gokden
Rank: DBA Pleno
Rank: DBA Pleno
Mensagens: 264
Registrado em: Dom, 19 Ago 2007 8:18 pm
Localização: Ribeirão Preto - SP
Lucas de Souza

OCA Developer
Analista de sistemas

assim, para mostrar um ALERT é bem simples....

primeiro você tem que criar o ALERT, no forms... e configura lá algumas coisas..
e depois você poe isso na ação...

Selecionar tudo

v_alert      number(2);
---
SET_ALERT_PROPERTY('MENSAGEM', alert_message_text, 'Deseja salvar as alterações ?');
SET_ALERT_PROPERTY('MENSAGEM', title, 'Salvar alterações');
v_alert := SHOW_ALERT('MENSAGEM');
---
e para um campo texto receber o valor digita seria assim....

Selecionar tudo

:bl_texto.campo1 := :bl_texto.campo2;
cron_rj
Rank: Programador Júnior
Rank: Programador Júnior
Mensagens: 25
Registrado em: Qua, 19 Dez 2007 9:10 am
Localização: Rio de Janeiro RJ

Tenho um procedimento aqui para tratar mensagens, deve te ajudar...

Selecionar tudo

PROCEDURE msg_alert( errm IN VARCHAR2,           /* message */
                     errt IN VARCHAR2,           /* message type */
                     rftf IN BOOLEAN         /* raise form_trigger_failure ? */
                    ) 
IS      /* message parameters */
/*
* ----------------------------------------------------------------
* CHANGE HISTORY:
* DATE   PERSON      CHANGE
* ------ ----------- ---------------------------------------------
*
*/

   alert_is     ALERT;
   alert_button NUMBER;

BEGIN
        
   IF (errt = 'F')
   THEN 
      alert_is := FIND_ALERT('CFG_SYSTEM_ERROR');
   ELSIF 
   	  (errt = 'E')
   THEN 
      alert_is := FIND_ALERT('CFG_ERROR');
   ELSIF 
   	  (errt = 'W')
   THEN 
      alert_is := FIND_ALERT('CFG_WARNING_A');
   ELSIF 
   	  (errt = 'I')
   THEN 
      alert_is := FIND_ALERT('CFG_INFORMATION');
   ELSE 
   	  MESSAGE(errm);
   END IF;
     
   IF( errt IN ('F','E','W','I') )
   THEN 
      SET_ALERT_PROPERTY(alert_is,ALERT_MESSAGE_TEXT,errm);
      alert_button := SHOW_ALERT(alert_is);
   END IF;

   IF( rftf )
   THEN
      RAISE FORM_TRIGGER_FAILURE;
   END IF;
END;
Na trigger "WHEN-BUTTON-PRESSED' , chame o procedimento MSG_ALERT, passando os parametos corretos.
NaPraia
Rank: Analista Júnior
Rank: Analista Júnior
Mensagens: 88
Registrado em: Sex, 22 Fev 2008 8:24 am
Localização: Floripa - SC

beleza, estou com um probleminha chato para resolver.
Criei um alert para o usuário confirmar a exclusão e que funciona por registro. Se ele apagar 3 registros, na hora que for dar o commit (salvar) aparece a mensagem 3 vezes - que é isso que eu quero que aconteça. Só que eu queria que mostrasse o ID do registro que está sendo apagado.
vocês sabem como é que eu posso fazer isso??
NaPraia
Rank: Analista Júnior
Rank: Analista Júnior
Mensagens: 88
Registrado em: Sex, 22 Fev 2008 8:24 am
Localização: Floripa - SC

valeu mesmo assim,
eu estava usando o Set_Alert_Property de forma errada
Responder
  • Informação
  • Quem está online

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