PH48095: COMPILER IGNORES THE ALTERNATE DDNAME LIST AND ONLY READS SOURCE FROM THE SYSIN DD WHEN THE TEST COMPILER OPTION IS USED

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Following the apply of:
  
  V6.2 December, 2021 PTF UI78471
  V6.3 November, 2021 PTF UI78163
  
  a program that is compiled with TEST will incorrectly ignore
  an alternate DDNAME list that is passed to the compiler from
  an Assembler-invoked compile process.  Instead, it will only
  read the source code from the SYSIN DDNAME, which may not be
  the same DDNAME as provided in the alternate DDNAME list that
  is passed to the compiler.  Products that may be affected are
  vendor compile tools that utilize the Assembler-like invocation
  process, such as SCLM, Dependency Based Build (DBB),
  Broadcom/CA-GEN, etc...
  
  Because there is no source code in SYSIN, the compiler will
  generate a dummy program name of "CBLNAM01" and the following
  types of messages will be seen in the compiler output:
  
  IGYDS1000-E   A "IDENTIFICATION DIVISION" header was not found
  in this program. It was assumed present.
  
  IGYDS1003-E   A "PROGRAM-ID" paragraph was not found.
  Program-name "CBLNAM01" was assumed.
  
  IGYSC1428-W   The "TEST(DWARF)" option was specified but
  the compiler return code was 8 or greater.  The "NOTEST"
  will be in effect.
  

Local fix

• Compile with NOTEST.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of the Enterprise COBOL V6         *
  *                 compiler who are compiling with the TEST     *
  *                 compiler option and are also passing in an   *
  *                 alternate DD name table that includes an     *
  *                 alternate name for the SYSIN DD name. Vendor *
  *                 compilation tools like Software              *
  *                 Configuration and Library Manager (SCLM),    *
  *                 Dependency Based Build (DBB),                *
  *                 Broadcom/CA-GEN, etc... that pass an         *
  *                 alternate DD name table to the compiler may  *
  *                 be affected.                                 *
  ****************************************************************
  * PROBLEM DESCRIPTION: Following the SMP/E APPLY of: V6.2      *
  *                      December, 2021 PTF UI78471 or V6.3      *
  *                      November, 2021 PTF UI78163 when the     *
  *                      compiler is invoked with the TEST       *
  *                      compiler option and is also passed an   *
  *                      alternate DD name table which contains  *
  *                      an alternate DD name entry for the      *
  *                      SYSIN DD name, the compiler incorrectly *
  *                      attempts to read the program source     *
  *                      only from the standard SYSIN DD name,   *
  *                      instead of recognizing the alternate DD *
  *                      name provided for SYSIN.                *
  *                                                              *
  *                      Since there is no source program        *
  *                      associated with the SYSIN DD name in    *
  *                      this instance, the compiler is trying   *
  *                      to compile a null source program. This  *
  *                      typically results in compiler errors    *
  *                      similar to the following:               *
  *                                                              *
  *                                                              *
  *                      IGYDS1000-E   A                         *
  *                      "IDENTIFICATION DIVISION" header was    *
  *                      not found in this program.  It was      *
  *                      assumed present.                        *
  *                                                              *
  *                      IGYDS1003-E   A "PROGRAM-ID" paragraph  *
  *                      was not found.  Program-name "CBLNAM01" *
  *                       was assumed.                           *
  *                                                              *
  *                      IGYSC1428-W   The "TEST(DWARF)" option  *
  *                       was specified but the compiler return  *
  *                       code was 8 or greater.  The "NOTEST"   *
  *                                            will be in effect *
  *                                            .                 *
  *                                                              *
  *                           1  IGYSC1082-E   A period was      *
  *                           required.  A period was assumed    *
  *                           before "END OF PROGRAM".           *
  *                      -Messages    Total    Informational     *
  *                      Warning    Error    Severe              *
  *                      Terminating                             *
  *                      Printed:       4                        *
  *                         1         3                          *
  *                      * Statistics for COBOL program CBLNAM01 *
  *                      :                                       *
  *                      *    Source records = 0                 *
  *                      *    Data Division statements = 0       *
  *                      *    Procedure Division statements = 0  *
  *                      *    Generated COBOL statements = 0     *
  *                      *    Program complexity factor = 0      *
  *                      End of compilation 1,  program CBLNAM01 *
  *                      ,  highest severity 8.                  *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM provided PTF.                  *
  ****************************************************************
  The compiler was not properly handling the alternate DD names
  table, when it was passed as parameter 2 on compiler invocation.
  

Problem conclusion

• The compiler has been changed so that it does proper parsing and
  caching of the alternate DD names table, when supplied.
  

Temporary fix

Comments

APAR Information

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

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

  PH48619 PH48688

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 IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2
  IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOPI  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
  IGYQCB   IGYQCBE  IGYQCBG  IGYQSPLT IGYTCARA IGYTSALE IGYZQEN6
  IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI81630

     UP22/07/29 P F207 {

• R631 PSY UI81631

     UP22/07/29 P F207 {

• R632 PSY UI81632

     UP22/07/29 P F207 {

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.