RE: Date Conversion

["Feador, Jerry" <JFeador@xxxxxxxxxx>]

Thanks for the advice Eric,
Yeah, we're converting from RPGIII to RPGIV and there's a lot of date stuff
(how long from now to then, etc...) so having these character or numeric
dates in a date type field makes the calculations (SUBDUR, etc...) much
easier...
Cj

-----Original Message-----
From: DeLong, Eric [mailto:EDeLong@Sallybeauty.com]
Sent: Wednesday, May 15, 2002 7:55 AM
To: 'rpg400-l@midrange.com'
Subject: RE: Date Conversion


Cap,

I think the easiest way to convert char and numeric fields to date fields is
via the <DATFMT> MOVE oldfield newfield op.  I think using a DS would be too
difficult, considering each potential format would need its own matching DS.
Too much supporting code for something that can be done in a single
statement.  Please tell me that you're using RPGIV, and not RPGIII which has
very limited support of date-fields.

For more info on "move to date" conversions, see ILE RPG reference.
http://publib.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/QB3AGZ03/4.3.16.2?DT=199
90323173815

hth,

Eric DeLong
Sally Beauty Company
MIS-Sr. Programmer/Analyst
940-898-7863 or ext. 1863



-----Original Message-----
From: Feador, Jerry [mailto:JFeador@Kiausa.com]
Sent: Wednesday, May 15, 2002 9:36 AM
To: 'rpg400-l@midrange.com'
Subject: Date Conversion



Greetings Program, (Tron ref.)

Does anybody know of a way that an 8 digit character or numeric value in a
field can be converted into a date format field by utilization of a data
structure only?

My test say probably not due to the size differential (8 to 10), but one of
you geniuses out there may know of a trick or two.

I've just got a legacy program with a gazillion move-to-date-field
operations that I'm trying to streamline.

Thanks,
Capt.j
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.