Exemple d'utilisation de la commande HErreurIntegrite

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

Cet exemple permet de gérer les erreurs de l'intégrité lors de l'ajout d'un enregistrement dans le fichier CLIENT. La gestion automatique des erreurs a été préalablement désactivée (fonction HSurErreur ).

// Pas de gestion automatique des erreurs (doublons, intégrité, …)
HSurErreur(CLIENT,"")
SI PAS HAjoute(CLIENT) ALORS
    SI HErreurDoublon() ALORS
        Erreur("Erreur de doublon sur clé unique",HErreurInfo())
        RETOUR
    FIN
    SI HErreurIntégrité () ALORS
        Erreur(HErreurInfo())
        RETOUR
    FIN
FIN