Re: last day of month

["Peter Dow" <pcdow@xxxxxxxxx>]

> > SetDate(Datefield:*D:01)
> > SetDate(Datefield:*M:12)
> > SetDate(Datefield:*Y:2001)
>
>  I like this suggestion.  It says exactly what you'd like to do.  I would
> also hope that we could combine descriptors, i.e. *MD, *MY, *DY, etc.
> Also, *Y and *YY or *CY.   *JD would be Julian days.
>
>  -mark

After reading your suggestion Mark, it occurred to me that ILE RPG already
has the op code and the syntax, just not the specific descriptors. Consider
this example from the manual:

    C     *DMY          MOVE      210991        DATE_ISO
    C     *DMY          MOVE      NUM_DATE1     DATE_ISO

Now just allow some more descriptors and you could have

    C      *D               MOVE      01                 datefield
    C      *M               MOVE      12                 datefield
    C      *Y                MOVE      2001            datefield

It's in keeping with what IBM has already done and seems just as
understandable as the others, especially if you've already learned to use
MOVE for date, time & timestamp fields.

Peter Dow
Dow Software Services, Inc.
909 425-0194 voice/fax



> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@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
> +---


__________________________________________________
Do You Yahoo!?
Bid and sell for free at http://auctions.yahoo.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---