Re: Invalid date on Write to Control Rec

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Hi Gary

You still might not have specified the date format on the display file - 
default is likely your job's date format, which is often *MDY.

I've not checked the documentation, but this might be it.

I must admit that I ran into some difficulty trying to change to a date 
type in an old app we have - went back to a numeric with a Y edit code, 
I think. Things just didn't behave as I wanted, and I didn't have time 
to really work out my kinks.

Anyhow, good luck!
Vern

On 11/1/2013 1:07 PM, Gary Thompson wrote:
> I think my display actually defines a "true date" (DDS Data type = L) ?
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
> Sent: Friday, November 01, 2013 10:50 AM
> To: RPG programming on the IBM i (AS/400 and iSeries)
> Subject: Re: Invalid date on Write to Control Rec
>
> I'd guess the display file has a 6-digit date field.  0001-01-01 cannot be converted into a 6-digit date.
>
> Charles
>
>
> On Fri, Nov 1, 2013 at 12:32 PM, Gary Thompson <gthompson@xxxxxxxxxxx>wrote:
>
> > I get RNX0114 on: WRITE C1CTL (the subfile control record)
> >
> > "The year portion of a Date or Timestamp value is not in the correct
> > range (C G D F)."
> >
> > This confuses me because a dump shows the control record date field as:
> >
> > C1DDATFR              DATE(10)             '0001-01-01'
> >
> > DDS has C1DDATFR defined as "Data type L"
> >
> > We're seriously past that born-on date,  but I thought "*LOVAL" would
> > be ok ?
> >
> >
> > --
> > This is the RPG programming on the IBM i (AS/400 and 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.
> --
> This is the RPG programming on the IBM i (AS/400 and 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.