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