Re: more date stuff

crdate need seperators ('03/17/2006') or make dtmdy have a datfmt(*USA0) to
indicate no seperators.

On 3/20/06, Cindy Major <cmajor@xxxxxxxxxxxxxxx> wrote:
>
> Can you tell me what is wrong with this code?
>
>
>
>
>
> D dtmdy           s               d   datfmt(*USA)
>
> D crdate          s             10a  inz('03172006  ')
>
> /free
>
>    dtmdy = %date(crdate: *USA/);
>
> /end-free
>
>
>
>
>
> Error when compiling:
>
> Program Status . . . . . . . . . . . . :   00112
>
>              Date, Time or Timestamp value is not valid (C G D F).
>
>     CRDATE                CHAR(10)             '03172006  '
>
>     DTMDY                 DATE(10)             '01/01/0001'
>
>
>
> Cindy Major
>
> Programmer/Analyst
>
> Nucor Steel Auburn
>
> 315.258.4275
>
> cmajor@xxxxxxxxxxxxxxx
>
>
>
>
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>