A fix is available
APAR status
Closed as program error.
Error description
EXEC CICS INQUIRE TSQUEUE AT('xxxxxxxx') position the browse at the wrong spot when the AT parm is 8 characters long. . For example on this series of commands: EXEC CICS WRITEQ TS QUEUE('TBRW004') FROM(AREA) EXEC CICS WRITEQ TS QUEUE('TBRW0051') FROM(AREA) EXEC CICS WRITEQ TS QUEUE('TBRW0052') FROM(AREA) EXEC CICS INQUIRE TSQUEUE START AT('TBRW0052') EXEC CICS INQUIRE TSQUEUE(HERE) NEXT EXEC CICS INQUIRE TSQUEUE END --------------------------------- The INQUIRE TSQUEUE NEXT returns TBRW0051 rather than the expected TBRW0052
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All * **************************************************************** * PROBLEM DESCRIPTION: An EXEC CICS INQUIRE TSQUEUE START * * AT('xxxxxxxx') command positions the * * browse cursor incorrectly. * **************************************************************** * RECOMMENDATION: * **************************************************************** Due to incorrect positioning within the binary tree of temporary storage queue nodes, INQUIRE TSQUEUE NEXT or TSQNAME NEXT can return incorrect queue data, specifically the preceding queue to the one that should be returned.
Problem conclusion
DFHTSUT has been amended to correctly position the browse cursor.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PK67956
Reported component name
CICSTS FOR VSE
Reported component ID
564805400
Reported release
B0P
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2008-06-20
Closed date
2008-07-03
Last modified date
2008-11-10
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK37874
Modules/Macros
DFHTSUT
Fix information
Fixed component name
CICSTS FOR VSE
Fixed component ID
564805400
Applicable component levels
RB0P PSY UK37874
UP08/07/07 P E420
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":"1.1.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
10 November 2008