RE: Converting Dates to *ISO

If you have a character field and it does NOT contain separators, as in
01/15/2001, then you need to specify (in Factor 1 of the MOVE opcode)
the date format with Zero separators. SO something like *USA0 or *MDY0
is necessary.

Bob Cozzi
cozzi@rpgiv.com
Visit the new on-line iSeries Forums at: http://www.rpgiv.com/forum

> -----Original Message-----
> From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]
On
> Behalf Of Malchow, Grizzly
> Sent: Thursday, August 23, 2001 7:53 AM
> To: 'rpg400-l@midrange.com'
> Subject: Converting Dates to *ISO
>
> This message is in MIME format. Since your mail reader does not
understand
> this format, some or all of this message may not be legible.
> --
> [ Picked text/plain from multipart/alternative ]
> Hello,
> I am trying to convert a date into *ISO format.  I have tried using
> converting with the built in functions *MDY to *ISO, *YMD to *ISO, and
*CYMD
> to *ISO.  I can't even compile the program unless the field I am
trying to
> convert from is 10 characters long. Even when I try that the date
doesn't
> get converted correctly. Does anyone have any suggestions?
>
> I thank you in advance.
>
> Grizzly Malchow - Programmer/Analyst
> Gross-Given Mfg./Automatic Products International
> gmalchow@automaticproducts.com
> http://www.automaticproducts.com/
>
> Visit The St. Paul Pigs Rugby Football Club Website!
> http://www.saintpaulrugby.com
>
>
> _______________________________________________
> 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