A fix is available
APAR status
Closed as program error.
Error description
Problem: If a user invokes CEDF for transaction which executes a modules linked using LE (in this case Enterprise COBOL 3.4), then if the PF12 ABEND USER TASK option is selected at some point, then abend ASRA is generated, not the requested abend code. . The follwoing messages were issued : DFHAP1301 Language Environment has detected a corruption of its control blocks. Transaction aaaa currently executing. DFHSR0001 An abend (code 0C4/AKEA) has occurred at offset X'FFFFFFFF' in program bbbbbbbb. . The dump shows : In CICS trace we see a call to LE for RUNUNIT_END_INVOCATION and then an unexpected 0c4 occurs in LE: Instruction Length: 6 Interrupt Code: 0004 PSW: 079D1000 9CBAD6CE Module CEEPLPKA + X'AD6CE' PSW is pointing into LE module CEEHCDLG. Additional Symptoms: CEDF suffers recursive abend ASRA's and CICS has to be canceled. You also get message: DFHSR0001 CISBTRD AN ABEND (CODE 0C4/AKEA) HAS OCCURRED AT OFFSET X'FFFFFFFF' IN PROGRAM RT026. . RT026 is a LE module. . You may see an 0C4 in CEEHSGL + x'39C' trying to reference the of the EDBOCB, off of the EDB+x'10'. Trace shows: QR SM 0301 SMGF ENTRY FREEMAIN 00100478,LE_RUWA,TASK24 QR SM 0301 SMGF ENTRY GETMAIN 4D68,YES,LE_RUWA,TASK24 QR SM 0302 SMGF EXIT GETMAIN/OK 00100478 It looks like we are out of sync here on when this RUWA area is freed and/or getmained When disconnecting from your terminal when using BMS you may receive the following: DFHSR0001 An abend (code 0C4/AKEA) has occurred at offset X'FFFFFFFF' in program PROGRAMA. DFHPG0001 An abend (code ---/AKEC) has occurred at offset X'0FBA' in module DFHPGPG. CICS trace shows the task abending with the expected ATNI. Then Language Environment (LE) is called for Rununit_End_Invocation. Abend0C4 then occurs in CEEHSGL. Repeated DFHSR0001 messages follow. ADDITIONAL KEYWORDS: CAA TRANISO ISOLATION CEECCICS AXMZ ABENDAXMZ
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All. * **************************************************************** * PROBLEM DESCRIPTION: If CEDF is used to request an abend of * * a user application, this can lead to a * * program check in Language Environment. * **************************************************************** * RECOMMENDATION: * **************************************************************** If you are running an application under CEDF and you use the abend function, PF12, then CICS prematurely freemains RUWA storage needed by LE. This leads to a program check in LE. A similar problem can occur if an abend occurs while performing BMS paging. Additional Keywords: CSPG AZTS PGLK LINK LE_RUWA DFHEDFX ru_active DFHSR0001 DFHAP1301 ASRA 0C4 AKEA
Problem conclusion
UK33633 UK33634 UK37409 UK37410 DFHAPLI1 has been changed so that it does not freemain LE's storage for non-LE programs.
Temporary fix
********* * HIPER * ********* FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PK75298
Reported component name
CICSTS V3 Z/OS
Reported component ID
5655M1500
Reported release
500
Status
CLOSED PER
PE
YesPE
HIPER
YesHIPER
Special Attention
NoSpecatt
Submitted date
2008-11-11
Closed date
2009-01-08
Last modified date
2013-01-25
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PK76819 UK42915 UK42916
Modules/Macros
DESLI1 DFHAPLI1 DFHAPLJ1 DFHAPLX1
Fix information
Fixed component name
CICSTS V3 Z/OS
Fixed component ID
5655M1500
Applicable component levels
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:
25 January 2013