A fix is available
APAR status
Closed as program error.
Error description
Problem similar to the one described in PK83174. However in this case the command is a CEMT SET TSQ(*) DELETE, which results in a true SET, which then results in an attempt to overwrite ERDSA and an Abend0c4. The S0C4 occurns when invalid values cause module DFHEMT56(UK49670) +X'1832' to overwrite the ERDSA storage. Additional Keywords: 1832, DFHEMT56, PK83174, 83174, DELETE, ERDSA
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All. * **************************************************************** * PROBLEM DESCRIPTION: CEMT S TSQ(*) DELETE results in an * * abend0C4 in DFHEMT56. * **************************************************************** * RECOMMENDATION: * **************************************************************** An attempt to delete more than 32767 tsqueues using CEMT SET TSQUEUE(*) DELETE results in a storage violation. This is because a multiply halfword instruction in DFHEMT56 causes a large negative value to be used as an offset into storage, and so an attempt is made to write into ERDSA. Additional Keywords: DFHEIN56
Problem conclusion
DFHEMT56 has been changed to limit the number of elements being set for CEMT SET TSQUEUE to 32766. If the number of elements is greater than or equal to 32767, a "too many elements" message is displayed and no tsqueues will be deleted by the SET request.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PM02474
Reported component name
CICSTS V3 Z/OS
Reported component ID
5655M1500
Reported release
500
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2009-12-01
Closed date
2010-02-26
Last modified date
2010-04-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PM08298 UK54718
Modules/Macros
DFHEIMDS DFHEIN56 DFHEMT56
Fix information
Fixed component name
CICSTS V3 Z/OS
Fixed component ID
5655M1500
Applicable component levels
R500 PSY UK54718
UP10/03/03 P F003
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:
02 April 2010