The MVS Agent 21.0.5 on z/OS V2R5 terminates with Abend 0C4 in Module UCXJM25 at offset 00086E7E with reason code 10.
Example:
19.01.50 JOB18253 IRR010I USERID L0INTR IS ASSIGNED TO THIS JOB.
19.01.50 JOB18254 $HASP100 H0829126 ON INTRDR AG4ASV/0829/ANLASS FROM STC16574 UC4RUN
19.01.50 JOB18254 IRR010I USERID L0INTR IS ASSIGNED TO THIS JOB.
19.02.04 STC16574 IEA995I SYMPTOM DUMP OUTPUT 916
916 SYSTEM COMPLETION CODE=0C4 REASON CODE=00000010
916 TIME=19.01.51 SEQ=37839 CPU=0000 ASID=02AA
916 PSW AT TIME OF ERROR 078D1400 8008EB3E ILC 4 INTC 10
916 ACTIVE MODULE ADDRESS=00000000_00007CC0 OFFSET=00086E7E
916 NAME=UCXJM25
916 DATA AT PSW 0008EB38 - 4110D098 0DEF5800 201495F1
916 GR 0: 00000000_00091806 1: 00000000_8008BADA
916 2: 00000000_26C18080 3: 00000000_0008EB8E
916 4: 00000000_25460038 5: 00000000_0001F4B0
916 6: 00000000_25478CC0 7: 0000004E_254A3A98
916 8: 00000000_254A3AA0 9: 00000000_254A3360
916 A: 00000000_26C18080 B: 00000000_000917D8
916 C: 00000000_001D30C0 D: 00000000_254A3D60
916 E: 00000000_8008EB3E F: 00000000_0009185A
916 END OF SYMPTOM DUMP
19.02.04 STC16574 BPXP018I THREAD 259CB80000000001, IN PROCESS 16845780, ENDED 917
917 WITHOUT BEING UNDUBBED WITH COMPLETION CODE 840C4000
917 , AND REASON CODE 00000010.
Release : 21.0.5
Component: Agent MVS
OS: z/OS V2R5
Defect, it's assumed that newer compiler optimizations and memory management changes lead to this crash as this code has not changed over the last six years.
Set to HEAP(4M,4M,ANY,KEEP) instead of HEAP(4M,4M,ANY,FREE) in the JCL that starts the Agent MVS and then restart the Agent MVS.
Example of fix:
000001 //UC4RUN PROC
000002 //*
000003 //UC4RUN EXEC PGM=UCXJM25,
000004 // REGION=0M,TIME=1440,
000005 // PARM=('/SYS6.UC4.LMX.INI')
000006 //STEPLIB DD DISP=SHR,DSN=SYS1.UC4.LOADLIB
000007 //SSTORE DD DISP=SHR,DSN=SYS6.UC4.LMX.SSTORE
000008 //CEEOPTS DD *
000009 HEAP(4M,4M,ANY,KEEP)
000010 RPTOPTS(ON)
000011 RPTSTG(ON)
000012 STACK(128K,128K,ANY)
000013 TRAP(OFF)
000014 /*
000015 //SYSPRINT DD SYSOUT=*
000016 //STDOUT DD SYSOUT=*
000017 //SYSCPRT DD SYSOUT=*
000018 //JOBOUT DD SYSOUT=(A,INTRDR)
This problem is currently being worked on by Engineering and the planned fix delivery method will be communicated at a later time