Re: DATE fields in RPG-IV

[CVWD@xxxxxxx]

> > I read a file with numeric fields for dates which = 0.   When I try to
>  > convert these to a date field, it results in 01/01/0001.  When I try to
>  > convert this back to a 6,0 numeric field, it gives an error because it
>  > must be in a date range 1940 to 2039 to convert to a 6,0.  We need to be
>  > able to convert back to numeric format for output to display file and
>  > printer file DDS.  How should this be handled?

We move *loval to what used to be zero dates and check for *loval where we
used to check for zero and move zero instead of the date when date=*loval.
 Conceptually the same as using zero for an invalid or missing date and
allows you to use the date data type.  Ideally, of course, you would use
null.   THT, Lance
+---
| 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 MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---