A fix is available
APAR status
Closed as program error.
Error description
You are seeing: DFHMN0002 CICSPCA3 A severe error (code X'0309') has occurred in module DFHMNSR. The associated trace point shows: MN 0309 MNSR *EXC* - Release program request failed - FUNCTION(DELETE_PROGRAM) RESPONSE(EXCEPTION) REASON(PROGRAM_NOT_DEFINED) After a COLD start with MCT prefix YY, followed by a WARM start with prefix XX, the following occurs: 1. DFHLDLD calls DFHCCCC to see if there was a MCT prefix YY so it could be deleted, since the MCT suffix was changed to XX. 2. We know this because the RET address on the GC 2B70 trace entry points to DFHLDLD (BASE) at offset x13D6. 3. This trace entry is put out due to DATA LONGER THAN CALLERS BUFFER. 4. The RPL used to issue the READ for KEY LD_PDEFNDFHMCTYY indicates that CCCC_DATA_OUT_N is RPLRLEN (RPL+RPLRLEN which is RPL+30 (which is 44)) minus KEYLENGTH (which is 34) so CCCC_DATA_OUT_N = 10 bytes. 5. The check in DFHCCCC to see if the 10 bytes will fit in the buffer is in routine DATA_TO_USER, and the check is IF CCCC_DATA_OUT_N ᆰ> CCCC_DATA_OUT_M. CCCC_DATA_OUT_N in step 4 above is 10 bytes. CCCC_DATA_OUT_M is supposed to be the buffer length and in the RPL it is x7F8C. 6. When the error is traced, DATA1 points to DFHCCCC_PTR. DFHCCCC_PTR + 38 is CCCC_DATA_OUT_N (10 bytes). DFHCCCC+3C is CCCC_DATA_OUT_M and is supposed to be x7F8c, yet is zero. CICS issues GC 2B70 CCCC *EXC* - DATA LONGER THAN CALLERS BUFFER 7. The end result is a DFHMN0002 0309 which indicates an exception with REASON(PROGRAM_NOT_DEFINED) Although the PROGRAM_NOT_DEFINED text does not appear correct, the incorrect message is moot if the error processing the MCT is corrected. Additional Symptom(s) Search Keyword(s): KIXREVxxx
Local fix
COLD start after all MCT changes may avoid the error
Problem summary
**************************************************************** * USERS AFFECTED: All. * **************************************************************** * PROBLEM DESCRIPTION: A DFHMN0002 severe error X'0309' occurs * * in DFHMNSR. * **************************************************************** * RECOMMENDATION: * **************************************************************** Following a cold start of a CICS region with an MCT override of xx, the CICS region is started warm with an MCT override of yy, then DFHMNSR will suffer the x'0309' severe error. The error is caused when a call to the catalog domain to get the MCT xx from the global catalog fails to correctly set up the parameter list. Keywords: msgDFHMN0002 DFHMN0002 MN0002 0002
Problem conclusion
DFHLDLD has been changed to correctly call the catalog domain to get the MCT xx from the global catalog.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PM87386
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
800
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2013-04-19
Closed date
2013-05-21
Last modified date
2015-03-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK94550
Modules/Macros
DFHLDLD
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
Applicable component levels
R800 PSY UK94550
UP13/06/01 P F305
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":"5.1","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":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
04 March 2015