clalev permet de déterminer si une classe de variables est accessible ou non depuis l'application courante.
clalev( < classe |exp_num > )
Elément | Description | Restrictions |
classe | Désignation d'une classe. | Aucune. |
exp_num | Expression numérique désignant une classe. | exp_num >= 0 |
# Liste des classes accessibles dans l'application courante
Local integer, NBCLANBCLA = 200
I = 1
Repeat
If clalev( I ) <> 0
Infbox clanam( I )
Endif
I += 1
Until I > NBCLA
# Sortie d'un sous-programme pouvant être appelé par "tunnel"
Close Local File [CLF]
If clalev([F:CLF]) and CLECUR <> ""
Read [CLF]CODCLF = CLECUR
Endif
clalev permet de déterminer si une classe dont l'abréviation ou le numéro interne est donné en argument, est utilisée ou pas. Si elle l'est, la fonction retourne la valeur 1, dans le cas contraire, elle retourne 0. Le numéro interne (utilisé par Adonix) correspond au numéro de ligne dans la liste des classes de variables affichées dans le debugger, et commence à 1.
Le résultat de la fonction est de type Integer.