RE: Using MONITOR For The First Time

Francis, Thank you for the clarification. I haven't had to work with
converting numeric to date, just character data.

Sorry, Robert, about my confusion. If you are converting numeric dates,
I don't understand why you are getting errors. Please let us know when
you find out.

Roger Mackie

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Francis Lapeyre
Sent: Monday, April 28, 2008 10:54 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Using MONITOR For The First Time

If the field you are converting is numeric, then you can use

ASDF_ISO = %Date(DATECRT :*ISO);

If it's character and has no separators ('20080428'), then you must use

ASDF_ISO = %Date(DATECRT :*ISO0);

If it's character and has a separator, you should add the separator
after the *ISO:

ASDF_ISO = %Date(DATECRT :*ISO/); // DATECRT = '2008/04/28'
On Mon, Apr 28, 2008 at 10:42 AM, Robert Munday <rwmunday@xxxxxxxxxxxxx>
wrote:

Roger,


-----Original Message-----
From: "Mackie, Roger L. (Precision Press)" <RLMackie@xxxxxxxxxxxxx>
Sent: Apr 28, 2008 11:34 AM

<<< *ISO tells the %Date BIF that the incoming data has separators.
Try *ISO0 (where the last character is *zero) instead. >>>

<<< ASDF_ISO = %Date(DATECRT :*ISO); // Convert Create Date >>>

I'm taking an eight digit date in ccyymmdd format and converting it
to *ISO.



Robert Munday
Munday Software Consultants
Montgomery, AL
on assignment in Columbia, SC


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

--
Francis Lapeyre

Da mihi sis crustum Etruscum cum omnibus in eo.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.