A fix is available
APAR status
Closed as program error.
Error description
CICS translator program does not insert DFHEIBLK and DFHCOMMAREA into the linkage-section of a COBOL program when a COBOL floating comment is in the identification division statement line when the program is a nested COBOL program.
Local fix
Remove floating comments from the identification division line.
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users. * **************************************************************** * PROBLEM DESCRIPTION: COBOL compilations fail with message * * IGYPS2121-S "DFHEIBLK" was not * * defined as a data-name. * * or message * * IGYPS2121-S "DFHCOMMAREA" was not * * defined as a data-name. * **************************************************************** A CICS COBOL program has nested programs that have COBOL floating comments on their identification division statements - for example: IDENTIFICATION DIVISION. *> Floating Comment The program is processed by the CICS stand-alone translator DFHECP1$. The translator should insert DFHEIBLK and DFHCOMMAREA declarations into the linkage section of the nested program. The presence of the floating comment on the identification statement prevents the translator from inserting those declarations.
Problem conclusion
UI72894 UI72895 UI72896 The CICS stand-alone translator has been changed to generate DFHEIBLK and DFHCOMMAREA declarations when a COBOL program has floating comments in nested program identification division statements.
Temporary fix
Comments
APAR Information
APAR number
PH41716
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
200
Status
CLOSED PER
PE
YesPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2021-11-01
Closed date
2022-01-06
Last modified date
2022-02-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI78832 UI78834 UI78835
Modules/Macros
DFHEAM07 DFHEAM11 DFHEAMAA DFHECM07 DFHECM10 DFHECM11 DFHECM14 DFHECM17 DFHECMAC DFHECMPC DFHECMSC DFHEDM07 DFHEDM10 DFHEDM11 DFHEDM14 DFHEDM17 DFHEDMAD DFHEIN11 DFHEIN12 DFHEIN19 DFHEIN21 DFHEIN51 DFHEMT11 DFHEMT12 DFHEMT19 DFHEMT21 DFHEMT51 DFHEPM07 DFHEPM10 DFHEPM11 DFHEPM14 DFHEPM17 DFHEPMAP DFHESP11 DFHESP12 DFHESP19 DFHESP21 DFHESP51 DFHEXM00 DFHEXM01 DFHEXM05 DFHEXM06 DFHEXM12 DFHEXM15 DFHEXMAB DFHEXMAN DFHEXMG1 DFHEXMG2 DFHEXMG3 DFHEXMG4 DFHEXMG5 DFHEXMKW DFHEXMOD DFHEXMS1 DFHEXMS2 DFHEXMS3 DFHEXMS4 DFHEXMS5 DFHEXMTG
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
Applicable component levels
R100 PSY UI78832
UP22/01/07 P F201 {
R200 PSY UI78835
UP22/01/07 P F201 {
R300 PSY UI78834
UP22/01/07 P F201 {
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 2022