1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
| sFic , sLig est une chaine
nf , nColCLE , nColDate est un entier
oldCle , cle est une chaine
oldDate, date0 est une chaine
sFic = "monFichier.csv"
nColCle = 1
nColDate = 2 // Je pars du principe que la clé est la première colonne du fichier, et la date en 2ème colonne.
nf = fouvre( sfic)
lig = flitligne(nf) ; cle = extraitchaine(slig, ncolCle, ";") ; date0 = extraitchaine(slig, ncolDate, ";") // j'imagine que le séparateur, c'est ;
tantque lig <> EOT
oldCle = cle
oldDate = date0
tantque lig <> EOT _et_ cle = oldCle
lig = flitligne(nf) ;
si lig <> EOT alors
cle = extraitchaine(slig, ncolCle, ";") ; date0 = extraitchaine(slig, ncolDate, ";")
fin
fin
tableajouteligne( tableanalyse, oldCle, olddate, date0 )
FIN
fferme(nf) |
Partager