TZN0-171B-H0

CONTENTS

• PRODUCT OVERVIEW
• REQUIREMENTS
• START HERE
• SAMPLE CODE
• REFERENCE MATERIAL
• AUTHORITY ISSUES
• PRINTING RULES
• UNLOCK PRODUCT
• ROBOT BATCH CONTROL OPTIONS
• APPLICATION PROGRAMMING INTERFACES(APIs)
• HIGH AVAILABLILITY OBJECTS
• ERROR MESSAGES
• STATEMENT OF DIRECTION
• .ZIP INFORMATION
• FTP STYLE INSTALLATION
• PRINTING THE DOCUMENT
• PRODUCT SUPPORT WORLDWIDE
• STARTING REMOTE SUPPORT
• LICENSE INFORMATION

PRODUCT OVERVIEW

TimeZoNe/400 (TimeZoNe Simulation Utility)

Runs on OS/400 Version 6.1.0 and higher, and all preceding Versions

Going International? Users in 12 Countries!!!

Consolidating LPARs!!!

iSeries can tell time in your TimeZoNe

What is TZN/400 (TimeZoNe/400)?

SOLVE TIMEZONE ISSUES: INPRO International announces TimeZoNe/400 (TZN/400) Version 7.1.B TZN/400 (TimeZoNe/400 Simulation Utility) is a Timezone tool that allows you to override the time based on the differential between the users timezone and the systems timezone thru the year 3000, including support for automatic rules driven Daylight Savings Time(DST) all around the world. All this without costly LPAR support. The DDS/RPG/COBOL/ILE/Query/SQL(via APIs) called routines for TIME will now look to your users timezone offset. Takes the effort out of rewriting 9,000 modules or expensive LPAR support.

FEATURES

• Runs on OS/400 Version 6.1.0 or higher, and all preceding Versions
• User VIEW of system in their own TimeZoNes, spooled output, submitted jobs, messages etc. shows users view in Hong Kong, New York or New Zealand not yesterday.
• Start Downloading FREE Trial ASAP

ADVANTAGES

• Works at the Object Level so no recompiling etc. involved.
• One place to override timezone/DST functions at the User level, huge advantage over UNIX where every program must know.
• No additional costs iSeries LPARs free user ASP (2-32)
• Will run on Security Level 40 systems

  ---

---

REQUIREMENTS

OS/400 6.1.0 or higher
timeCALendar/2000 CAL/2000 Version 5.1.2 or greater from INPRO, for rolling time and date calculations support.
If you are upgrading from TZN213 or earlier you must run ADDTZNRTGE command to add a routing entry to where jobs submitted from interactive users were running, ie QBATCH subsystem. BATCH CONTROL OPTIONS

---

START HERE

1. All TZN/400 installation activities should be done as QSECOFR profile(NOT just a QSECOFR Group profile), on a quiet system (no tzn users running)(use WRKOBJLCK command checking locks).
2. After installation is completed, see FTP STYLE INSTALLATION options.
3. You must immediately UNLOCK, see UNLOCK PRODUCT.
   NOTE:Product MUST be unlocked prior to doing anything, email or call now to obtain your Trial Codes.
4. STOP HERE. Install and UNLOCK CAL/2000 Version 5.1.2 or higher.
5. Daylight Savings Time (DST) RULES MUST be created (minimum of 2) by using the, see TZNEXE/CFGTZN qualified command. Contact Product Support with questions, but basically if your USER is in Austin, TX, USA that is (S)ierra 01 (GMT-06:00) from the GMT reference point. If your SYSTEM is in New York, NY, USA that would be (R)omeo 01 (GMT-05:00) from GMT. Setup the rules in (S)ierra 01 and (R)omeo 01 for START DST month 03, day of week 7, week position 2, at 02:00 and END DST month 11, day of week 7, week position 1 at 02:00, Offset to GMT (when you are in DST usually an offset to GMT is one hour less than STANDARD Time Offsets on this side of GMT, on the other side of GMT one hour greater(springing forward in time, expressed in absolute terms))
   
   Link to World Wide TimeZoNe Map.
   
   NOTE:Sub-zone of 00=*none (no DST followed in that location) ie. users in Tokyo who do not use DST would simply be in timezone (I)ndia (I00)
   
   
6. For a system in New York scenario, using the CRTTZNUSR command create a User of *SYSTEM (as User) to locate the iSeries main system.
   

   CRTTZNUSR USRPRF(*SYSTEM) TIMEZONE(*ROMEO) SUBZONE(1)
   

   
   NOTE:If any user anywhere in the world has a special rule, then the *SYSTEM must be in a sub-zone with it's rules known to TZN/400, and you must use the TZN/400 command CHGSYSTIM when changing the time or date for the *SYSTEM.
   
   
7. Using the CRTTZNUSR command set up each USER (not in the *SYSTEM timezone) for the timezone they are in.
   

   CRTTZNUSR USRPRF(TESTUSER) TIMEZONE(*SIERRA) SUBZONE(1)
   

8. Make TZNEXE/SETTZN the first executable line in the users initial startup program called.
9. Set up your Batch Environments ROBOT BATCH CONTROL OPTIONS
10. Use the TZNEXE/CHGSYSTIM command CHGSYSTIM TIMETYPE(*SYSVAL_QTIMZON) DATE(*SAME) TIME(*SAME) with the new time Type: *SYSVAL_QTIMZON. Only use if the system value QTIMZON is correctly set for system's Time Zone.. (Automatic DST if required in any zone)
11. CALL TZN910 (to verify your setup)

---

SAMPLE CODE

1. TZNEXE/SETTZN (while logged on as one of your users that were setup)
2. CALL TZN910 (to verify your setup)

TZN/400 puts commands like WRKSPLF, WRKSBMJOB and others in the TimeZoNe of the user using them if they have issued the SETTZN command and are enrolled in TZN/400 itself.

---

REFERENCE MATERIAL

SCREEN CAPTURES

CRTTZNUSR

SETTZN

CFGTZN

CHGSYSTIM

TimeZone A01 Sample Rule

TimeZone Validate Program Screen

---

AUTHORITY ADOPTION LIST

                             Change Program (CHGPGM)
 Type choices, press Enter.
 Program  . . . . . . . . . . . . PGM          > xxxTZN
   Library  . . . . . . . . . . .              >   TZNEXE
 Optimize program . . . . . . . . OPTIMIZE       *YES
 User profile . . . . . . . . . . USRPRF         *owner
 Use adopted authority  . . . . . USEADPAUT      *yes
 Remove observable info . . . . . RMVOBS         *NONE
 Enable performance collection:   ENBPFRCOL
   Collection level . . . . . . .                *SAME
   Procedures . . . . . . . . . .
 Force program recreation . . . . FRCCRT         *NO

---

PRINTING RULES

PRTTZNRUL

---

UNLOCK PRODUCT

UNLOCK

---

BATCH CONTROL OPTIONS

ADDTZNRTGE

ROBOT BATCH CONTROL OPTIONS

Scenario 1

RBT292 ROBOT Command Entry 09:09:50 SxxxxxD

Commands for jobs named: GCXCLKSUM

Options
1=Select 4=Delete 7=Insert

Opt Seq  Command              Error
10  CALL PGM(TZNEXE/SETTZN)   C
20  CALL PGM(GCPRD/GCXCLKSUM) C

Scenario 2

For example, we schedule a job for Japan at 17:30 our time in Robot. The program being called by Robot executes SETTZN first so the transactions created are timestamped 6:30 am the next day, since Japan is currently 13 hours ahead of us.

Scenario 3

1. Change the RBTSLEEPER subsystem in RBTSYSLIB
2. Under Job Submission Options, Subsystem in question, Profile in question (defined in TZN/400), Jobq in question (important)
3. Add TZNEXE to Subsystem System library list entry
4. Add Routing entry 9999 SETTZN/QGPL with a Compare Value of *ANY
5. Coding follows:

   
    PGM                         
      CHGSYSLIBL LIB(TZNEXE)      
      MONMSG MSGID(CPF0000)       
      SETTZN                      
      CALL PGM(QCMD)              
    ENDPGM               
   

Scenario 4

ADDTZNRTGE SBSD(QGPL/DALE) SEQNBR(8888)
Runs the following command: ADDRTGE SBSD(x/y) SEQNBR(z) CMPVAL(TZNINPRO) PGM(TZNEXE/TZNAPI09) CLS(QSYS/QBATCH)
     x is the subsystem description library name
     y is the subsystem description name
     z is the routing entry sequence number
     Note: TZNAPI09 is used here. (Code Below)
                      PGM
                      TZNEXE/SETTZN
                      CALL       PGM(QCMD)
                      ENDPGM

     Note: TZNAPI09A is used here. (Code Below to Drill Down to Current User)
                      PGM
                      TZNEXE/SETTZNA
                      CALL       PGM(QCMD)
                      ENDPGM

---

Application Programming Interfaces(APIs)

Program: TZNAPI01 - Convert Date & Time From 1 Time Zone To Another Time Zone.

              Param 1: From Time Zone / Sub Zone  (3 Char, Format Zone Letter / Sub Zone Number  Ex: A01) - Input
              Param 2: From Date (8 Char, Format yyyymmdd   ex: 20070118) - Input
              Param 3: From Time (8 Char, Format hhmmssxx  ex: 22301001) - Input
              Param 4: To Time Zone / Sub Zone  (3 Char, Format Zone Letter / Sub Zone Number  Ex: R01) - Input
              Param 5: To Date (8 Char, Format yyyymmdd   ex: 20070118) - Output
              Param 6: To Time (8 Char, Format hhmmssxx  ex: 22301001) - Output
              Param 7: Error Message ID (7 Char, ex: TZN1002) If blank no errors found - Output

Program: TZNAPI02 - Get Current Date & Time For A Time Zone.

              Param 1: To Time Zone / Sub Zone  (3 Char, Format Zone Letter / Sub Zone Number  Ex: R01) - Input
              Param 2: To Date (8 Char, Format yyyymmdd   ex: 20070118) - Output
              Param 3: To Time (8 Char, Format hhmmssxx  ex: 22301001) - Output
              Param 4: Error Message ID (7 Char, ex: TZN1002) If blank no errors found - Output

Program: TZNAPI07 - Gets System Current Date/Time Used by TZN910

              Param 1: TimeStamp Character length 26   ex: 2008-11-13-07.13.09.811899 - Output

Program: TZNAPI09 - Routing Step Program

              Param 1: None

Program: TZNAPI10 - Gets Current Timezone offset including support of Daylight Savings Time for a User Profile.

              Param 1: User Profile Character length 10 this is the user profile that is set up in TimeZone/400 – Input
              Param 2: Time Zone Offset Character length 6 this is the current time zone offset including support of Daylight Savings Time 
                       for the user profile value: [+/-]HH:MM Example: -05:00) – Output
              Param 3: Error Message ID Character length 7 (ex: TZN0002) a specified error if user is not set up in TimeZone/400.   
                       If blank no errors found – Output

Rules For TZNAPI10
1) User does not need SETTZN* to have been called, just TZNEXE in library list.

Program: TZNAPI30 - Gets Current User Zone Time Date/Time For User in SETTZN.

              Param 1: TimeStamp Character length 26   ex:> 2008-11-13-08.13.09.811899 - Output

Program: TZNAPI30A - Gets Current User Zone Time Date/Time For User in SETTZNA.

              Param 1: TimeStamp Character length 26   ex:> 2008-11-13-08.13.09.811899 - Output

Program: TZNAPI30B - Gets Current User Zone Time Date/Time For User in SETTZN with user definition in any library other than TZNEXE.

              Param 1: TimeStamp Character length 26   ex:> 2008-11-13-08.13.09.811899 - Output

Rules For TZNAPI30*
1) User does not need SETTZN* to have been called, just TZNEXE and CALEXE in library list.
2) User needs Definition Data Area in TZNEXE or in the list library for TZNAPI30B.
3) User Definition Data Area Requires Valid Time Zone.
4) User uses TZNAPI30 when Definition Data Area is in library TZNEXE and is STATIC
5) User uses TZNAPI30A when Definition Data Area is in library TZNEXE and is DYNAMICLY changing
6) User uses TZNAPI30B when Definition Data Area is in libary list but not in TZNEXE and is STATIC.

If the TZNAPI30* program returns blanks/spaces one of the above rules not followed..

---

High Availability Objects

The exclude replacation objects are ( tznexe/tznctl *dtaara and calexe/inprocal *usrspc )

---

ERROR MESSAGES

---

STATEMENT OF DIRECTION