IBM Support

PH08436: COMPILE MESSAGE IGYDS1348-W ISSUED FOR DATA ITEMS CONTAINING 18 DIGITS OF PRECISION USING ARITH(COMPAT)

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • ERROR DESCRIPTION:Ø
    Compile-time message IGYDS1348-W issued for data items
    containing an even number of digits of precision.
    However, for data items that contain 18 digits of precision,
    the logical remedy would be to use 19 digits of precision but
    that is not allowed when the ARITH(COMPAT) option is in effect.
    

Local fix

  • LOCAL FIX:Ø
    None.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V6.2 who           *
    *                 compile their programs with the              *
    *                 ARITH(COMPAT) and RULES(NOEVENPACK) options  *
    *                 and whose programs contain data items        *
    *                 with the USAGE clause COMP-3 or PACKED-      *
    *                 DECIMAL, and those data items contain        *
    *                 18 digits of precision.                      *
    ****************************************************************
    * PROBLEM DESCRIPTION: Compile time message IGYDS1348-W is     *
    *                      issued for data items containing 18     *
    *                      digits of precision when compiler       *
    *                      option ARITH(COMPAT) is in effect.      *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    ****************************************************************
    Compile-time message IGYDS1348-W would be issued for data
    items containing an even number of digits of precision.
    However, for data items that contain 18 digits of precision,
    the logical remedy would be to use 19 digits of precision but
    that is not allowed when the ARITH(COMPAT) option is in effect.
    

Problem conclusion

  • The compiler is changed to suppress warning message IGYDS1348-W
    for data items containing 18 digits of precision when the
    compiler option ARITH(COMPAT) is in effect.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH08436

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    620

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2019-02-11

  • Closed date

    2019-03-20

  • Last modified date

    2019-04-08

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

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

    PH10715

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 IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0
    IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  IGYCOB2E
    IGYCOPI  IGYCOPT  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  IGYZQDRV
    IGYZQENU IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R620 PSY UI62019

       UP19/03/29 P F903

  • R621 PSY UI62020

       UP19/03/29 P F903

  • R622 PSY UI62021

       UP19/03/29 P F903

  • R62H PSY UI62022

       UP19/03/29 P F903

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"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"620","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023