A fix is available
APAR status
Closed as program error.
Error description
Transaction is defined to CICS with RESTART=YES. If the program issues an EXEC CICS RETRIEVE before an abend occurs, transaction restart will not take place.
Local fix
Do not use the retrieve command. Use a TSQ or a file etc. to transfer data between tasks.
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users. * **************************************************************** * PROBLEM DESCRIPTION: A task started via an EC START TRAN() * * TERM() FROM() at a local terminal * * receives an ENDDATA condition on the * * first retrieve when restarted. * **************************************************************** * RECOMMENDATION: * **************************************************************** A transaction which has RESTART(YES) specified is started via an EXEC CICS START TERM() TRAN() FROM() command at a LOCAL terminal. . The application issues an EXEC CICS RETRIEVE to retrieve the FROM data and marks this in the AID by turning on AIDCANCL. . Following the task abending, DFHREST is called and tells Recovery Manager that the transaction should be restarted. The PERFORM_COMMIT routine for LTRC (Local Terminal) attaches the new restarted task, however the ALRC (Aid Token) routine incorrectly freemains the AID storage and leaves AIDCANCL set. . When the restarted task binds the AID to the new task it continues to use the just freed AID storage which could have led to unpredictable results if the storage had been reused. However in the customer's case it had not, but the subsequent EXEC CICS RETRIEVE fails with an ENDDATA condition because the AID passed to DFHALP's RETRIEVE_START_DATA still has AIDCANCL set. Additional Keywords alrc_commit rmro_restart
Problem conclusion
DFHALRC has been changed in the PERFORM_COMMIT routine for LOCAL terminal only, so that if the task is restarting the AID will not be freemained and the AIDCANCL flag will be turned off. This will mean that the restarting task has access to the AID and is able to retrieve the FROM data.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PK88760
Reported component name
CICS TS Z/OS V4
Reported component ID
5655S9700
Reported release
600
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2009-06-12
Closed date
2009-09-15
Last modified date
2009-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK50178
Modules/Macros
DESALRC DFHALRC
Fix information
Fixed component name
CICS TS Z/OS V4
Fixed component ID
5655S9700
Applicable component levels
R600 PSY UK50178
UP09/09/19 P F909
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":"4.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":"4.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
02 October 2009