PK07536: CICS TRANSLATOR INTERPRETING INVALID COBOL STATEMENTS.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When using the CICS translator to convert EXEC CICS statements
  into COBOL statements, a third party product inserts invalid
  code and converts it to COBOL statements before input to the
  compiler. The CICS translator seems to interpret this invalid
  COBOL syntax instead of just copying the non-CICS commands to
  the output, as done in prior releases when the ANSI85, COBOL3 or
  OOCOBOL options weren't used. This is not valid COBOL code. When
  using the COBOL2 option, the translator accepted this code.
  DFH7036I
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All.                                         *
  ****************************************************************
  * PROBLEM DESCRIPTION: DFH7036 incorrectly issued by the       *
  *                      translator.                             *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  In the reported problem, an application contained invalid
  COBOL code.  When translated with earlier versions of the
  translator (pre CICS/TS V2 R2), the translate was clean. But
  using the CICS/TS V2 R2 (and higher) translator, DFH7036 is
  issued.
  
  The later translators found an 'END' in the Cobol source in
  area A (columns 8 to 11) and thought this was the end of a
  unit of compilation and treated everything after it as
  another unit of compilation. Message DFH7036 was erroneously
  issued because the alleged new unit of compilation did not
  contain an Identification Division. The translator
  should have looked for 'END PROGRAM' to identify the end
  of a unit of compilation.
  
  Keywords: MSGDFH7036
  

Problem conclusion

• The Cobol translator has been changed and will now detect
  the end of a unit of compilation by searching for 'END PROGRAM'
  starting in Area A of the Cobol source.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

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

  PK04744

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

  UK05665

Modules/Macros

•    DFHECM10
  

Fix information

• Fixed component name

  CICSTS 3.1 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK05665

     UP05/07/28 P F507

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.