Afficher un message personnalisé après une transaction [Résolu]

[lido]

bonjour
j'utilise forms 10 g+oracle 10g
j'ai cree un module forms, dans lequel j'ai un bouton qui contient ce code :

Insert into Table
values .......
where .......;
commit;

le block qui contient le bouton n'est pas un block de données.L'insertion marche convenablement et aprés il m'affiche " AUCUNE MODIFICATION A ENREGISTRER"
je ne veux pas afficher ce message mais je veux afficher mon message par exple
TRANSACTION EFFECTUEE
comment faire ???

[McM]

Code :

1
2
3
4
5
:system.MESSAGE_LEVEL := 5;
commit;
:system.MESSAGE_LEVEL := 0;
message('Transaction effectuée');
message(' ');

[Devlop++]

Salut,
Excuser moi, McM c'est quoi la raison de cette instruction :

Envoyé par McM

Code :

[lido]

Envoyé par McM

Code :

est ce que tu peux qu est ce qu'elle fait
:system.MESSAGE_LEVEL := 0
et
:system.MESSAGE_LEVEL := 5

[Devlop++]

Envoyé par lido

est ce que tu peux qu est ce qu'elle fait
:system.MESSAGE_LEVEL := 0
et
:system.MESSAGE_LEVEL := 5

Salut,
:SYSTEM.MESSAGE_LEVEL indique le niveau d'affichage des messages de Forms. La valeur peut être : 0 (défaut),5,10,15,20,25

le mieux serait a mon avis :

declare
LN$MsgNum Pls_Integer := :System.Message_Level ;
begin
.
.
.
:System.Message_Level := 5 ;
commit;
:System.Message_Level := LN$MsgNum ;
.
.
.

[Devlop++]

Mais ce message vide j'aimerais comprendre l'utilité et l'explication de sa raison :
message('Transaction effectuée');
message(' ');

[lido]

Envoyé par Devlop++

Mais ce message vide j'aimerais comprendre l'utilité et l'explication de sa raison :
message('Transaction effectuée');
message(' ');

c pour afficher le message dans une boite de dialogue
comme une alerte

[McM]

En fait le premier message fait apparaitre le texte dans la barre d'état de la forme.
Le second c'est pour le faire apparaitre dans une fenêtre avec bouton Ok comme l'a dit Lido.
C'était pas demandé, c'est juste l'habitude qui m'a fait mettre ça (pour les debug)

[sofiane_bfm007]

salut,
vous créer une alerte nomer message
vous declarer
mes3 integer;

et inclure ce code apres votre code d'insertion

Code :

1
2
3
set_alert_property('message',title,'Confirmation');
   set_alert_property('message,alert_message_text,'Transaction terminer succée!'); 
   mes3:=show_alert('message');

ça va marcher,
bon courage.

[Devlop++]

Code :

1
2
3
set_alert_property('message',title,'Confirmation');
   set_alert_property('message',alert_message_text,'Transaction terminer succée!');                
   mes3:=show_alert('message');

il manquais une cote !

et doit être combiner avec

Code :

1
2
3
 :system.MESSAGE_LEVEL := 5;
commit;
:system.MESSAGE_LEVEL := 0;

mentionner par McM, avant d'afficher l'alerte.