Go to most recent revision | Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 23 | reyssat | 1 | !!!!!!!!!!!!------- fichier pour nettoyer les reponses saisies -------!!!!!!!!!!!! |
| 2 | !!!!---- repsnb est le nombre de reponses a traiter ----!!!! |
||
| 3 | !!!!---- reps$(i) est la i-eme reponse ----!!!! |
||
| 4 | !!!!---- reps$(i)TF est une variable temoin de comparaison ----!!!! |
||
| 5 | !!!!---- alertreps$(i) est le verdict pour reps$(i) s'il n'est pas valide ----!!!! |
||
| 6 | !!!!---- NonValide contient le message a retourner a l'utilisateur ----!!!! |
||
| 7 | |||
| 8 | !for i=1 to $repsnb |
||
| 9 | reps$(i)TF=!translate internal ~`!@#$%&_=|\[]{}"':;,?<> to \ |
||
| 10 | $ $ in $(reps$(i)) |
||
| 11 | reps$(i)TF=!nospace $(reps$(i)TF) |
||
| 12 | reps$(i)TF=!deaccent $(reps$(i)TF) |
||
| 13 | !if $(reps$(i)TF)!=$(reps$(i)) |
||
| 14 | alertreps$(i)=$NonValide |
||
| 15 | reps$(i)= |
||
| 16 | !endif |
||
| 17 | !next i |