/* get the local offset from GMT */
days_diff = mvsvar('SYMDEF','LYR4') - mvsvar('SYMDEF','YR4')
if days_diff = 0 then
days_diff = mvsvar('SYMDEF','LJDAY') - mvsvar('SYMDEF','JDAY')
hours_diff = mvsvar('SYMDEF','LHR') -,
mvsvar('SYMDEF','HR') + 24 * days_diff
min_diff = right(abs(mvsvar('SYMDEF','MIN') -,
mvsvar('SYMDEF','LMIN')),2,'0')
sign = substr('+-',(hours_diff < 0)+1,1)
gmt_offset_hhmm = sign || right(abs(hours_diff),2,'0')min_diff
Joe
On Fri, Aug 23, 2019 at 2:40 PM Dana Mitchell <[email protected]> wrote:
> We don't have C, I'd like to do something like this in REXX and run it
> from ~/.profile or /etc/profile, but I can't figure out how to set the TZ
> environment variable in the REXX.
>
> Dana
>
> On Sun, 18 Aug 2019 15:08:25 +0800, David Crayford <[email protected]>
> wrote:
>
> >I once wrote some C code that sets the TZ, _TZ variables from the time
> >zone offset, leap second offset values in the CVT.
> >
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
