DESCRIPTION.

La fonction FN_readdate() retourne le nombre de jours entre une date donnée et le Jour Julien Modifié.

SYNTAXE.

kvaleur = FN_readdate( date , ordre , annee )

REMARQUES.

date doit être être une chaine de caractère exprimant, sous une forme ou une autre une date valide comprise entre le 01/01/0001 et le 31/12/9999.

ordre indique l'ordre des différents éléments de la date dans date. ordre peut valoir : 

- "dmy", l'ordre des éléments dans dans est jour mois année ;

- "mdy", l'ordre des éléments dans dans est mois jour année ;

- "ymd", l'ordre des éléments dans dans est année mois jour ;

- "ydm", l'ordre des éléments dans dans est année jour mois ;

- "dym", l'ordre des éléments dans dans est jour année mois ;

- "myd", l'ordre des éléments dans dans est mois année jour.

annee doit être un nombre entier. annee sera utilisé pour analyser date si l'année n'est pas exprimée par 4 chiffres. Si seuls les deux derniers chiffres de l'année sont spécifiés dans date, annee correspond à l'année minimale à renvoyer. Par exemple, si annee vaut 1900, les années à deux chiffres correspondent aux années comprises entre 1900 et 1999 inclus.

La fonction FN_mjd() retourne le nombre de jours entre la date et le 17/11/1858. Les dates antérieurs retourneront une valeur négative.

La fonction FN_mjd() tente d'analyser le plus précisément possible date, quel que soit son format, tnt que les éléments soient dans l'ordre spécifié. Par exemple, elle accepte "8/7/1993", "08 Jul 93", "08-07-93", etc. Si  fonction FN_mjd() n'arrive pas à comprendre date, elle renvoie la valeur &80000000 sera retournée.

Rappel : les fonction du module datelib.bbc prennent comme la date origine, ou le moment 0, le Jour Julien Modifié, ou MJD 0, qui est une variante du Jour Julien Astronomique, ou AJD, qui a été définie pour simplifier les calculs. La formule reliant les jours juliens modifiés et les jours juliens astronomiques est la simple translation : MJD = AJD - 2 400 000,5.  Cette formule a pour effet de déplacer la date origine au 17 novembre 1858 à 0 heure (17/11/1858 00:00:00).

La fonction FN_readdate est importée depuis le module datelib.bbc. 

EXEMPLE.

INSTALL @lib$ + "datelib.bbc"

PRINT FN_readdate( "8/7/1993" , "dmy" , 3000 )

PRINT FN_readdate( "Jul 08 93" , "mdy" , 1900 )

PRINT FN_readdate( "93-07-08" , "ymd" , 1980 )

PRINT

PRINT FN_readdate( "08/07/1993" , "mdy" , 1900 )

PRINT FN_readdate( "08/07/1993" , "ymd" , 1900 )

PRINT FN_readdate( "08/07/1993" , "dym" , 1900 )

END