Enregistrement courant

Bonjour

Ce code
<code 4D>
CHERCHER([Synchro];[Synchro]Type=“Document”)
Si (Enregistrements trouvés([Synchro])#0)
Boucle ($i2;1;Enregistrements trouvés([Synchro]))
Process_Thermo ("Synchronisation document : "+[Synchro]Document_Nom_Document)
Synchro_Maj_Document ([Synchro]Etat)
LIBÉRER ENREGISTREMENT([Synchro])
ENREGISTREMENT SUIVANT([Synchro])
Fin de boucle
Fin de si
</code 4D>

La méthode Synchro_Maj_Document
<code 4D>
C_ENTIER LONG($1;$Erreur)

//$1 1=ajout 2=modif 3=suppression

Au cas ou
: ($1=1) //ajout
CRÉER ENREGISTREMENT([Documents])
[Documents]Commentaire:=[Synchro]Document_Commentaire
STOCKER ENREGISTREMENT([Documents])
LIBÉRER ENREGISTREMENT([Documents])
Fin de cas
</code 4D>

Sur 2 enregistrements trouvés dans la table Synchro, lors de la boucle 1, le premier enregistrement est bien chargé, lors de la boucle 2, je perds l’enregistrement courant, une idée :?: