If SQL is an option for you, you can also subtract the CURRENT_TIMEZONE
special register from your Time or Timestamp.
BTW Current_Timezone is based on the System value QUTCOFFSET system value.
Values(Current_Timestamp - Current_Timezone) will return the current UTC
Exec SQL Set :YourUTC = :YourTimestamp - Current_Timezone.
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@xxxxxxxxxxxxxxxxxx> On Behalf Of Salsman,
Michael
Sent: Freitag, 3. Mai 2019 18:06
To: 'RPG programming on IBM i' <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: David Gibbs <david@xxxxxxxxxxxx>
Subject: RE: Time zone for a Date and Time
There is a system value, QUTCOFFSET, that will give you the UTC offset for
the system.
Found in QSYS2.SYSTEM_VALUE_INFO -- View Or in the Retrieve System Values
(QWCRSVAL) API
https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_73/apis/qwcrsval.ht
m
Michael Salsman
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
David Gibbs via RPG400-L
Sent: Friday, May 3, 2019 09:50
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: David Gibbs <david@xxxxxxxxxxxx>
Subject: Re: Time zone for a Date and Time
On Fri, May 3, 2019 at 10:44 AM Slanina, John via RPG400-L
<rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:
Is there a way to know if a date and time is in the daylight time zone or
the standard time zone via an RPGLE program ?
I need to take date and time to its unix timestamp value which is in UTC.
What's the input?
There appears to be various web api's available to determine timezone
information (although some aren't free).
david
--
IBM i on Power Systems: For when you can't afford to be out of business!
I'm riding 615 miles (Yes, you read that right) in the American Diabetes
Association's Tour de Cure to raise money for diabetes research, education,
advocacy, and awareness. You can make a tax-deductible donation to my ride
by visiting
https://urldefense.proofpoint.com/v2/url?u=https-3A__mideml.diabetessucks.ne
t&d=DwICAg&c=2S-2xx8Cum_thMfWs-kOOHQTwolPvSZ4PFLhr1wDDGs&r=ls1vEGzGwgqZJyzZs
7sGJ8CtK97ty2KqTEwuy7Bm0ek&m=h9I11Y3H4MB5RMpJ5k1K9PiF2ooJC37r8pHCGWys1d4&s=S
lwmyHGCAk7-XEKxqPfX5MENMZsIaw9vn7PlVKtJJLg&e=.
You can see where my donations come from by visiting my interactive donation
map ...
https://urldefense.proofpoint.com/v2/url?u=https-3A__mideml.diabetessucks.ne
t_map&d=DwICAg&c=2S-2xx8Cum_thMfWs-kOOHQTwolPvSZ4PFLhr1wDDGs&r=ls1vEGzGwgqZJ
yzZs7sGJ8CtK97ty2KqTEwuy7Bm0ek&m=h9I11Y3H4MB5RMpJ5k1K9PiF2ooJC37r8pHCGWys1d4
&s=Yawwz3KxENOVi6pxRjIpqIAjOhdWscmRy-FUxOMW2cA&e= (it's a geeky thing).
I may have diabetes, but diabetes doesn't have me!
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mail
man_listinfo_rpg400-2Dl&d=DwICAg&c=2S-2xx8Cum_thMfWs-kOOHQTwolPvSZ4PFLhr1wDD
Gs&r=ls1vEGzGwgqZJyzZs7sGJ8CtK97ty2KqTEwuy7Bm0ek&m=h9I11Y3H4MB5RMpJ5k1K9PiF2
ooJC37r8pHCGWys1d4&s=q_ECGcCn3UpVCYQjBDgQlcu-3QvJa4J6m5SYpPg6fzY&e=
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_rp
g400-2Dl&d=DwICAg&c=2S-2xx8Cum_thMfWs-kOOHQTwolPvSZ4PFLhr1wDDGs&r=ls1vEGzGwg
qZJyzZs7sGJ8CtK97ty2KqTEwuy7Bm0ek&m=h9I11Y3H4MB5RMpJ5k1K9PiF2ooJC37r8pHCGWys
1d4&s=ieZt8gXNU_C-IDbcTu9JbG0iuARIJ4WpluPEVvFSAvs&e=.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=D
wICAg&c=2S-2xx8Cum_thMfWs-kOOHQTwolPvSZ4PFLhr1wDDGs&r=ls1vEGzGwgqZJyzZs7sGJ8
CtK97ty2KqTEwuy7Bm0ek&m=h9I11Y3H4MB5RMpJ5k1K9PiF2ooJC37r8pHCGWys1d4&s=l53Uyw
bNoaoNcyFkI6bkdA7o_JStOnhm0FThFKYmpkM&e=
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
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:
https://amazon.midrange.com
midrange.com
