The client just installed CA Date Simulator r 2.0. How can the client IVP the product installation to make sure the product was installed correctly?
Article ID: 125556
Updated On:
Products
Date Simulator
Issue/Introduction
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 maintenance. How can the client verify the product has been installed correctly?
Environment
Z/OS
Resolution
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
PROGRAM-ID. TIMECOB.
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
AND
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
DATESIM.R20.JCL(LEOFFSET)
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)
JOBCARD
//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
//TIMECOB JOBCARD
//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
DATE 180921
DAY 18264
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
PROGRAM-ID. TIMECOB.
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
AND
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
DATESIM.R20.JCL(LEOFFSET)
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)
JOBCARD
//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
//TIMECOB JOBCARD
//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
DATE 180921
DAY 18264
Feedback
Yes
No
Powered by
