Intégration des modifications après la présentation
remplacer la boucle par une procédure