A fix is available
APAR status
Closed as program error.
Error description
At CICSTS42 emergency restart, abend DFHTS1310 1310_abend_9 is detected. The error is issued during DFHTSAM CHECK process because the existing byte map is different from the copied one. These are the events that lead to the problem: during the previous run, the CESD task created an ICE for REQID DFHCESD to restart itself from. When CICS was emergency restarted, the backwards read of the log would have rebuilt the TSQ data for queue DFHCESD, along with an ICE to reflect the IC_DATA recovered from the log. At the end of the backwards log reading, end_delivery is called. DFHTSRM needs to know if queues are to be kept or not, as some that have been recovered need to be deleted. It calls ICRC to DELIVER_IC_RECOVERY_DATA to see whether IC wants the queue data to be kept or delete ICUS data associated with an ICE for security purposes. ICRC calls ICUS to CREATE_ICE_USER_EXTENSION to recreate this. However, this call fails with DISASTER for INVALID_FLATTENED_ICUS . DFHTSRM do some final checking before exiting, and calls perform_end_delivery_checks. This drives a TSAM CHECK. This copies the existing bytemap, then clears the real bytemap and rebuilds it from all the TSQs. The two byte maps should be identical. In this case however, there is a TSQ for DFHCESD that was rebuilt from the log, but because of the error from ICRC DFHTSRM didn't get as far as calling tsqueue_delete_recovered to get rid of the TSQ (if IC has told it to) or tsqueue_recover_aux_space to update the real bytemap to say this queue data was to be kept (if IC had told TSRM to keep the queue) so we have the situation where the TSQ exists, and its storage is represented in the rebuilt bytemap, whereas its storage was not reflected in the original bytemap. This validly causes CICS to the type 9 1310.
Local fix
Define a TSMODEL for queue prefixed with DFHCESD to be non-recoverable .
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users * **************************************************************** * PROBLEM DESCRIPTION: Method tsqueue_recover failed to pass * * the correct lengths when restoring the * * TSICDATA from the log. * **************************************************************** * RECOMMENDATION: * **************************************************************** When recovering TSICDATA from temporary storage log records, DFHTSRM method tsqueue_recover passes the associated lengths of the copies of the ICE and ICUS control blocks for recovery purposes. These individual lengths were incorrect; however, the net result was that the overall contiguous length of a conflated copy of an ICE and ICUS were correct, and so a valid copy of each was created.
Problem conclusion
DFHTSRM has been changed to use the correct lengths for the copy of the ICE and ICUS control blocks.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PM79578
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
2012-12-20
Closed date
2013-04-03
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:
UK93410
Modules/Macros
DFHTSAM DFHTSBR DFHTSCL DFHTSDM DFHTSDUC DFHTSDUF DFHTSDUS DFHTSPT DFHTSQR DFHTSRM DFHTSST
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
Applicable component levels
R800 PSY UK93410
UP13/04/20 P F304
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