Re: SQL Valid Date

Hello Rob

Yeah, the old RTFM rule tripped me yet again.

(I've forgotten there is a 2nd parameter to iDate function)

Setting cDefaultFormat to *CCYMD solved the problem indeed.


THANKS
Gad

date: Thu, 2 Nov 2017 07:44:39 -0400
from: Rob Berendt <rob@xxxxxxxxx>
subject: Re: SQL Valid Date

Have you tried reading the readme?
values idate(19500523, '*CCYMD'), idate(20050523, '*CCYMD')

returns
....+....1
VALUES
1950-05-23
2005-05-23

While
values idate(19500523), idate(20500523)
....+....1
VALUES
2850-05-23
1950-05-23

Here is why, (and figuring it out was fun), a *CYMD date was assumed.
If you add 9 centuries on to 1950-05-23 you get 2850-05-23
If you add 0 centuries on to 1950-05-23 you get 1950-05-23

And as the readme says:
<snip>
The default date format is included as a constant in the code. I have set
it to *CCYMD because I think that should be the most common type. If you
have a different default format on your system, change the constant
cDefaultFormat in the header of XVIDAT_M01 before you compile.
</snip>
Well, apparently the default on your load (and mine too) is set to *CYMD
and not *CCYMD.



Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1
Group Dekko
Dept 1600
Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





From: Gad Miron <gadmiron@xxxxxxxxx>
To: midrange-l@xxxxxxxxxxxx
Date: 11/02/2017 02:29 AM
Subject: Re: SQL Valid Date
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>



Hello Alan Rob.

Thanks,
I've tested iDate function but it returns weird values.

like in

select idate(19500523) as idate1, idate(20050523) as idate2
from SYSIBM.SYSDUMMY1

IDATE1 IDATE2
2850-05-23 1905-05-23


year 1950 is returned as 2850
year 2005 is returned as 1905

where did I err ?

(this is a V7R2 machine if it matters)

TIA
Gad
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-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