"Menchoix" permet d'identifier la fonction courante par son numéro interne.
# extrait du traitement superviseur MENU :
# choix d'une fonction
Global Onevent ITM_MENU Call MENU From EXEFNC
actihgup(1) = "FIN" : # Traitement de déconnexion
Men =GMENDEP
Goto FIN# extrait du traitement superviseur EXEFNC :
# exécution d'une fonction
Local Integer NUMFONC
NUMFONC = menchoix
If clalev([F:AFC])=0 : Local File AFONCTION [AFC] : Endif
Read [AFC]NUMFNC = NUMFONC