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 Chriss Miller 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
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