A fix is available
APAR status
Closed as program error.
Error description
DFHAP0001 LIBRCICS An abend(code 0C4/AKEA)has occurred at offset X'000039F0' in module DFHEMSRE in the ROWCOL routine. DFHEMSR3 was attempting a loop through the fields entered into the last MAP that was received for the CEOS REPORT LIST panel. The number of commands is supposed to be passed to DFHEMSR3 in a commarea,however at the time of the dump that commarea is all binary zeroes, including the CAINLEN field, which should contain the length of the length of the area holding the list of commands pointed to by CAINPTR, which is based off of INPDATA. Routine NOTECOMD expects the input length of the data received to be a multiple of 4 but in this case it was x16, so the loop end condition was missed. The RECEIVE for the data entered on the CEOS list panel received was x'1E' bytes of data, but code relies on input data of multiples of 4 bytes. As this data was not on a 4 byte multiple, looping past the end of the data which caused the abend0c4.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All CICS Users. * **************************************************************** * PROBLEM DESCRIPTION: DFHAP0001 An abend(code * * 0C4/AKEA) has occurred at offset * * X'000039F0' in module DFHEMSRE. * **************************************************************** * RECOMMENDATION: * **************************************************************** RCF outputs menu lists of terminals, reports, TD queues or jobs. The next transid is set to read the input screen, which can be action requests against any of the list items. The input consists of a possible series of 4 byte fields containing an SBA, a buffer address and an action code. The list processors (DFHEMST3, DFHEMSR3, DFHEMSP3 or DFHEMSJ3) run through the input 4 bytes at a time until the data length processed equals the data input. In this case the received TIOA did not contain data whose length was a multiple of 4 bytes resulting in the transaction looping off the end of the TIOA. Additional keywords: abend0C4 abendS0C4 msgDFHAP0001 ASRA abendASRA DFHAC2206 msgDFHAC2206 CEMS CEOS abendAKEA
Problem conclusion
DFHEMSR3, DFHEMSP3, DFHEMSJ3, and DFHEMST3 have been altered to stop processing data when they encounter the end of the TIOA.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
**** PE08/10/17 FIX IN ERROR. SEE APAR PK71166 FOR DESCRIPTION
APAR Information
APAR number
PK45212
Reported component name
CICSTS FOR VSE
Reported component ID
564805400
Reported release
B0P
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2007-05-15
Closed date
2007-10-04
Last modified date
2008-10-23
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK29951
Modules/Macros
DFHEMSJ3 DFHEMSP3 DFHEMSR3 DFHEMST3
Fix information
Fixed component name
CICSTS FOR VSE
Fixed component ID
564805400
Applicable component levels
RB0P PSY UK29951
UP07/10/15 P E412
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":"1.1.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
23 October 2008