Comment transferer des enregistements entre deux fichiers

Ce transfert ne concerne que des ficheirs de même structure.

HCopieEnreg suivi de HAjoute est la méthode basique pour effectuer cette opération.

Le code suivant est d'autant plus efficace qu'il y a d'enregistrements à copier :

cR = hlisterubrique(F1)
eF = fOuvre(cF, foCréation+foLectureEcriture)
HLitPremier(F1,C1)
TANTQUE PAS HEnDehors(F1)
	fEcritLigne(efic,HRécupèreEnregistrement(F1)) HLitSuivant(F1,C1)
FIN
fFerme(eF)
HImporteTexte(F2,cF,cR,TAB + Caract(127) + """" + Caract(127) + RC,hImpSansDélimiteur)
fSupprime(cF)