Bonjour,

Je vous propose un nouvel élément à utiliser : Tester No de Sirete

Permet de tester un No de Sirete par l'algorithme de Luhn

Paramètres d'Entrée No de Sirete, et indicateur d'erreur

En sortie indicateur d'erreur = 1 si le Sirete n'est pas bon, à 0 si le Sirete est bon

Il marche sur tout type de compilateur cobol , aucune spécificité d'un quelconque constructeur étant employé

Qu'en pensez-vous ?