tblVar est un tableau dynamique de 0 Chaines
Ind est un entier
sCondition est une chaine
Rs est une source de donnees
Sql est une chaine

//On remplie un tableau avec les valeurs voulues
TableauAjoute(tblVar, "Allergie")
TableauAjoute(tblVar, "Asthme")
TableauAjoute(tblVar, "Machine")

//On construit la condition
Pour Ind = 1 a Dimension( tblVar)
  Si sCondition <> "" alors
    sCondition += RC + " OR "
  Fin
  sCondition += "[Difficultés] LIKE '%" + tblVar[Ind] + "%' "
Fin

//On construit la requête
Sql =
[
SELECT * 
FROM MaTable
WHERE [Difficultés] Like @Condition
FROM Table
]

//On execute la requete
Sql = Remplace( Sql, "@sCondition", sCondition )
Si pas HExecuteRequeteSql( Rs, HRequeteDefaut, Sql ) Alors
  Erreur( HErreurInfo())
  Retour
Fin

POUR TOUS RS
  //Traitement des données ici
FIN