IBM Support

PH40876: COMPUTE STATEMENTS WITH PACKED-DECIMAL OR USAGE DISPLAY SENDERS AND RECEIVERS MAY IMPACT PERFORMANCE AT ARCH(10|11) AND OPT(1|2)

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • The compiler may choose to convert PACKED-DECIMAL and USAGE
    DISPLAY arithmetic to a floating point format called decimal
    floating point (DFP). This is done at ARCH(10|11) and OPT(1|2)
    so that the compiled application may perform better.
    A prior PTF fixed an issue where the optimization that generated
    DFP
    instructions would sometimes cause instructions to have an
    incorrect line number. When fixing that, the fix incorrectly
    caused the compiler to stop generating some conversions to DFP
    that were previously generated.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL compiling programs *
    *                 at ARCH(10|11) and OPT(1|2) that contain     *
    *                 COMPUTE statements with PACKED-DECIMAL or    *
    *                 USAGE DISPLAY senders and receivers.         *
    ****************************************************************
    * PROBLEM DESCRIPTION: Performance may be worse than in prior  *
    *                      PTFs                                    *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF                       *
    ****************************************************************
    The compiler may choose to convert PACKED-DECIMAL and USAGE
    DISPLAY arithmetic to a floating point format called decimal
    floating point (DFP). This is done at ARCH(10|11) and OPT(1|2)
    so that the compiled application may perform better. A prior
    PTF
    fixed an issue where the optimization that generated DFP
    instructions would sometimes cause instructions to have an
    incorrect line number. When fixing that, the fix incorrectly
    caused the compiler to stop generating some conversions to DFP
    that were previously generated.
    

Problem conclusion

  • The compiler was fixed to generate DFP in the cases where prior
    PTFs generated DFP while still ensuring that instructions were
    generated with the correct line number.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH40876

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    630

  • Status

    CLOSED PER

  • PE

    YesPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2021-09-24

  • Closed date

    2021-09-27

  • Last modified date

    2021-10-01

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

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

    PH41474

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 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  IGYQSPLT IGYSIDE2 IGYZQEN6 IGYZQENU
    IGYZQJP6 IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R630 PSY UI77327

       UP21/10/01 P F109 {

  • R631 PSY UI77328

       UP21/10/01 P F109 {

  • R632 PSY UI77329

       UP21/10/01 P F109 {

  • R63H PSY UI77330

       UP21/10/01 P F109 {

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":"630","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023