A fix is available
APAR status
Closed as unreproducible.
Error description
You are running CICS TS 3.2 . All of the target systems are disconnected from the routing region. In the routing region, your first attempt to dymamically route a LINK PROGRAM fails with PGMIDERR RESP2=25. RESP2=25 means "The dynamic routing program rejected the link request.". This is the expected response. A subsequent route of the LINK PROGRAM fails with PGMIDERR and incorrectly returns RESP2=1. You expect it to be RESP2=25. RESP2=1 means "A program has no entry in the PPT and either program autoinstall was switched off, or the program autoinstall control program indicated that the program should not be autoinstalled." Your program is defined as DYNAMIC(YES) REMOTESYSTEM(####) TRANSID(EP1R) Additional Symptom(s) and Keyword(s): KIXREVSCB
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users. * **************************************************************** * PROBLEM DESCRIPTION: CICS returns PGMIDERR and EIBRESP2 = 1 * * when a dynamically routed LINK request * * fails because the remote system is * * invalid or unavailable. * **************************************************************** * RECOMMENDATION: * **************************************************************** An application issues an EXEC CICS LINK for a program that is defined as DYNAMIC and REMOTE. CICS calls the dynamic routing program DFHDYP before issuing the LINK request, DFHDYP returns the remote SYSID it was passed unchanged and sets the return code DYRRETC to 0. CICS then processes the LINK request. The request fails because either the remote SYSID specified on the program definition does not exist, or does exist but the connection is currently out-of-service. After the LINK failure CICS calls DFHDYP again with DYRFUNC = 1 'routing error'. DFHDYP returns the remote SYSID it was passed unchanged and sets the return code DYRRETC to 8 to terminate the routing request. CICS then returns to the application with PGMIDERR and EIBRESP2 = 1. An EIBRESP2 value of 1 for PGMIDERR means 'A program has no entry in the PPT and either program autoinstall was switched off, or the program autoinstall control program indicated that the program should not be autoinstalled' which is inappropriate for this failure to route to a remote system. The problem also occurs if EYU9XLOP is the dynamic routing program.
Problem conclusion
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
CICS has been changed so that PGMIDERR will be returned to the application with EIBRESP2 = 25 when all target regions are disconnected from the routing region. An EIBRESP2 value of 25 means 'The dynamic routing program rejected the link request'.
APAR Information
APAR number
PM66519
Reported component name
CICSTS V3 Z/OS
Reported component ID
5655M1500
Reported release
500
Status
CLOSED UR3
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-06-11
Closed date
2012-08-21
Last modified date
2012-09-05
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK81219
Modules/Macros
DFHEPC
Fix information
Fixed component name
CICSTS V3 Z/OS
Fixed component ID
5655M1500
Applicable component levels
R500 PSY UK81219
UP12/08/24 P F208
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:
05 September 2012