Discussion :

[serme]

Bonjour à tous,

Dans mon form, j'effectue des suppréssions au moyen du declencheur ON-DELETE. Dans mon declencheur KEY-COMMIT, voici ce que j'ai mis:

Code :

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

1
2
3
4
5
6
7
Commit_Form;
If :SYSTEM.FORM_STATUS = 'QUERY' then 
  	Message( 'Suppréssion de l''approvisionnement  en base');
Else
	Message('Problème lors de la suppréssion de l''approvisionnement ');
	Raise Form_Trigger_Failure;
End if;

Mes enregistrements sont bien supprimés car un SELECT sous SQLPlus me permet de le confirmer mais le message de suppréssion ne s'affiche pas, au contraire le méssage de ma deuxième condition s'affiche. Je ne comprends pas pourquoi. Quelqu'un peut-il m'aider?

[SheikYerbouti]

Afficher le statut pour comprendre

Code :

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

message(:system.forms_Status);

[serme]

Merci à vous SheikYerbouti. La variable système :SYSTEM.FORM_STATUS me retourne NEW comme résultat.

[SheikYerbouti]

Il vaut mieux utiliser la valeur CHANGED

Code :

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

1
2
3
4
Commit_form ;
If :System.forms_Status = 'CHANGED' Then
  message( '*** form not committed   ***');
End if ;

[serme]

Merci beaucoup SheikYerbouti. Ca marche bien maintenant.Mais je ne comprend pas pourquoi le statut de ma form ne devient pas QUERY mais est NEW. Puisqu'il est dit que lorsque le COMMIT marche le statut de la form passe à QUERY.