I made changes to the CAOCUPRT user exit and am receiving a "CAPC099E INTERNAL ERROR".
Article ID: 10496
Updated On:
Products
Issue/Introduction
I implemented CAOCUPRT user exit to force dumps to be collected by 1 of 2 different repositories based on the USERID assigned to the batch job. My implementation was accomplished by an assemble and link of the source and then an LLA refresh. I had to made several updates to my source code so it would work correctly. Each time I followed the same process of assemble, link and refresh of LLA. Things seemed to be working fine until an IPL over the weekend. No dumps were getting collected and every job that had an abend received this message ...
+CAPC099E INTERNAL ERROR. EXECUTION MONITOR OR MAPPER IN CONTROL.
The following messages are also issued in the failing jobs
CAPE007E INTERRUPT AT PSW=A46007A2 EP=1BCBB000
ABEND CODE: 840C7000
REGS 0-3 0000044B 0011144C 008E4AC8 008FDB60
REGS 4-7 00000000 001108E8 00110924 001108D0
REGS 8-B 000E8CBC 0011106C 000E12A8 000E1000
REGS C-F 000E82D0 00111008 00FD4FE0 A4600798
CAPE006E INTERNAL ABEND ENCOUNTERED
Environment
Component:
Resolution
The internal error actually happened in your customized CAOCUPRT.
You have:
USING CAOCUPRT,R12
DC CL16' &SYSDATE &SYSTIME '
STM R14,R12,12(R13) SAVE REGS
LR R12,R15 SET BASE REGISTER
SPACE ,
LR R3,R1 -> INPUT PARM LIST
I changed to:
USING CAOCUPRT,R12
STM R14,R12,12(R13) SAVE REGS
LR R12,R15 SET BASE REGISTER
B MyStart
DC CL16' &SYSDATE &SYSTIME '
MyStart DS 0H
SPACE ,
LR R3,R1 -> INPUT PARM LIST
I reassembled/linked CAOCUPRT and retested CA SymDump Batch demo program. The internal error was gone, and the Abend Report was written to my repository.
Please correct your source then retry when you get a chance.
Feedback
