Discussion :

[Bayoro]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[Vincent Rogier]

Bonjour,

cela marchera mieux comme ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Bayoro]

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.

[Bayoro]

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 .

[orafrance]

C'est pas du Forms ?

[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 .

[Invité]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[salim11]

C'est pas du Forms ?

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

[Bayoro]

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

[Bayoro]

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

[Vincent Rogier]

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

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

[Bayoro]

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

[salim11]

Comment tu la crées dans forms ?

[Bayoro]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[Bayoro]

Escuse ma répétition :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[salim11]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[Bayoro]

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

[Bayoro]

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

[Bayoro]

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 .

[Bayoro]

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