I use the following function to get 5 digit julian date. Just pass it a date
LPARAMETERS peff_date
yr = RIGHT(STR(YEAR(peff_date)),2)
jday = STR(VAL(SYS(11,peff_date)) - VAL(SYS(11,DATE(year(peff_date)-1,12,31))))
julian_date = ALLTRIM(yr) +PADL(ALLTRIM(jday),3,"0")
RETURN julian_date
Gaylen
>Hi all,
>
>I am using Visual Foxpro 6.0 and I want to convert Julain Date (format CYYDDD : C = Century, YY = Year, DDD = Days 1 to 366) to dd/mm/yyyy. Pl. Help. Thanks in Advance.
>
>
>Regards
>
>Ashish