RE: DB2 numeric to date conversion

The easiest way to convert an 8-digit numeric date in the format YYYYMMDD
into a real date is:

Date(Digits(YourNumDate) concat '000000')

Mit freundlichen Grüßen / Best regards

Birgitta Hauser
Modernization ? Education ? Consulting on IBM i

IBM Champion since 2020

"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)
"Learning is experience ? everything else is only information!" (Albert
Einstein)

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Dave
Sent: Monday, 6 November 2023 17:45
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: DB2 numeric to date conversion

Hello,

I came up with this in order to convert a 8,0 numeric field to a date that
seems to work. Format is YYYYMMDD so it would be a bit different for most of
you.
Can anyone suggest something to make it easier on the eye? Thanks!

select

date('0001-01-01') +
(int(myDate/10000) - 1) years +
(int(mod(myDate , 10000)/100) - 1) months + (mod(mod(myDate , 10000), 100)
- 1) days from myFile
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.