Je vois pas trop l'utilité d'un tel fichier mais bon ^^.
// Pour Récupérer le jours en lettre utilise les fonctions 'DateVers...EnLettre'
DateVersJourEnLettre(20080101) = Mardi // ou DateVersJourEnLettre(MaDate)
// Pour naviguer dans les Dates utilise une variable 'Date' que tu initialise comme :
// Aujourd'hui
MaDate est un Date = Datesys()
// Hier
MaDate-- // ou MaDate..jour-=1
// Un mois plus tard
MaDate..mois++
// Etc...
///////////////////////////////////////////////////////////////////////////////////
///////////////////////// SINON POUR TA BOUCLE ///////////////////////////
//Commence par déclarer un variable de type 'Date'
MaDate est une Date
// Des compteurs pour une boucle
i est un entier
// On initialise la date
MAdate..année = 2xxx
MaDate..mois = 1
MaDate..jour = 1
// On boucle tantque l'année n'est pas finit...
TANTQUE MaDate..jour<>31 ET MaDate..Mois<>12
//...
// Traitement de ton choix
//...
FIN
CQFD.
Maintenant bosse feignasse
__________________________
Quand le sage montre la lune, l' idiot regarde le doigt...