Re: Date Data Type Question

[Jon Paris <paris@xxxxxxxxxx>]

"Speaking of dates, does ILE RPG under V3R1 support this statement (inexact
positioning)?

    D JobDate  S  D DATFMT( *YMD )

    C *YMD  MOVE     UDATE  JobDate

 The idea here is to have UDATE in *MDY format get moved and flipped to *YMD."


One problem with the code as shown.  The factor 1 entry on the MOVE should be
*MDY _Not_ *YMD.  The Factor 1 entry tells the compiler the format of the
non-date field (in this case UDATE) It already knows the format of the "real"
date - you told it that on the D spec.  If moving _From_ a "real" date to a
non-date, then factor 1 describes the desired output of the move.  If the move
is of two dates, no factor 1 entry is required.

Jon Paris - AS/400 AD Market Support - paris@ca.ibm.com
Phone: (416) 448-4019   -   Fax: (416) 448-4414
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---