Discussion :

[macben]

Bonjour

Comment savoir dans une liste d'enregistrements sous une application Forms, si une modification a eu lieu sur un champ (ex : suppression d'un enregistrement), de façon à pouvoir faire un commit si et seulement si cela vaut le coup :

[SheikYerbouti]

Le commit ne sauvegardera de toute façon que les changements.
Vous n'avez donc pas à vous en préocupper.

Si vous voulez vraiment le faire, vous pouvez tester la variable :SYSTEM.FORM_STATUS

Code :

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

1
2
3
IF :System.Form_Status = 'CHANGED' THEN 
  commit_form ;
END IF ;

[plaineR]

En regardant le statut de ton bloc ou de ta form :
pour le block :

Code :

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

if get_block_property ('monbloc', status' = 'CHANGED' then ...

ou pour le bloc courant :

Code :

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

if :system.block_status = 'CHANGED then ...

pour la form :

Code :

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

if :system.form_status = 'CHANGED' then ...

[macben]

[macben]

Je garde le même fil

apparemment le fait de supprimer un enregistrement dans une liste ne modifie pas le status du block

[SheikYerbouti]

bien sur que si !!!

[macben]

un

Code :

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

DELETE_RECORD

apparemment non.

Car je fais afficher la valeur :

Code :

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

MESSAGE('Valeur ' || GET_BLOCK_PROPERTY('BL_CTRL',STATUS));

et c'est toujours

QUERY

[orafrance]

Effectivement, je crois bien que le status ne change pas

Mais tu peux changer le status du bloc quand une ligne est supprimé via SET_BLOCK_PROPERTY je crois

[SheikYerbouti]

Sans doute votre bloc n'est pas basé ?

[macben]

en effet : bloc non basé

[orafrance]

bloc non basé qui fait un EXECUTE_QUERY ?

[macben]

Merci d'oser poser la question je n'osais pas.

J'apprend encore sous Forms et j'ai repris du code que je n'ai pas développé personnellement et ça m'a supris quand j'ai vu le que le bloc était non basé

[orafrance]

bah ça m'a pas l'air gagné