NAME: juldate
OBSOLETE: you better use date2jul
PURPOSE: gives julian date equivalent of a date in vairmer
( yymmdd or yyyymmdd ) format
sets month, day and year to the corresp values
CATEGORY: bidouilles dates
CALLING SEQUENCE: date = juldate(930124)
INPUTS:date de la forme yymmdd ou yyyymmdd
KEYWORD PARAMETERS:
/VRAIDATE: pour ne pas transformer l''annnee 01 en 1901
/GRADS: if 1 le year le 49 then year = 2000+year
if 50 le year le 99 then year = 1900+year
OUTPUTS:date en jour julien
COMONTHON BLOCKS:
common.pro vraidate
SIDE EFFECTS:
l'annee 0 n'existant pas, qd year est nulle on calcule le
jour julien de l'annee -1.
COMPATIBLE AVEC L'AN 2000 !!!: une date de la forme yymmdd est
donvertit sous la forme yyyymmdd a l''aide de vraidate.
Attention, les variables globales year, month day sont attribuees