HLitPremier(EXPRESS_REQ_Requête1,MaRubrik)
TANTQUE Répétition <= ZR_EXPRESS_REQ_Requête1.MaRubrik
// Indice de la rupture courante
DébutRupture = ZoneRépétéeIndiceRupture(RUPT_HautRupture1,Répétition)
FinRupture = ZoneRépétéeIndiceRupture(RUPT_BasRupture1, Répétition)
// Parcours des répétitions de la rupture courante
POUR Indice = DébutRupture A FinRupture
FIN
// Insertion de la ligne
TableInsèreLigne(TABLE_EXPRESS_REQ_Requête1,Indice)
TableEnregistre(TABLE_EXPRESS_REQ_Requête1)
// Passage à la rupture suivante
Répétition = FinRupture + 1
HLitSuivant(EXPRESS_REQ_Requête1)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=5334&post_id=22028