Change Julian Date to Gregorian date ideas?

[wolves]

Need to change Julian Date to Gregorian Date.

Ex:
Julian date 04210 = gregorian date 072804.

On a mainframe computer. Any ideas?

Not sure how to go out and convert the dates.

 

[WMK]

If by "mainframe compiler" you are talking about a currently supported IBM compiler (or any other maintrame compiler that supports the '89 Standard Intrinsic Functions),

you can use the
INTEGER-of-DAY to get an integer from a YYYYDDD date

and use
DATE-of-INTEGER to get the date in YYYYMMDD format from that integer.

See:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg20/1.3.8.5.2

for example code.

Bill Klein

 

[TysonLPrice]

Depending on the version of COBOL you are using you can use the LE Callable Service routine "CEEDAYS", to convert the julian-date format to a lilian-date, followed by "CEEDATE", which will convert a lilian-date to a gregorian-date format (as well as many other formats).

 

[ShadowFox333]

On all Mainframes and PC's I have worked on
accept data-name from date. yields yymmdd.
then just move the data around.
Bob

 

[WMK]

ShadowFox333,
The question is not how to get today's date in Julian vs Gregorian - it is how to CONVERT a specific (random) date from one to another.

Bill Klein

 

[k5tm]

Time to drop in a reference to a neat book for those among us who like this kind of thing: Calendircal Calulations

I own one, but I have no other monetary interest

Tom Morrison

http://www.liant.com

 

[wolves]

thx all. great ideas. I went with WMK's suggestion and it seems fin.