dD est une date
info(dD..Mois) // affiche le mois de la date
PROCEDURE PremierDuMois(pDate est une date)
pDate..jour=1
Renvoyer pDate
PROCEDURE DernierDuMois(pDate est une date)
// se place au début de mois
pDate..jour=1
// avance d'un mois
pDate..mois+=1
// remonte d'un jour = fin du mois courant
pDate..jour-=1
Renvoyer pDate
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=1798&post_id=7495