MaChaîne est une chaîne
HLitPremier(CODEPOSTAUX, CodePostal)
POUR I = 1 À 5
MaChaîne = MaChaîne + RC + ...
"ChampClone(Colonne2, """ + CODEPOSTAUX.Ville + """)"
MaChaîne = MaChaîne + RC + ...
"{""Table1." + CODEPOSTAUX.Ville + ...
"""}..Libellé = """ + CODEPOSTAUX.Ville + """"
HLitSuivant(CODEPOSTAUX)
FIN
Compile("CreationColonnes", MaChaîne)
ExécuteTraitement("CreationColonnes", trtProcédure)