FRM-40200 :: Como pegar numa exception?

Dicas do Oracle Forms Builder - Blocos, Itens, LOV, Canvas, Triggers, comandos, PLL, d2kwutil, FMB, Alert, menus, etc
Responder
Trevisolli
Moderador
Moderador
Mensagens: 2016
Registrado em: Qua, 12 Jan 2005 3:25 pm
Localização: Araraquara - SP
Abraço,

Trevisolli
OCA Oracle PL/SQL Developer Certified Associate
OCP Oracle Forms Developer Certified Professional
Araraquara-SP

Pessoal,

Tem como eu pegar um erro do forms, como pego no pl/sql ?

Tipo

Selecionar tudo


IF SQLCODE = -00001
THEN 
   DBMS_OUTPUT.PUT_LINE('ERRO.');
END IF;


Muito obrigado.
tchuck
Rank: Analista Júnior
Rank: Analista Júnior
Mensagens: 70
Registrado em: Seg, 04 Dez 2006 9:22 am
Localização: Maringá

você já tentou concatenar no final
||Sqlcode
???
Trevisolli
Moderador
Moderador
Mensagens: 2016
Registrado em: Qua, 12 Jan 2005 3:25 pm
Localização: Araraquara - SP
Abraço,

Trevisolli
OCA Oracle PL/SQL Developer Certified Associate
OCP Oracle Forms Developer Certified Professional
Araraquara-SP

Então, brother...

Sobre concatenar no final, blzera.. sem erro...

O que eu tava querendo, era pegar o FRM-40200, ou outro qualquer...
E tratar este erro...

Sabe de alguma forma? Existe isso no forms?
Avatar do usuário
dr_gori
Moderador
Moderador
Mensagens: 5024
Registrado em: Seg, 03 Mai 2004 3:08 pm
Localização: Portland, OR USA
Contato:
Thomas F. G

Você já respondeu a dúvida de alguém hoje?
https://glufke.net/oracle/search.php?search_id=unanswered

Esse exemplo eu tirei da built-in ERROR_CODE. Veja se ajuda:

Selecionar tudo

/*  

** Built-in:  ERROR_CODE,ERROR_TEXT,ERROR_TYPE 
** Example:   Reword certain FRM error messages by checking 
**            the Error_Code in an ON-ERROR trigger 
** Trigger:   On-Error 
*/ 
DECLARE 
  errnum NUMBER       := ERROR_CODE; 
  errtxt VARCHAR2(80) := ERROR_TEXT; 
  errtyp VARCHAR2(3)  := ERROR_TYPE; 
BEGIN 
  IF errnum = 40301 THEN 
    Message('Your search criteria identified no matches...
              Try Again.'); 
  ELSIF errnum = 40350 THEN 
    Message('Your selection does not correspond to an employee.'); 
  ELSE 
    /* 
    ** Print the Normal Message that would have appeared 
    ** 
    ** Default Error Message Text Goes Here 
    */ 
    Message(errtyp||'-'||TO_CHAR(errnum)||': '||errtxt); 
    RAISE Form_Trigger_Failure; 
  END IF; 
END; 
Trevisolli
Moderador
Moderador
Mensagens: 2016
Registrado em: Qua, 12 Jan 2005 3:25 pm
Localização: Araraquara - SP
Abraço,

Trevisolli
OCA Oracle PL/SQL Developer Certified Associate
OCP Oracle Forms Developer Certified Professional
Araraquara-SP

Vlw Mestre.
Show de bola.
Responder
  • Informação
  • Quem está online

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