Re: Justin's super-awesome DST cheat sheet

[Mike <koldark@xxxxxxxxx>]

You should add this to the Wiki (http://wiki.midrange.com)

On 2/13/07, Haase, Justin C. <justin.haase@xxxxxxxxxxxx> wrote:
> I used these commands on our pre-V5R3 systems.  Use at your own risk,
> but they've worked for me before.
> -----------
>
> USA
> DST Start - March 11, 2007
> DST End   - November 4, 2007
>
> UK
> Summer time start - March 25, 2007
> Summer time end   - October 28, 2007
>
> /* ends IBM supportline-contracted SNTP program */
> ADDJOBSCDE JOB(DST_ENDNTP) CMD(ENDSBS SBS(QZRDSNTP) OPTION(*IMMED))
> FRQ(*ONCE) SCDDATE('03/11/2007') SCDTIME('01:50:00')
> TEXT('DST: End Time Sync')
>
> /* ends MIMIX WITH RJ (HALite) */
> ADDJOBSCDE JOB(DST_MMX1) CMD(MIMIX/ENDDG DGDFN(*ALL) ENDRJLNK(*YES))
> FRQ(*ONCE) SCDDATE('03/11/2007') SCDTIME('01:55:00')
> TEXT('DST: End Mimix')
>
> /* ends MIMIX WITHOUT RJ (HA1) */
> ADDJOBSCDE JOB(DST_MMX1) CMD(MIMIX/ENDDG DGDFN(*ALL)) FRQ(*ONCE)
> SCDDATE('03/11/2007') SCDTIME('01:55:00') TEXT('DST: End Mimix')
>
> /* change UTC for EASTERN zone systems */
> ADDJOBSCDE JOB(DST_UTC) CMD(CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE('-0400'))
> FRQ(*ONCE) SCDDATE('03/11/2007') SCDTIME('01:58:55')
> TEXT('DST: Change UTC Offset Eastern')
>
> /* change UTC for CENTRAL zone systems */
> ADDJOBSCDE JOB(DST_UTC) CMD(CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE('-0500'))
> FRQ(*ONCE) SCDDATE('03/11/2007') SCDTIME('01:58:55')
> TEXT('DST: Change UTC Offset Central')
>
> -/-/-/-/-/-/-/-/-/-/
> UTC for UK
> ADDJOBSCDE JOB(DST_UTC) CMD(CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE('+0100'))
>
> FRQ(*ONCE) SCDDATE('03/25/2007') SCDTIME('01:58:55')
>
> TEXT('DST: Change UTC Offset UK')
>
> Hour for UK
> ADDJOBSCDE JOB(DST_HOUR) CMD(CHGSYSVAL SYSVAL(QHOUR) VALUE('02'))
> FRQ(*ONCE) SCDDATE('03/25/2007') SCDTIME('01:59:00')
> TEXT('DST: Change Hour')
> -/-/-/-/-/-/-/-/-/-/
>
> Hour for US
> ADDJOBSCDE JOB(DST_HOUR) CMD(CHGSYSVAL SYSVAL(QHOUR) VALUE('02'))
> FRQ(*ONCE) SCDDATE('03/11/2007') SCDTIME('01:59:00')
> TEXT('DST: Change Hour')
>
> Restart Mimix (ha1 and halite)
> ADDJOBSCDE JOB(DST_MMX2) CMD(MIMIX/STRDG DGDFN(*ALL)) FRQ(*ONCE)
> SCDDATE('03/11/2007') SCDTIME('03:05:00') TEXT('DST: Start Mimix')
>
> Justin C. Haase - Solution Engineer
> IBM Certified Systems Expert - System i
> Kingland Systems Corporation
> voice - 641.355.1031
> mobile - 641.529.2103
> fax - 641.355.1099
>
>
>
>
> CONFIDENTIALITY NOTICE:  This e-mail communication, including attachments,
> is covered by the Electronic Communications Privacy Act, 18 U.S.C.
> 2510-2521, is confidential, and may be legally privileged.  If you are not
> the intended recipient or believe you received this communication in error,
> please reply to the sender indicating that fact and delete the copy you
> received.  In addition, retention, dissemination, distribution, copying, or
> otherwise use of the information contained in this communication is strictly
> prohibited.  Thank you.
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
> list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.