IBM Software Group Application Time Facility Version V

IBM Software Group Table of Contents § Overview 3 4 Who uses it? 4 What does it do? § How ATF Works 10 § Using ATF 16 § Additional Topics 34 January 30, 2006 2

IBM Software Group Overview January 30, 2006 3

IBM Software Group ATF Overview § Who would use ATF? 4 Testing/QA Personnel 4 Application Development January 30, 2006 4

IBM Software Group ATF Functional Overview § Simulate new system date and/or time § Isolate simulation to individual application § Allows easy repeat of test cases § Negligible performance impact § Does not affect system functions § Tight Security January 30, 2006

IBM Software Group ATF Supported Languages § COBOL (COBOL/VS, COBOL/2, COBOL/370) § LE/370 (PL/I-370, C/370, COBOL/370 ) § ASSEMBLER § PL/1 § FORTRAN § C § SAS (V 6. 09 or above | or less than V 6. 00) § FOCUS January 30, 2006 6

IBM Software Group ATF Operating Environments ATF/MVS (ISPF) Supply virtual date and time through: § Batch Jobs § TSO Users § CICS Started Tasks § IMS applications § DB 2 applications January 30, 2006 7

IBM Software Group ATF Operating Environments § CICS 4 ASKTIME Command 4 EIBDATE / EIBTIME 4 NO MACRO LEVEL January 30, 2006 8

IBM Software Group Test Phases § Unit Testing § Noteworthy Dates Current Date and Time January 1 December 31 at 23. 59 End of quarter / fiscal year Leap Year § System Testing § Acceptance Testing § § Validate analysis, design, and unit testing Test implementation group as it will run in production January 30, 2006 9

IBM Software Group How ATF Works January 30, 2006 10

IBM Software Group How ATF Works § Simulate Past, present, or future dates 4 January 1, 1900 through December 31, 2039 § Specify Absolute date and time 4 January 1, 2006 and 12: 30 § Specify Relative date and time 4 +/- days and +/-hh: mm § Keep running time 4 Independent Time Clock (ITC) § ATF will not affect the date for system-critical component dates: 4 Supervisor state programs (e. g. : OPEN, CLOSE, SMF, etc, …) January 30, 2006 11

IBM Software Group How ATF Works § ATF mimics MVS for Date/Time requests 4 If you code in a batch COBOL program: MOVE CURRENT-DATE TO DATE-FIELD. ATF intercepts the MVS system time request between the programs (eg: COBOL) and the system. § For ATF/CICS, the code would be: EXEC-CICS ASKTIME ……. END-EXEC January 30, 2006 12

IBM Software Group ATF with MVS W ith AT F ATF OS/390 - MVS Application Without ATF TIMER MOVE CURRENT-DATE TO DATE-FIELD. January 30, 2006 13

IBM Software Group ATF with CICS W ith AT F ATF Application EXEC-CICS ASKTIME … END-EXEC. Without ATF CICS January 30, 2006 14

IBM Software Group What ATF Intercepts ATF—Time/Date Requests § MVS SYSTEM TIME 4 LINKAGE=SVC (using SVC-11; Old method) 4 LINKAGE=SYSTEM (Newer method) § STCK (Store Clock Instruction) § STCKSYNC macro January 30, 2006 15

IBM Software Group Using ATF January 30, 2006 16

IBM Software Group Communicating with ATF MVS 4 ISPF 4 JCL CICS 4 Online interface January 30, 2006 17

IBM Software Group ISPF Interface ISPF Primary Option Menu Option ===> 0 1 Settings Browse Terminal and user parameters Display source data or listings 2 3 4 5 6 7 8 Edit Utilities Foreground Batch Command Dialog Test LM Facility Create or change source data Perform utility functions Interactive language processing Submit job for language processing Enter TSO or Workstation commands Perform dialog testing Library administrator functions S SDSF TT TICTOC User ID. : Time. . . : Terminal. : Screen. . : Language. : Appl ID. : TSO logon : TSO prefix: System ID : MVS acct. : Release. : INTT 009 17: 09 3278 1 ENGLISH ISR SPFE 5 V 55 INTT 009 ISGN ISOGON ISPF 4. 4 System Display and Search Virtual Timing Online Facility Enter X to Terminate using log/list defaults ATF is usually installed as an option on the ISPF Primary Option Menu, as shown above January 30, 2006 18

IBM Software Group ATF ISPF Interface TICTOC --------- TICTOC PRIMARY OPTION MENU ----- TICTOC IS ACTIVE OPTION ===> _ Specify one of the following options: B E O P R X BROWSE EDIT OPTIONS PRINT REFRESH EXIT TT TT TTTTT II TTT II Browse virtual clock definitions Edit and update virtual clock definitions Update your online session execution options Print the VCD dataset's contents Refresh currently active virtual clock definitions Terminate and exit this TICTOC user session TT TT CCCCCCC TTTTT OOOOOOO CCCCCCC CC CC TT OO OO CC CC CC TT TT OO OO CC CC CCCCCC TTT OOOOOO CCCCCC (C) COPYRIGHT IBM CORPORATION 1996 ALL RIGHTS RESERVED VERSION 2. 8. 100 January 30, 2006 19

IBM Software Group ATF ISPF Interface TICTOC --------- EDIT VIRTUAL CLOCK DATASET ------- RECORD ADDED COMMAND ===> _ SCROLL ===> CSR NAME TYPE DATE TIME ENABLE? LAST UPDATED BY ACT 20001 JOB 2000/01/01 * YES 96/02/11 10: 47 ACDB 400 ADMN 100 TSU 2000/01/01 * YES 96/02/20 10: 26 ADMN 100 ADMN 101 TSU 2000/01/01 * YES 96/02/20 10: 26 ADMN 100 ADMN 102 TSU 2000/01/01 * YES 96/02/20 10: 27 ADMN 100 ADMN 105 TSU 2000/01/01 * YES 96/02/20 10: 28 ADMN 100 CICSPRT* STC 1999/12/31 * YES 96/02/28 12: 34 CICS 420 MN? ? ? TIC JOB 2000/01/01 * YES 96/02/16 14: 52 SYDB 007 MN* JOB 2000/02/29 * YES 96/04/11 10: 41 SYDB 011 IMSRGN STC 1999/12/31 * YES 96/02/28 12: 34 SYDB 014 ORDRTST? JOB 2000/01/01 * YES 96/02/06 11: 23 USER 330 PITRN 008 IMS * * YES 96/02/19 13: 19 USER 106 PITRN 045 IMS * * YES 96/02/19 13: 19 USER 106 PITRN 2* IMS * * YES 96/02/22 08: 57 SYSI 420 PITRN* IMS 1999/12/31 23: 59 YES 96/02/19 13: 21 USER 106 SIMBKUPM JOB +31 23: 59 YES 96/02/19 15: 02 SYST 093 SIMBKUPW JOB +7 23: 59 YES 96/02/19 15: 02 SYST 093 SYTP* JOB * * YES 96/02/16 09: 28 SYTP 070 Z* JOB 2004/02/29 * YES 96/04/11 10: 47 SYDB 011 January 30, 2006 20

IBM Software Group ATF ISPF Interface TICTOC ---------- VIRTUAL CLOCK ADDITION -----------------COMMAND ===> _ Name ===> Z* Job/application name or generic pattern Type ===> JOB 'JOB', 'STC', 'TSU', 'IMS' Date ===> 2004/02/29 Start date in YYYY/MM/DD format, a number from -9999 to 9999 days or '*' for actual current date Time ===> * Start time in HH: MM format, a number from -23: 59 to 23: 59 hours or '*' for actual current time Enable? ===> YES Press the END key to add a new Enable and activate entry? (YES or NO) virtual clock definition. Use the CANCEL command to cancel the request. Then press ENTER. The VCD edit panel is again displayed, with the new entry added in the correct location: January 30, 2006 21

IBM Software Group JCL Interface //. . . JOB. . . // EXEC PGM=TICON //STEPLIB DD DISP=SHR, DSN=ATF. V 2 R 8 M 1. LOADLIB //TICLOG //TICIN DD SYSOUT=* DD * VIRTDATE=2000/01/01 VIRTTIME=18: 05 /*. . (OTHER JOB STEPS) January 30, 2006 22

IBM Software Group JCL to show a Date Format change //EXEC PGM=TICON //STEPLIB DD DISP=SHR, DSN=ATF. V 2 R 8 M 1. LOADLIB //TICLOG DD SYSOUT=* //TICIN DD * DATEFRMT=4 VIRTDATE=01 JAN 2000 VIRTTIME=+12: 00 /*. . (OTHER JOB STEPS). // EXEC PGM=TICOFF //STEPLIB DD DISP=SHR, DSN=ATF. V 2 R 8 M 1. LOADLIB //TICLOG DD SYSOUT=*. . (OTHER JOB STEPS) January 30, 2006 23

IBM Software Group Date Formats ATF can recognize any of five possible date formats: § 1 YYYY/MM/DD (examples: 1999/12/31, 2000/01/15) § 2 MM/DD/YYYY (examples: 12/31/1999, 01/15/2000) § 3 DD/MM/YYYY (examples: 31/12/1999, 15/01/2000) § 4 DDMONYYYY (examples: 31 DEC 1999, 15 JAN 2000) § 5 YYYY. DDD (examples: 1999. 365, 2000. 015) January 30, 2006 24

IBM Software Group CICS Support Run CICS region under ATF control § Use ATF/CICS for finer transaction control § Supports CICS Command-level ASKTIME function. § ASKTIME sets EIBDATE and EIBTIME fields § CICS sets EIBDATE/EIBTIME on entry to application § ATF & CICS All Levels § ATF sets EIBDATE/EIBTIME to virtual date/time upon entry. § ATF & CICS 2. 1. 2 § Must have certain APAR’s applied before using ATF. Any questions regarding what to apply before using ATF should be directed to Technical Support. January 30, 2006 25

IBM Software Group ATF CICS Support ATF/CICS Selective control of virtual date by: § Transaction id § Terminal id § User id Defining Virtual date/time to ATF/CICS § TICT(default) transaction is almost identical to ATF/MVS ISPF interface January 30, 2006 26

IBM Software Group Entry Panel for ATF CICS (TICT) TICTOC/CICS ------- TICTOC PRIMARY OPTION MENU ----- TICTOC IS NOT ACTIVE OPTION ===> Specify one of the following options: B E O X BROWSE EDIT OPTIONS EXIT - TT TT TTTTT II TTT II Browse virtual clock definitions Edit and update virtual clock definitions Update your online session execution options Terminate and exit this TICTOC user session CCCCCCC CCCCCC (C) COPYRIGHT IBM CORPORATION TT TT TTTTT TTT OOOOOOO OO OOOOOO 1996 ALL RIGHTS RESERVED CCCCCCC CCCCCC VERSION 2. 8. 1 C January 30, 2006 27

IBM Software Group Virtual Clock Dataset LISTING TICTOC/CICS ------ EDIT VIRTUAL CLOCK DEFINITIONS ------ REQUEST PROCESSED COMMAND ===> SCROLL ===> CSR CLOCK/TERM TRANSID USERID DATE TIME STATUS SETTING/LAST UPDATED BY >ALASKA * -04: 00 ENA KEEP 98/01/28 07: 03: 11 >FAREAST * +13: 00 ENA KEEP 98/01/29 00: 03: 11 >LONDON 2000/01/01 +05: 00 ENA KEEP 00/01/01 16: 03: 11 >WSTCOST * -03: 00 ENA KEEP 98/01/28 08: 03: 11 >LEAPYR 2000/02/28 23: 59 ENA KEEP 98/01/28 23: 59: 11 -NOTERM- * JOEUSER >LONDON DIS 98/01/28 10: 31 C 410 ISGU N 2* TE* INT* 2009/12/31 23: 59 ENA KEEP 98/01/28 10: 33 C 410 ISGU SFLA * * >WSTCOST ENA KEEP 98/01/28 11: 03 C 410 ISGU 0004 TICT C 410 ISGU 2001/11/15 * ENA KEEP 98/01/27 16: 55 C 410 ISGU 0005 * C 410 ISGU 2000/01/01 05: 30 ENA KEEP 97/05/02 12: 35 C 410 ISGU 0009 TICT * 2001/01/15 * ENA KEEP 97/06/30 11: 20 C 410 ISGU 0010 CEDF INTT 033 2002/02/18 18: 00 ENA KEEP 97/06/30 11: 14 C 410 ISGU 0010 * C 410 ISGU 2000/01/01 05: 30 ENA KEEP 97/05/06 16: 08 C 410 ISGU 0010 * INTT 033 >LONDON ENA KEEP 97/06/20 13: 11 INTT 033 0050 BLA* INTT 036 2000/01/01 00: 00 ENA KEEP 98/01/28 10: 18 C 410 ISGU 0051 * * >FAREAST ENA KEEP 98/01/28 10: 23 C 410 ISGU * TEST INTT 036 1999/12/31 23: 59 DIS 98/01/28 10: 32 C 410 ISGU **************** BOTTOM OF DATA *************** January 30, 2006 28

IBM Software Group Adding a New VCD Entry TICTOC/CICS ------ EDIT VIRTUAL CLOCK DEFINITIONS ------ REQUEST PROCESSED COMMAND ===> SCROLL ===> CSR CLOCK/TERM TRANSID USERID DATE TIME STATUS SETTING/LAST UPDATED BY >ALASKA * -04: 00 ENA KEEP 98/01/28 07: 03: 11 >FAREAST * +13: 00 ENA KEEP 98/01/29 00: 03: 11 >LONDON 2000/01/01 +05: 00 ENA KEEP 00/01/01 16: 03: 11 >WSTCOST * -03: 00 ENA KEEP 98/01/28 08: 03: 11 -NOTERM- * JOEUSER >LONDON DIS 98/01/28 10: 31 C 410 ISGU N 2* TE* INT* 2009/12/31 23: 59 ENA KEEP 98/01/28 10: 33 C 410 ISGU SFLA * * >WSTCOST ENA KEEP 98/01/28 11: 03 C 410 ISGU A 0004 TICT C 410 ISGU 2001/11/15 * ENA KEEP 98/01/27 16: 55 C 410 ISGU 0005 * C 410 ISGU 2000/01/01 05: 30 ENA KEEP 97/05/02 12: 35 C 410 ISGU 0009 TICT * 2001/01/15 * ENA KEEP 97/06/30 11: 20 C 410 ISGU 0010 CEDF INTT 033 2002/02/18 18: 00 ENA KEEP 97/06/30 11: 14 C 410 ISGU 0010 * C 410 ISGU 2000/01/01 05: 30 ENA KEEP 97/05/06 16: 08 C 410 ISGU 0010 * INTT 033 >LONDON ENA KEEP 97/06/20 13: 11 INTT 033 0050 BLA* INTT 036 2000/01/01 00: 00 ENA KEEP 98/01/28 10: 18 C 410 ISGU 0051 * * >FAREAST ENA KEEP 98/01/28 10: 23 C 410 ISGU * TEST INTT 036 1999/12/31 23: 59 DIS 98/01/28 10: 32 C 410 ISGU **************** BOTTOM OF DATA *************** January 30, 2006 29

IBM Software Group Adding a New VCD Entry TICTOC/CICS -------- VIRTUAL CLOCK ADDITION --------------COMMAND ===> Termid Transid Userid Date ===> 0050 BLA* INTT 036 2000/01/01 Time ===> 00: 00 Status Keep? ===> ENABLE ===> YES Terminal name or generic pattern Transaction name or generic pattern User name or generic pattern Start date in YYYY/MM/DD format, a number from -9999 to +9999 days, an '*' for the actual current date or an Independent TOD Clock (ITC) name Start time in HH: MM format, a number from -23: 59 to +23: 59 hours or '*' for the actual current time Specify ENABLE or DISABLE Save this entry for future CICS startups? (YES or NO) Press the END key to add the virtual clock definition. Use the CANCEL command to cancel the request. January 30, 2006 30

IBM Software Group Adding a Independent Time of Day Clock (ITC) VCD Entry (Using ADD C) TICTOC/CICS ------ INDEPENDENT TOD CLOCK ADDITION ------ INVALID TIME COMMAND ===> Clock Date ===> >FAREAST ===> * Time ===> +13: 00 Status Keep? ===> ENABLE ===> YES Independent TOD Clock (ITC) name Start date in YYYY/MM/DD format, a number from -9999 to +9999 days or '*' for the actual current date Start time in HH: MM format, a number from -23: 59 to +23: 59 hours or '*' for the actual current time Specify ENABLE or DISABLE Save this entry for future CICS startups? (YES or NO) Press the END key to add the Independent TOD Clock definition. Use the CANCEL command to cancel the request. January 30, 2006 31

IBM Software Group VCD Entry Using ITC TICTOC/CICS -------- VIRTUAL CLOCK ADDITION --------------COMMAND ===> Termid Transid Userid Date ===> 0051 * * >FAREAST Time ===> Status Keep? ===> ENABLE ===> YES Terminal name or generic pattern Transaction name or generic pattern User name or generic pattern Start date in YYYY/MM/DD format, a number from -9999 to +9999 days, an '*' for the actual current date or an Independent TOD Clock (ITC) name Start time in HH: MM format, a number from -23: 59 to +23: 59 hours or '*' for the actual current time Specify ENABLE or DISABLE Save this entry for future CICS startups? (YES or NO) Press the END key to add the virtual clock definition. Use the CANCEL command to cancel the request. January 30, 2006 32

IBM Software Group DB 2 Support DB 2 Applications using ATF § Can be done with an entry in the Virtual Clock Dataset (VCD) or by using the ATF JCL interface (EXEC PGM=TICON). January 30, 2006 33

IBM Software Group Additional Topics January 30, 2006 34

IBM Software Group Next Release § Current Release is ATF V 2. 8. 6 § Next Release is V. 3. 0 January 30, 2006 35

IBM Software Group Security Issues ATF—Security § By job class or by jobname § Use system security (RACF, etc. ) § Optional security restrictions (VCD access) § Security table controls access to VCD § User-written security exit January 30, 2006 36