Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Date conversion

Status
Not open for further replies.
Apr 12, 2001
29
0
0
US
I'm trying to use Crystal Report Writer to create some reports off of JDE. Problem is that I can seem to convert their dates.

JDE Date = 110365 should convert to 12/31/2010
JDE Date = 100111 should convert to 4/20/2000

Can anyone help me? This obviously isn't your standard julian date and I'm too close to the trees right now.
 
This is the formula I use to convert JDE Julian dates:-

NumberVar Year1;
StringVar Date1;
NumberVar Cent1;

Date1 :=ToText({AS400.FIELDNAME}, "000000");
Cent1 :=ToNumber(Date1[1]);
Year1 :=If Cent1 = 0 then

(ToNumber(Date1[2 to 3]) + 1900)
Else if Cent1 = 1 then
(ToNumber(Date1[2 to 3]) + 2000);

(Date (Year1,01,01) + (ToNumber(Date1[4 to 6]) - 1));

If you wish to use the date in the data selection you will either have to use the JDE Julian date, link the julian date to the F00365 file or use a pick list.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top