A fix is available
APAR status
Closed as program error.
Error description
In a program (both ASM and COBOL) the command EXEC CICS INQUIRE SYSTEM CICSTSLEVEL(ws-area) incorrectly returns binary zeros, and gives RESP = 0 and RESP2 = 0. CEMT I SYS returns 010101, as it should. This failure only happens when it is used in a program.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All * **************************************************************** * PROBLEM DESCRIPTION: EXEC CICS INQUIRE SYSTEM CICSTSLEVEL * * returns binary zeros. * **************************************************************** * RECOMMENDATION: * **************************************************************** If CICSTSLEVEL is the only parameter on an EXEC CICS INQUIRE SYSTEM command, binary zeros are returned with a normal response. If other parameters are present, the correct version, release and modification level are returned. CEMT INQUIRE SYS and CECI INQUIRE SYSTEM also return the correct result.
Problem conclusion
DFHEIQSA has been modified so that an EXEC CICS INQUIRE SYSTEM CICSTSLEVEL command returns the correct version, release and modification level when CICSTSLEVEL is the only parameter.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PK62802
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-03-19
Closed date
2008-06-20
Last modified date
2008-11-10
APAR is sysrouted FROM one or more of the following:
PQ40898
APAR is sysrouted TO one or more of the following:
UK37472
Modules/Macros
DFHEIQSA
Fix information
Fixed component name
CICSTS FOR VSE
Fixed component ID
564805400
Applicable component levels
RB0P PSY UK37472
UP08/06/23 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