PK80049: EXEC CICS RETRIEVE PREVENT TRANSACTION RESTART FROM TAKING PLACE.

Obtain the fix for this APAR.

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 is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UK46964 PK88760

Modules/Macros

•    DESALRC  DFHALRC
  

Fix information

• Fixed component name

  CICSTS V3 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R500 PSY UK46964

     UP09/06/03 P F906

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.