Following a recent z/OS upgrade, a Date Simulator batch job is failing with a U2000 abend.
Below is the relevant job log and symptom dump:
08.48.49 JOB08972 JOBNAME STEP NO 01 RUNSTEP RC=U2000
08.48.49 JOB08972 WARP000I: TRANSCENTURY DATE SIMULATOR WILL WARP DATE TO 08:48:49 ON 09/21/2018
08.48.49 JOB08972 IEF403I JOBNAME - STARTED - TIME=08.48.49
08.48.49 JOB08972 IEA995I SYMPTOM DUMP OUTPUT 302
USER COMPLETION CODE=2000
TIME=08.48.49 SEQ=05606 CPU=0000 ASID=00B1
PSW AT TIME OF ERROR 070C1000 80C642BA ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 00C642B4 - 00181610 0A0DC4C1 E3C540E2
AR/GR 0: 00AF15F4/80000000 1: 00000000/800007D0
2: 00000000/00C545E0 3: 00000000/1E913A88
4: 00000000/1EB39000 5: 00000000/1EB0ED74
6: 00000000/00ACCC0C 7: 00000000/00000007
8: 00000000/1959F020 9: 00000000/00AFF018
A: 00000000/00000002 B: 00000000/00000000
C: 00000000/80C64154 D: 00000000/E6C1D9D7
E: 00000000/80C6417A F: 07000000/00000000
END OF SYMPTOM DUMP
08.48.49 JOB08972 IEF450I JOBNAME RUNSTEP - ABEND=S000 U2000 REASON=00000000
Z/OS
CICS
The issue was caused by the Date Simulator using outdated LE Store Clock (STCK) instruction offsets in CEEPLPKA following the z/OS upgrade on the LPAR. Please note that these CEEPLPKA offsets are subject to change whenever maintenance is applied to the CEEPLPKA load module.
Date Simulator provides a utility program called STCKFNDX (Store Clock Finder) that generates a report identifying LE store clock instructions.
To locate these instructions in the LE load module CEEPLPKA within the PDS CEE.SCEERUN shipped with z/OS, please run the following JCL:
//STCKFNDR EXEC PGM=STCKFNDX
//STEPLIB DD DISP=SHR,DSN=[HLQ].DATESIM.LOAD
//SYSLIB DD DISP=SHR,DSN=CEE.SCEERUN
//OUTFILE DD SYSOUT=X
//SYSPRINT DD SYSOUT=*
To find the specific instructions, search for the literal "CEEYGMT" and use the last seven digits of the offset. For example, this version of CEEPLPKA contains two store clock instructions at offsets 001EDC40 and 001EDC44:
Possible STCKE in module CEEPLPKA, offset 001EDC40, section CEEYGMT, offset 00000278
Possible STCKF in module CEEPLPKA, offset 001EDC44, section CEEYGMT, offset 0000027C
Finally, adjust the CEEPLPKA offsets in the Date Simulator SET command as shown below to identify the new z/OS instructions:
//TIMEIVP JOB (000000),'NAME',
// CLASS=B,MSGCLASS=X,REGION=1024K,
// MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
//WARPDATE EXEC PGM=WARPPARM
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SET JOB TIMEIVP CURRENT DATE 04/14/2026 -
STCK(CEEPLPKA, 01EDC40,CEEPLPKA,01EDC44)
SHOW
/*
//EXECPGM EXEC PGM=TIMEIVP
//SYSOUT DD SYSOUT=*
//