On Wed, 11 Oct 2006 12:22:41 -0500, John P Kalinich <[EMAIL PROTECTED]> wrote:
>Or this...
>
>/* Rexx */
>gmthr = MVSVAR('SYMDEF','HR')
>hr = Time('HR')
>zone = hr - gmthr
>Say 'Local GMT offset is:' zone
>
You win! I tend to forget about dynamic system symbols except
in TSO / STC JCL.
Might as well use MVSVAR for both then...
/* Rexx */
gmthr = MVSVAR('SYMDEF','HR')
lochr = MVSVAR('SYMDEF','LHR')
zone = lochr - gmthr
Say 'Local GMT offset is:' zone
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group
mailto: [EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
