A fix is available
APAR status
Closed as program error.
Error description
EXEC CICS READNEXT in CICS TS 5.5 corrupts RIDFLD leading to unexpected results. On return from VSAM, DFHFCRS will begin to ensure CICS returns the appropriate data to DFHFCFR. At this point TEMPKEYA is set up by find_where_key_is and sets it by looking at RPLAREA plus the Relative Key Position ( FCTDSRKP ) which in this case is zero. At this point the RPLAREA is also the FCFR_BUFFER_ADDRESS so now TEMPKEYA points to the same area. The code continues to make sure we update FCFR_RECORD_ID_ADDRESS with the found key. Since CICS wants to move the exact number of bytes that match the keylength the compiler will need to use FCTE_PTR to find FCTDSKL. At this point the compiler makes a choice to initialize the data at FCFR_RECORD_ID_ADDRESS to x'40' for the length of FCTDSKL before moving in TEMPKEYA. Since TEMPKEYA points to the same place as FCFR_RECORD_ID_ADDRESS the area is cleared and the key returned from VSAM is lost.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All CICS Users with UI62345 applied. * **************************************************************** * PROBLEM DESCRIPTION: In CICS TS 5.5 an EXEC CICS READNEXT * * can result in corruption of the RIDFLD. * **************************************************************** An EXEC CICS READNEXT at CICS TS 5.5 results in the corruption of the RIDFLD. DFHFCRS attempts to move tempkeya into the fcfr_record_id_address. Before the move the target address is being initialised due to a pointer's attribute in use. However in this case the target and source address of the move are the same, resulting in the corruption of tempkeya before the move.
Problem conclusion
UI62345 DFHFCRS has been changed so that the target address is not initialised before the move.
Temporary fix
Comments
APAR Information
APAR number
PH12501
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
200
Status
CLOSED PER
PE
YesPE
HIPER
YesHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2019-05-24
Closed date
2019-07-05
Last modified date
2019-08-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI64083
Modules/Macros
DFH$FCBF DFH$FCBV DFH$FCLD DFHAPTR5 DFHFCBD DFHFCFS DFHFCIR DFHFCLGD DFHFCLJ DFHFCLJ1 DFHFCLJT DFHFCQU DFHFCRC DFHFCRS DFHFCVS DFHJUP DFHL2LB DFHL2SR2 DFHLGICV
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
Applicable component levels
R200 PSY UI64083
UP19/07/08 P F907
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.5","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.5","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 August 2019