Exemple d'utilisation de la commande HErreur

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués

L'exemple suivant permet de traiter les différentes erreurs et sous erreurs apparaissant lors de l'importation d'une vue dans un fichier.

MaVue est une source de données
...
// Mise à jour des enregistrements de la vue dans le fichier d'origine
SI PAS HVueVersFichier ( MaVue ) ALORS
// il y a eu une erreur pendant la mise à jour du fichier
Info ( "Erreur pendant HVueVersFichier : " + HErreurInfo ())
// on affiche tous les enregistrements qui posent problème
nErreur est un entier = HErreur ( HSousErrPremier )
// parcours des sous erreurs
TANTQUE nErreur <> HSucces
   // affichage de l' erreur
   Info ( HErreurInfo ()+ RC +...
      "numéro de l ' enregistrement dans la vue : " +...
        HErreurInfo ( HErrNumEnr ))
    // sous-erreur suivante
   nErreur = HErreur ( HSousErrSuivant )
    FIN
FIN