POUR i = 1 a tableoccurrence(Table_Bouteilles_Consommables)

SI Table_bouteilles_consommables.Année[i] > boirejusque ALORS

Table_bouteilles_consommables.attention[i]..PoliceGras= vrai
Table_bouteilles_consommables.attention[i] ="!"
Table_bouteilles_consommables.attention[i]..Couleur=iBlanc
Table_bouteilles_consommables.attention[i]..CouleurFond=iRougeFoncé

sinon

Table_bouteilles_consommables.attention[i]..PoliceGras= faux 
Table_bouteilles_consommables.attention[i] = ""
Table_bouteilles_consommables.attention[i]..Couleur= icouleurdefaut
Table_bouteilles_consommables.attention[i]..CouleurFond= i couleurdefaut

FIN

Fin