[Forms 9i] RAISE_APPLICATION_ERROR

Bonjour,

En parcourant la gestion des exceptions dans la doc, j'ai écrit la procédure suivante sous Forms 9i :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

PROCEDURE APPLIQUER_FORMULES(LC_formule IN OUT B03FS.FS_FORMULE_QTE%TYPE) IS LC_oeno VARCHAR2(15); LC_pa_simule B0337.T37_CODE%TYPE; LC_pattern_concentration VARCHAR2(60) := '<CONCENTRATION>'; LC_pattern_pa_simule VARCHAR2(60) := '<([[:alnum:]]{5})>'; LC_pattern_spec VARCHAR2(60) := '<SPECIFICATIONS'; BEGIN DEFAULT_VALUE('<NULL>', 'GLOBAL.GC_liste_PA_simules'); IF :GLOBAL.GC_liste_PA_simules = '<NULL>' THEN Raise_Application_Error(-20606, 'Application de la formule B03FS impossible.'); END IF; ...

---

Cependant, à la compilation j'obtiens un message d'erreur stipulant :

Citation:

---

identifier 'RAISE_APPLICATION_ERROR' must be declared

---

Pourquoi est-ce que je ne peux utiliser cette commande sous Forms 9i ?

Parce que ce n'est pas une commande reconnue par forms.

Sous forms, l'équivalent est :

Code:

---

1 2	message ('Application de la formule B03FS impossible.'); raise form_trigger_failure;

---

Salut plaineR,

Citation:

---

Envoyé par plaineR

Parce que ce n'est pas une commande reconnue par forms.

---

Ah !

Du coup j'ai 2 questions :
1/ comment savoir quand je lis la doc "PL/SQL User's Guides and References" si les commandes qui y figurent sont reconnues par Forms (la plupart le sont mais pas EXECUTE IMMEDIATE, RAISE_APPLICATION_ERROR, etc.) ?

2/ comment gérer avec une simple RAISE FORM_TRIGGER_FAILURE le cas suivant :

Code:

---

1 2 3 4 5 6 7

CREATE OR REPLACE PROCEDURE P1 IS BEGIN ... P2; ... END;

---

sachant que P2 peut lever une exception (ce que j'essayais de faire avec RAISE_APPLICATION_ERROR) et que dans P1 je veux distinguer le cas avec erreur de celui sans ?

Ce que je veux faire me semble à faire mais sans RAISE ou RAISE_APPLICATION_ERROR j'avoue que je me sens perdu :roll:

Merci mon cher plaineR

Citation:

---

Envoyé par Magnus

1/ comment savoir quand je lis la doc "PL/SQL User's Guides and References" si les commandes qui y figurent sont reconnues par Forms (la plupart le sont mais pas EXECUTE IMMEDIATE, RAISE_APPLICATION_ERROR, etc.) ?

---

En essayant ;) , je ne vois pas d'autres solutions, je ne pense pas qu'il y ait de doc qui indique les fonctionnalités PL non utilisables par forms.

Citation:

---

Envoyé par Magnus

2/ comment gérer avec une simple RAISE FORM_TRIGGER_FAILURE le cas suivant :

Code:

---

1 2 3 4 5 6 7

CREATE OR REPLACE PROCEDURE P1 IS BEGIN ... P2; ... END;

---

sachant que P2 peut lever une exception (ce que j'essayais de faire avec RAISE_APPLICATION_ERROR) et que dans P1 je veux distinguer le cas avec erreur de celui sans ?

---

Essaie juste après l'appel de p2 :

Code:

---

if not form_success then

---

Si cela ne fonctionne pas, rien ne t'empêche de créer un entête de package et d'y déclarer des exceptions :

Code:

---

1 2 3

PACKAGE pack_except IS err_p2 exception; END;

---

Dans P2 :

Code:

---

1 2 3

.... raise pack_except.err_p2; ....

---

Dans P1 :

Code:

---

1 2 3 4 5 6 7 8 9

.... begin p2; .... exception when pack_except.err_p2 then .... end; ....

---

Citation:

---

Envoyé par plaineR

En essayant ;) , je ne vois pas d'autres solutions, je ne pense pas qu'il y ait de doc qui indique les fonctionnalités PL non utilisables par forms.

---

Question en bois, réponse en bois :wink:

Concernant tes 2 propositions, j'avais aussi pensé à FORM_SUCCESS mais j'ai finalement opté pour l'utilisation d'un argument de type IN OUT dans la procédure P2 que je teste au retour de l'appel dans P1.

Merci du coup de main.