slt tlm,dsl de vous déranger mais je cherche depuis 1h comment comparer deux date (une que l´on inscrit et l´autre le 01/01/0001) afin de pouvoir grace a une division avec reste de trouver le jour.
nb_de_jour % 7 = 0 ==> lundi
nb_de_jour % 7 = 1 ==> mardi
....

merci d´avance ^^

ps:si vous connaissé une meilleur méthode n´hésité pas

mon prof de math aurait répondu : ev ls abrvs.

Je ne conait pas le cobol, mais ou bien il y a l´instruction miracle dans le langage (genre datediff par exemple) ou bien il n´y en a pas.
Dans ce cas là tu doit procéder petit à petit : tu regarde l´année, puis le mois, puis le jour, pour compter le nombre de jours total qui sépare tes deux dates.

Je te conseille d´ailleurs de ne pas commencer en l´an 1, mais plutôt en 1900 par exemple ça permet d´éviter les erreurs de calendrier et ce genre de chose qui n´ont pas été fixé tout de suite (le comptage des années lui même ne date que du 5ème siècle).

Je suis comme dnob700 pour le cobol mais mon idée sur le fonctionnement du langage et surtout sa date de création me font penser que cette fonction n´existe pas. Enfin tente une recherche Google, ça peut marcher.

tu veux pas déclarer une variable nbjours plutot? :p
que je sache pour l´instant pas de format de date, je le verrai peut etre plus tard cela dit... pour l´instant on prend un nombre de jours pour avoir la date suite a des divisions avec reste... et inversement avec des multiplications pour avoir le nombre de jours ^^

tlm,

Non, je confirme pas de fonction en COBOL. Pour faire ton calcul sur les dates tu dois tout de taper à la main
Déjà déclare tes 2 dates en comme ça :
01 W-DATE.
05 DATE-JJ PIC XX.
05 FILLER PIC X.
05 DATE-MM PIC XX.
05 FILLER PIC X.
05 DATE-SSAA PIC X(4).
ça te permettra de récupérer facilement les chiffres pour tes calculs.

Ensuite tu fais la différence entre jours, mois et années et tu ramènes tous en jours. Attentions aux années bissextiles, tu sais comment les déterminer ? Sinon je te donne aussi le calcul.
Et pour trouver le reste d´une division c´est :
DIVIDE truc BY machin GIVING bidule REMAINDER le_reste.