Contrôle d'une classe de tolérance

La fonction Classe_Controle de GMTM000 contrôle une classe de tolérance en saisie.
En cas d'erreur, si 'err' est renseigné, le message 'err' s'affiche et provoque le retour en saisie (si ce paramètre 'err' est renseigné avec C_ERR_ADEFINIR alors le numéro du message d'erreur est récupéré dans cette fonction).L'enregistrement lu est chargé dans GMCLASSE.
Si une date est renseignée, elle sera comparée à la date de fin validité de la classe. Si cette dernière est antérieure, un message sera alors affiché et la classe sera refusée.
Prototype de la fonction
Classe_Controle (Spec,SSpec1,SSpec2,ClasseNiv,err,dt)
Spec  : référence spécification
SSpec1  : Sous référence 1 spécification
SSpec2  : Sous référence 2 spécification
ClasseNiv : Rang de la classe
Err : Numéro du message d'erreur si on souhaite un affichage automatique.
(facultatif, par défaut 0)
Dt : Date de fin validité à tester (facultatif, par défaut ' ')
Retour de la fonction
0ok
2classe fermée
9enregistrement non trouvé