Procedure LitBuffer(sbuff est une chaîne)
sLigne est une chaîne
sLigne = ExtraitChaîne(sbuff,rangPremier,RC)
//Appel du traitement de la ligne
TANTQUE sLigne <> EOT
sLigne = ExtraitChaîne(sbuff,rangSuivant,RC)
//Appel du traitement de la ligne
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=2408&post_id=10143