Fonction WeekDateExpand
La fonction WeekDateExpand permet de convertir une valeur date en ses constituants élémentaires de date par semaine. Une date par semaine est constitué d ’une année, d ’un numéro de semaine et d ’un jour dans la semaine et est notée par exemple 1999-W45-5 (le W est optionnel).
WeekdateExpand( valeurdate, &an, &semaine, &jourdesemaine, &heure, &min, &sec): status
Sisal applique strictement le calcul de semaine défini par l ’ISO, c ’est à dire que l ’on peut avoir des jours de l ’année qui sont noté dans l ’année précédente ou dans l ’année suivante.
Par exemple:
|
Date grégorienne |
Date de semaine |
|---|---|
|
1/1/1999 |
1998-W53-5 |
|
6/12/1999 |
1999-W49-1 |
|
1/1/2000 |
1999-W52-6 |
La fonction attend en premier paramètre une valeur date, et pour les paramètres successifs des variables qui contiendront les valeurs calculées à l ’issue de l ’exécution de la fonction. Tous les paramètres sont optionnels en partant des derniers, hormis ValeurDate et an.
|
Paramètre |
Description |
|---|---|
|
an |
Rend le numéro de l ’année entre 1970 et 2038 |
|
semaine |
Numéro de semaine ( 1 - 53) |
|
JourDeSemaine |
Jour dans la semaine ( 1 Lundi - 7 Dimanche) |
|
heure |
Heure ( 0 - 23) |
|
min |
Minute (0 - 59) |
|
sec |
Seconde ( 0 - 59) |
La fonction rend le nombre de variable valorisée, ou indéfini en cas de défaut dans les paramètres.
L ’exemple suivant nous donne le numéro de semaine courante dans la variable semaine.
Var an; semaine; Begin WeekDateExpand( Now(), an, semaine); end