PH58660: THE COMPILER LISTING HAS EXTRANEOUS CHARACTERS ">>" AT THE BEGINNING OF EACH LINE WITH END-EXEC (FOR EXEC CICS).

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• On Enterprise COBOL V6.3 Compiler PTF UI82565 (Sep, 2022), the
  characters ">>" started appearing in column 10 on the compile
  listing for all lines with END-EXEC statement (just for EXEC
  CICS, and not for EXEC SQL).
  
  ADDITIONAL SYMPTOMS:
  Characters ">>".
  

Local fix

• BYPASS/CIRCUMVENTION:
  None
  
  RECOVERY ACTION:
  Apply PTF
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL compiling programs *
  *                 that contain CICS statements and using the   *
  *                 CICS compiler option.                        *
  ****************************************************************
  * PROBLEM DESCRIPTION: The compiler listing has extraneous     *
  *                      characters >> at the beginning of each  *
  *                      line with END-EXEC                      *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF and recompile         *
  ****************************************************************
  In some cases the compiler has to add a 'continue' in the
  generated COBOL for CICS statements and this caused problems
  in some cases due to a flag setting.
  

Problem conclusion

• The compiler was changed to reset the flag after it added the
  'continue' statement, so no more >> on lines with END-EXEC
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

  PH58471

• APAR is sysrouted TO one or more of the following:

Modules/Macros

• IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
  IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
  IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
  IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
  IGYCJA$D IGYCJA$R IGYCJBLD IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0
  IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  IGYCOSCN
  IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN
  IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5
  IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE
  IGYMSGK  IGYMSGT  IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6
  IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UI94827

     UP23/12/15 P F312

• R641 PSY UI94828

     UP23/12/15 P F312

• R642 PSY UI94829

     UP23/12/15 P F312

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.