AVANTBOUT

Description

Cette action est appelée lorsqu'un bouton ou un menu a été actionné, avantl’exécution du traitement lié à ce bouton ou menu.

Type d'OBJet

Simple, Tableau, Combiné

Transaction

Non

Utilisation

On peut par exemple, contrôler les droits d’accès à ce bouton ou menu, ourestreinte les possibilités en cas de tunnel sur un OBJet avec la variable GCONSULT.On connaît le code bouton par la variable BOUT.

GCONSULT = 0  accès sans restriction.
GCONSULT = 1 accès à toutes les fiches en lecture.
GCONSULT = 2 accès à la fiche courante en lecture.

   on empêche l'exécution du bouton ou menu par la variable OK=0

   on affiche un message par la variable GERR = 1, 2 ou 3.
    attention ! fonction de la valeur de GERR, le boutons'exécutera ou pas, ceci quelque soit la valeur de la variable OK.
    GERR=1    pas d'exécution du bouton
    GERR=2    exécution du bouton
    GERR=3    exécution du bouton si réponse parle bouton OK.

Cela signifie que si l'on veut interdire le bouton et envoyer un messaged'information : On positionnera OK=0, mais pas GERR=2 que l'on remplacera parCall MESSAGE ( message ) From GESECRAN.