Re: Can a date have a *CYMD format?

[Jeff Crosby <jlcrosby@xxxxxxxxxxxxxxxx>]

Thanks everyone, that makes sense now.

On Fri, Sep 7, 2018 at 12:18 PM, Birgitta Hauser <Hauser@xxxxxxxxxxxxxxx>
wrote:

> You cannot define a date with *CYMD, but it should be possible to convert a
> real date into a numeric representation of a date in this forma.
> I haven't tried it out:
>
> NumDate = %Dec(YourRealDate: *CYMD);
>
> Mit freundlichen Grüßen / Best regards
>
> Birgitta Hauser
>
> "Shoot for the moon, even if you miss, you'll land among the stars." (Les
> Brown)
> "If you think education is expensive, try ignorance." (Derek Bok)
> "What is worse than training your staff and losing them? Not training them
> and keeping them!"
> „Train people well enough so they can leave, treat them well enough so they
> don't want to.“ (Richard Branson)
>
>
> -----Original Message-----
> From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> On Behalf Of Jeff Crosby
> Sent: Freitag, 7. September 2018 17:31
> To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
> Subject: Can a date have a *CYMD format?
>
> I need to send a file to a vendor asking for the date (numeric, not a date
> data type) in the form CYYMMDD where the "C" is 0 for the 1900's and 1 for
> the 2000's.  Fair enough.
>
> I figured the easiest was to start with a date data type in the form *CYMD
> then make it numeric.  I see reference in the RPG documentation on date
> data
> types to *CYMD, but you can't define a date with that format.
>
> Is that right or am I missing something?
>
> Thanks.
>
> --
>
>
> Jeff Crosby
> VP Information Systems
> UniPro FoodService/Dilgard
> P.O. Box 13369
> Ft. Wayne, IN 46868-3369
> 260-422-7531
> direct.dilgardfoods.com
>
> The opinions expressed are my own and not necessarily the opinion of my
> company.  Unless I say so.
> --
> 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: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives at
> https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link:
> http://amzn.to/2dEadiD
>
> --
> 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: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD