Re: date conversion

[Mike.Barton@xxxxxxxxxxxx]

>I want to convert a 6 position date (mmddyy or yymmdd) in ILE to a 7 position
date (cyymmdd).  I must have missed >some reading in the manual.  I'm at a loss
for the quick and proper date conversion.  Help.


In ILE, date conversion is v straightforward now. Simply use the MOVE op-code.

First define a proper date field (isodate in this case)

D isodate         S               D

Then in your code:

C     *MDY          MOVE      mmddyydate    isodate
C     *CYMD         MOVE      isodate       cyymmdd

Mike


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---