The client will be using CA Date simulator to test date changes on their system with application program. The client just installed CA date Simulator r 2.0 and apply the latest maintnenace. How can the client verify the product has been installed correctly?
Please do the following
Start the CA Date Simulator started task WARPMAIN.
Next Compile and link the COBOL programs shipped with the base install. These programs are TIMECOB or TIMEIGY are located in the HLQ.CNTL dataset. In the TIMECOB program change PROGRAM-ID. SUNDAY. to
Run Date Simulator program STCKFNDX to find the store Clock instruction in the LE module CEE.SCEERUN(CEEPLPKA) as outline in chapter three of the Date simulator Installation and Users Guide.
To find the STORE clock instructions please do a FIND on literal CEEYGMT and use the last seven digits in the offset. This CEEPLPKA has two store clock instructions.
Possible STCKE in module CEEPLPKA, offset 001EDC40,
section CEEYGMT, offset 00000278
Possible STCKF in module CEEPLPKA, offset 001EDC44,
section CEEYGMT, offset 0000027C
Please create a PDS member in your Date Simulator JCL PDS called LEOFFSET(you can call the member what you like)
I have one called
In this member please add the following parameter to Identify the offsets of your sites Store clock instructions from the STCKFNDX report you sent me and listed above.
STCK(CEEPLPKA, 01EDC40,CEEPLPKA, 01EDC44)
Next issue the SET command for program TIMECOB so WARPMAIN knows we are changing the date for that program to LAST year’s date of 09-21-2018
In the JCL below the SET COMMAND points to the PDS that contains the store clock offsets
Sample JCL is in HLQ.CNTL(WARPPARM)
//JOBLIB DD DISP=SHR,DSN=DATESIM.R20.APFLOAD
//WARPDATE EXEC PGM=WARPPARM
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SET JOB TIMECOB CURRENT DATE 09/21/2018 -
// DD DSN= DATESIM.R20.JCL(LEOFFSET),DISP=SHR
You should see message after this batch job runs.
*0002: TIMECOB :Job has been set
Next run the JCL below to execute the TIMECOB program to change the date to 09-21-2018
NOTE: MAKE SURE the NAME on the JOBCARD is TIMECOB. That is the program we told WARPMAIN to warp-change. Ot
//RUNSTEP EXEC PGM=TIMECOB
//STEPLIB DD DISP=SHR,DSN=IVP.LOAD
//SYSOUT DD SYSOUT=*
In the output of the TIMECOB program you can see the date is now 09-21-2018