ERRN |
errnpermet de connaître le numéro d'une erreur générée dans un traitement Adonix.
errn
#-- EXEMPLE 1
# Division par 0 : interception de l'erreur
Onerrgo ERR
I = 1 / 0
End
ERR
# Affichage du message : erreur no 53 en ligne3
Errbox "erreur no"-num$(errn )-"en ligne"-num$(errl)
End
#-- EXEMPLE 2
# Gestion des erreurs dans l'évaluation d'une chaînecalculée
Local Char FORMULE(100), RESULTAT(100)
Local Integer ERN
# En cas d'erreur, aller en ERCALC, où ERN sera mis àjour.
Onerrgo ERCALC
# Traduction des mots-clés
FORMULE = "date$$"
ERN = 0
# on évalue la formule et on la formatte enchaîne.
# vireblc supprime les espaces superflus.
RESULTAT = vireblc(format$("K:100X",evalue(FORMULE)), 2)
# Si ERN est non nul, on est passé par ERCALC
# affichage du message : "Erreur en calcul :caractère illégal"
If ERN
Errbox "Erreur en calcul :"-errmes$(ERN)
Endif
End
# Sous-programme de gestion d'erreur : errn aun sens ici seulement
ERCALC
ERN =errn
Resume
errn
Ce numéro d'erreur n'a de sens que dans un sous-programme de gestiond'erreur appelé par Onerrgo. Dans les autres cas, sa valeur peut ne pas êtresignificative.
La liste des erreurs et des codes d'erreurs est référencée dans les annexesdu manuel de programmation.
Pas d'erreur associée.
ERRL - ERRP - ONERRGO - ERRBOX - ERRMES$ - ERRM
Adonix X3(r) L4G |