IBM Support

PH48665: REFERENCE TO UNDEFINED COMPILATION VARIABLE IN DEFINE DIRECTIVE IN FALSE BRANCH INCORRECTLY CAUSES ERROR IGYLI0245-E

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Reference to undefined compilation variable in DEFINE directive
    in false branch incorrectly causes error IGYLI0245-E
    
    ADDITIONAL SYMPTOMS:
    IGYLI0245-E
    

Local fix

  • BYPASS/CIRCUMVENTION:
    None
    
    RECOVERY ACTION:
    Apply PTF
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling a    *
    *                 COBOL program that contains a DEFINE         *
    *                 directive in the false branch of a           *
    *                 conditional compilation directive where the  *
    *                 DEFINE directive references an undefined     *
    *                 compilation variable.                        *
    ****************************************************************
    * PROBLEM DESCRIPTION: Compiler message:                       *
    *                                                              *
    *                      IGYLI0245-E   "VAR-NOTDEF" was not      *
    *                      defined as a compilation variable.      *
    *                      A value of 1 was assumed for the        *
    *                      variable.                               *
    ****************************************************************
    * RECOMMENDATION: Apply the IBM-provided PTF                   *
    ****************************************************************
    The compiler was incorrectly processing an error resulting from
    a reference to an undefined compilation variable in a DEFINE
    directive, even though the directive appeared in the false
    branch of a conditional compilation directive.
    

Problem conclusion

  • The compiler was updated to ensure that irrelevant errors
    discovrered in the false branch of a conditional compilation
    directive are not processed.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH48665

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    640

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2022-08-12

  • Closed date

    2022-08-18

  • Last modified date

    2022-11-01

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

    PH47051

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

Modules/Macros

  • IGY8RWTU IGYADXIT 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 IGYCJBLS IGYCJDM1 IGYCJDM2
    IGYCJDM3 IGYCJDM4 IGYCJDM5 IGYCJDM6 IGYCJDMB IGYCJDMR IGYCJGEN
    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 IGYISMKD IGYMSGE  IGYMSGK  IGYMSGT  IGYMSGXT
    IGYQC    IGYQCB   IGYQCBE  IGYQCBG  IGYQSPLT IGYWACPT IGYWALOC
    IGYWAPLY IGYWC    IGYWCL   IGYWCLG  IGYWDDEF IGYWDOPT IGYWIVP1
    IGYWIVP2 IGYWRECV IGYWRWD  IGYWSMPE IGYWUOPT IGYWZFS  IGYZQEN6
    IGYZQENU IGYZQJP6 IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R640 PSY UP

       A

  • R641 PSY UP

       A

  • R642 PSY UI82932

       UP22/10/28 P F210

  • R64H PSY UP

       A

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.

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"640","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023