A fix is available
APAR status
Closed as program error.
Error description
There is a PROGDEF called PROGAAA which has a REMOTENAME of PROGBBB. It is installed into TOR and AOR regions. A GET PROGDEF with W_CRIT = 'NAME=PROGAAA AND DEFVER=1.' and W_PARM = 'CICSSYS(TORREG).' where TORREG is a TOR. provides 1 record as expected A GET using W_CRIT = 'NAME=PROGBBB AND DEFVER=1.' and W_PARM = 'CICSSYS(AORREG).', where AORREG is a AOR provides 0 records, this is unexpected.
Local fix
n/a
Problem summary
**************************************************************** * USERS AFFECTED: All CICSPlex SM users. * **************************************************************** * PROBLEM DESCRIPTION: When using the CPSM API to GET * * OBJECT(PROGDEF) for a specific remote * * CICS system where the REMOTENAME and * * NAME are different the record for the * * REMOTE system will not be returned. * * Instead RESPONSE=1027=NODATA. * * * * The same can happen for TRANDEF, * * TDQDEF, and FILEDEF. * **************************************************************** * RECOMMENDATION: Apply the PTF and recycle the CMASes. These * * can be done in any order. * **************************************************************** If you have a PROGDEF with NAME=name and REMOTENAME=remname and you try to read the definition for a specific remote CICS system, using the CICSSYS(cicsname) parameter, on the CPSM API call then it won't find it and returns RESPONSE=1027=NODATA. This is because selection is performed in 3 steps, 1) Pick the PROGDEF records with NAME=remname. 2) If system=remote and object has a REMOTENAME then rename to REMOTENAME. 3) Use a QUERYMOD to select based on the CRITERIA. If you set the criteria to NAME=name then step 2 will rename it to remname and step 3 will reject it as not being NAME=name. If you set the criteria to NAME=remname then step 1 won't find it as there is no PROGDEF with name=remname. The same can happen for TRANDEF, TDQDEF, and FILEDEF resources.
Problem conclusion
The code in EYU0BMES has been modified such that - IF a resource name has been supplied, via selection CRITERIA, AND a CICS system is supplied, via a PARM statement, AND a QUERYMOD program is supplied, based on the CRITERIA, AND the resource type is one where the name can change. THEN we remove the name from the XCLL selection string and allow the QUERYMOD to perform selection.
Temporary fix
Comments
APAR Information
APAR number
PH62824
Reported component name
CICS TS Z/OS V6
Reported component ID
5655YA100
Reported release
400
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2024-08-19
Closed date
2024-09-05
Last modified date
2024-10-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI98318 UI98319
Modules/Macros
EYU0BMES
Fix information
Fixed component name
CICS TS Z/OS V6
Fixed component ID
5655YA100
Applicable component levels
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":"BU048","label":"IBM Software"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.1","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
03 October 2024