*MDY (Factor 1) for Version 4r4

[dbryant@xxxxxxxxxxxx]

We converted our OS/400 from V4R3 to V4R4 a few weeks ago. I am having some
difficulties with the *MDY with the "Move" Operator.  These calculations were
working fine in v4r3..

#BEGDAT is defined within the Screen DDS as a (6,0) Numeric field. The user will
key in the MMDDYY.
A            #BEGDT         6Y 0B 13 37COLOR(WHT)
A                                      EDTCDE(Z)


PXBEGDT is defined within the File DDS as a Date Field (CCYYMMDD)....
 A            PXBEGD        L         TEXT('Date')


C     *MDY          move      #BEGDT        PXBEGD


In V4R3 we compiled all programs using CVTOPT(*DATETIME), but now in V4R4 is
will not compile with the CvtOpt option of *DATETIME, I have to use *NONE for
this parameter or it will not compile.

Also, now I cannot use the INZ on a program defined Date Field.  **I tried to
use INZ(d'0001-01-01')** as well, but the compiler didn't like that either.
What's the buzz??

D LowDate         S                   LIKE(PXBEGD) INZ('0001-01-01')
D HighDate        S                   Like(PXENDD) INZ('2040-12-31')


*RNF3430 20     68 006501  Initial value '0001-0... does not match data type of
field
                           LOWDATE. Initial value is ignored.


If I wanted to initialize the Program Defined Date Field in the "D" Spec, how
would I code It??

TIA,
Darlene Bryant


+---
| 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
+---