julian dates

[lyric]

Is there a way to convert dates in mm/yy/dd format to a Julian date using Cobol/400?

Thanks.

 

[Thane]

First convert the date to YYYYMMDD, then use

compute temp-num = Function Integer-of-date (the-date-yyyymmdd)

Then

compute the-julian-date-YYYYDDD = function day-of-integer (temp-num)


[sig][/sig]