nDate est un entier
nDateDebut est un entier = <Date de debut>
POUR i=1 A nbrCopie
nDate = DateVersEntier(nDateDebut+(i-1))
<Fichier>.<RubriqueDate>=EntierVersDate(nDate)
<Fichier>.<Rubrique1>= <Saisie1>
<Fichier>.<Rubrique2>= <Saisie2>
...
<Fichier>.<RubriqueN>= <SaisieN>
HAjoute(Fic_client)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1376&post_id=5604