A fix is available
APAR status
Closed as program error.
Error description
You are investigating a problem and using CICS trace to see where EXEC CICS calls are made from a COBOL program. In the trace, the AP E160 trace entries give the COBOL statement numbers similar to this: COBOLII STMT_#(#####) where ##### is the COBOL statement number from the compile. If the external translator is used, the statement number that shows up in the translator listing is 5 digits, and the trace is correct. If the integrated translator is used (not a separate translate step) for COBOL, the statement numbers that appear in the compile listing are 6 digits. When the trace entry is made, the final digit is truncated, and the statement number is incorrect.
Local fix
use external translator
Problem summary
**************************************************************** * USERS AFFECTED: All CICS Users. * **************************************************************** * PROBLEM DESCRIPTION: CICS trace truncates 6 digit COBOL * * statement numbers to 5 digits. * **************************************************************** A CICS EXEC Interface Level 2 trace is set up and a program compiled with the COBOL integrated translator is run. CICS trace formats and writes trace entries, but only caters for COBOL statement numbers / LineIDs up to a length of 5 characters. The final digit is truncated.
Problem conclusion
CICS trace has been changed to cater for COBOL statement numbers up to a length of 6 characters.
Temporary fix
Comments
APAR Information
APAR number
PH28845
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
200
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2020-08-26
Closed date
2021-01-04
Last modified date
2021-02-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI73324 UI73325
Modules/Macros
DFHAPTRS DFHEIGR DFHEISR
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
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.
[{"Line of Business":{"code":"LOB35","label":"Mainframe SW"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.5"}]
Document Information
Modified date:
02 February 2021