AVANTBOUT

Description

Cette action est appelée lorsqu'un bouton ou un menu a été actionné, avant l’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, ou restreinte 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 bouton s'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 par le bouton OK.

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