|
Jerry, There are only 2 PTFs needed to adjust the time zone on V5R3. Both can be applied immediately, as long as no JAVA JVMs are running. On our system there are JVMs in use (apparently by IBM), so an IPL was required to apply the DST PTFs. Since we were doing an IPL for the DST PTFs, I took the opportunity to do a cume application at the same time. If you want to get the DST PTFs, they are SI25991 and SI26039. If you aren't applying the PTFs, I'd suggest making sure that you select your local time zone that uses standard time, and change your clock with your CL program. Hopefully the JVM issues won't appear since you will be using standard time. Are you doing any time sensitive processing or data exchanges that consider different time zones? Steve Steven Morrison Fidelity Express 903-885-1283 ext. 479 Jerry Draper <midrangel@xxxxxxxxxxxxx> Sent by: midrange-l-bounces@xxxxxxxxxxxx 03/09/2007 03:56 PM Please respond to Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> To midrange-l@xxxxxxxxxxxx cc Subject DST disable timzon feature I am working on a V5R3 system that is not current on required cumPTF's so we can't use the TIMZON features of the OS. Therefore we will do it via a piece of CL (below) which is schedule to run at 2am on Sunday. Meanwhile, I need to be sure that the TIMZON feature is turned off. Anyone know how to do that? Jerry ... frag ... RTVSYSVAL SYSVAL(QTIME) RTNVAR(&SYSTIM) RTVSYSVAL SYSVAL(QUTCOFFSET) RTNVAR(&UTCOFF) /* Parse out hour from system value QTIME CHGVAR VAR(&HOURD) VALUE(%SST(&SYSTIM 1 2)) CHGVAR VAR(&UTCHR) VALUE(%SST(&UTCOFF 2 2)) /* If Spring then add one hour to time /* If Spring then sub one hour from utcoffset IF COND(&SEASON *EQ 'SPRING') THEN(DO) CHGVAR VAR(&HOURD) VALUE(&HOURD + 1) CHGVAR VAR(&UTCHR) VALUE(&UTCHR - 1) /* Adjust system value QTIME if valid time CHGVAR VAR(%SST(&SYSTIM 1 2)) VALUE(&HOURD) CHGSYSVAL SYSVAL(QTIME) VALUE(&SYSTIM) CHGVAR VAR(%SST(&UTCOFF 2 2)) VALUE(&UTCHR) CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE(&UTCOFF) ... end frag ...
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.