A fix is available
APAR status
Closed as program error.
Error description
The problem happens when processing by TSQUEUE, maximum length 8 bytes, and you find a queue name more than 8 bytes long. The correct behavior, as shown in v5.5 and earlier, is that if you do a delete by TSQUEUE then any queue names more than 8 bytes in length are ignored. Only TSQUEUE names with a length of 8 bytes or less are deleted. The code at v5.6 does not cope correctly with names more than 8 bytes. When it finds a long name it fails with RESPONSE=1029=FAILED REASON=1359=EXCEPTION. We will change CICS TS v5.6 and above to work like v5.5 and prior releases.
Local fix
Use TSQNAME instead of TSQUEUE on the DELETE command
Problem summary
**************************************************************** * USERS AFFECTED: All CICSPlex SM users. * **************************************************************** * PROBLEM DESCRIPTION: When processing TS queues via the CPSM * * API using TSQUEUE keyword, EYU0NQSQ * * does not correctly process, i.e. * * ignore, names longer than 8 bytes. * * Instead the API call fails with * * RESPONSE=1029=FAILED * * REASON=1359=EXCEPTION. * **************************************************************** CICSPlex SM provides access to CICS Temporary Storage queues through the TSQUEUE and TSQNAME resource tables. The TSQUEUE table supports TS queues with names up to 8 characters. TSQNAME provides full access to CICS TS queues with names up to 16 characters. At 5.6, method NQSQ (EYU0NQSQ -- the processor for TSQUEUE requests) was modified to return new information on an INQUIRE TSQUEUE that was made available at that release. Logic to handle queue names longer than 8 characters, and exclude these from the CPSM result set, was missed. In a CICS system which contains a TS queue with a name of more than 8 characters, attempts to build a TSQUEUE result set will fail. Method NQSQ will issue exception trace entry 406, with debug string "BAD NEXT".
Problem conclusion
EYU0NQSQ has been modified to restore v5.5 and prior behaviour. I.e. queue names of more than 8 bytes will be ignored when processing by TSQUEUE.
Temporary fix
Comments
APAR Information
APAR number
PH60636
Reported component name
CICS TS Z/OS V6
Reported component ID
5655YA100
Reported release
40M
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2024-04-02
Closed date
2024-04-10
Last modified date
2024-05-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI96437
Modules/Macros
EYU0NQSQ
Fix information
Fixed component name
CICS TS Z/OS V6
Fixed component ID
5655YA100
Applicable component levels
R40M PSY UI96437
UP24/04/12 P F404
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":"40M","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
02 May 2024