Problème au niveau d'unité de programme

Bonjour à tous
J'ai problème au niveau de mon unité de programme
Au niveau de mon formulaire CONNEXION , j'ai crée un fonction MSGBOX dans l'unité de programme (Fonction avec non : MSGBOX) que voici :

Code:

---

1 2 3 4 5 6 7 8 9 10

FUNCTION MSGBOX (p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) ; RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END;

---

Et après compilation j'ai le message suivant :
PDE-PPU017 L'unité de programme source doit définir un corps ou package sous programme.
Avec bouton OK

J'aimerais savoir mon erreur et comment faire pour le resoudre .
Merci à vous.

Bonjour,

cela marchera mieux comme ca :

Code:

---

1 2 3 4 5 6 7 8 9 10

CREATE OR REPLACE FUNCTION MSGBOX(p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END; /

---

PS : Penses au balises

Bonjour
J'ai pas encore de bon resultat .
Je rappel que ma fonction c'est dans l'unityé de programme au niveau formulaire que je l'ecrit.Or vous m'avez donnez un create or replace function , c'est dire que je dois l'executer dans la base de donnée.
Lorsuqe je la met ds la BD j'ai comme resultat:
Erreur à la ligne 1
ORA-00955 : Ce nom d'objet existe déja
Comment voyez vous cela
Est t'il possible d'utiliser le create or replace fonction dans l'unité de programme?
Merci bien pour votre attention.

Je tiens a dire que j'ai essayer d'ecrire la nouvelle fonction que vous m'avez demamndé dans l'unité de programme .
J'obtient toujours le mème message :
PDE-PPUO17 l'unité de programme source doit definir un corps ou package sous programme .
Cette erreur à quoi est t'elle du ?
J'attend encore de lire votre espertise .
Merci beaucoup .

C'est pas du Forms ? :koi:

J'ai toujours pas résolu mon problème .
Lorsque je veux créer cette fonction dans la BD
J'ai : Erreur à la ligne 1
ORA-0955:ce nom d'objet exixte deja .

Citation:

---

Envoyé par Bayoro

J'ai toujours pas résolu mon problème .
Lorsque je veux créer cette fonction dans la BD
J'ai : Erreur à la ligne 1
ORA-0955:ce nom d'objet exixte deja .

---

que donne :

Code:

---

select * from all_objects where object_name = upper('Nom_de_ta_fonction') ;

---

Citation:

---

Envoyé par orafrance

C'est pas du Forms ? :koi:

---

Entièrement d'accord avec toi.
Il faut la créer dans forms.

Bonsoir
Je voudrais savoir que signifie :
PDE-PPU017 L'unité de programme source doit définir un corps ou package sous programme.

SELECT * FROM all_objects WHERE object_name = upper('Nom_de_ta_fonction') ;
L'execution de cette instruction me donne :

OWNER OBJECT_NAME
------------------------------ ------------------------------
SUBOBJECT_NAME OBJECT_ID DATA_OBJECT_ID OBJECT_TYPE
------------------------------ ---------- -------------- ------------------
CREATED LAST_DDL TIMESTAMP STATUS T G S
-------- -------- ------------------- ------- - - -
LOG MSGBOX
32387 PROCEDURE
30/03/08 30/03/08 2008-03-30:21:30:00 INVALID N N N

Citation:

---

Envoyé par Bayoro

Bonsoir
Je voudrais savoir que signifie :
PDE-PPU017 L'unité de programme source doit définir un corps ou package sous programme.

---

Citation:

---

PDE-PPU017: The program unit source must define a Subprogram Body or Package.

Cause: If you delete keyword PROCEDURE, FUNCTION in plsql editor .

Action: A program unit MUST begin with one of the following keywords:

PROCEDURE
FUNCTION
PACKAGE

---

drop ta procedure sous sql*plus et recrée dans forms

VINCEZO
J'ai supprimé la fonction dans la BD , puis je l'ais repris dans la forms , mais hélas j'ai encore le mème message d'erreur :
L'unité de programme doit definir un corps de package sous programme avec une étoile dans le nom de la fonction *MSGBOX.

Je comprends plus rien moi mème:oops:

Comment tu la crées dans forms ?

Je suis allé sur le formulaire (Connexion) , puis sur unité de programme.
Puis clic et lorsqu'on m'a demandé le nom , j'ai mis : MSGBOX , et j'ai mis ceci:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

FUNCTION MSGBOX (p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) ; RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END; FUNCTION MSGBOX (p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) ; RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END;

---

Escuse ma répétition :

Code:

---

1 2 3 4 5 6 7 8 9 10

FUNCTION MSGBOX (p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) ; RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END;

---

Salut,
Enlève ; seulement.
Essaie ça :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

FUNCTION MSGBOX (p_alert_id IN VARCHAR2, P_msg_text IN VARCHAR2) RETURN NUMBER IS Al_button NUMBER; BEGIN SET_ALERT_PROPERTY (p_alert_id, ALERT_MESSAGE_TEXT,p_msg_text); Al_button := SHOW_ALERT (p_alert_id); RETURN (al_button); END;

---

Je pense que je vais supprimer ce formulaire et le reprendre voir.

Bonsoir à tous
Pour finir je me suis passé de la fonction MSGBOX dans ma boite de connexion.
J'ai juste mi Message et je compile sans erreur.
Merci à tous et a très bientot vous ètes vraiment merveilleux et grace à vous nous le debutant sommes confiant au travail.
merci

:yaisse2:Ok Merci Salim1 , ah oui merci bien ca marche , lorsque je compile pas de problème , merci beaucoup à tous ppour le coup de main .
Savez comment ca fait plaisir d'avancer.
Merrrrrrrrrrrrrrrci .:king::D

Je crois que mon problème c'étais le point virgule après les paramètres de la fonction (;).
Merci bien j'èspère revenir avec d'autre chose qui me fairons avancé et decouvrir les délices d'Oracle Forms