A fix is available
APAR status
Closed as program error.
Error description
A user application running in user key9 links to a JAVA program which then runs on an open J9 TCB. The JAVA program then does an EXEC CICS XCTL to a COBOL program. An LE abend4038 occurs and then an ABEND0C4 in DFHAPLI1 as follows : DFHSR0001 AN ABEND (CODE 0C4/AKEA) HAS OCCURRED AT OFFSET X'00004280' IN PROGRAM DFHAPLI1. . DFHAPLI1 is running in key 9 but trying to access the EIS which is in CICS key 8 storage. CICS then loops issuing a messages : DFHSR0622 applid An attempt to access the ECDSA has caused the abend which follows: DFHSR0001 AN ABEND (CODE 0C4/AKEA) HAS OCCURRED AT OFFSET X'00004280' IN PROGRAM DFHAPLI1.
Local fix
Consider restarting CICS with STGPROT=NO in the SIT.
Problem summary
**************************************************************** * USERS AFFECTED: All * **************************************************************** * PROBLEM DESCRIPTION: Program check in DFHAPLI1 after a Java * * program XCTLs to a non-Java program. * **************************************************************** * RECOMMENDATION: * **************************************************************** An application running in user key links to a Java program which performs an EXEC CICS XCTL to a COBOL program. An LE abend4038 occurs during rununit_termination for the COBOL program which drives DFHAPLI1's recovery routine. This routine tests a flag in the PLCB, plcb_hpj_program and switches to user key if it is on. Because the COBOL program inherited the Java program's PLCB on the XCTL, plcb_hpj_program is on. Control will not be passed to a Java program, but instead to a label in DFHAPLI1 immediately following the point where LE was called for rununit_termination. The next instruction attempts to update the EIS which is in CICS key storage, but program checks because DFHAPLI1 is now in user key and CICS loops. Keywords: abendS0C4 S0C4 userkey key8 CICSkey key9 msgDFHSR0001 msgDFHSR0622 SR0001 SR0622
Problem conclusion
DFHPGLE has been changed to turn off plcb_hpj_program for non-Java programs.
Temporary fix
********* * HIPER * ********* FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PM72414
Reported component name
CICSTS V3 Z/OS
Reported component ID
5655M1500
Reported release
500
Status
CLOSED PER
PE
NoPE
HIPER
YesHIPER
Special Attention
NoSpecatt
Submitted date
2012-09-07
Closed date
2012-09-27
Last modified date
2012-11-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PM72496 UK82254
Modules/Macros
DFHPGLE DFHPGLK DFHPGLU DFHPGPG
Fix information
Fixed component name
CICSTS V3 Z/OS
Fixed component ID
5655M1500
Applicable component levels
R500 PSY UK82254
UP12/10/08 P F210
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"3.2","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"3.2","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 November 2012