IBM Support

PH41474: 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

    PH41474

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    620

  • Status

    CLOSED PER

  • PE

    YesPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2021-10-20

  • Closed date

    2021-10-21

  • Last modified date

    2021-11-01

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

    PH40876

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

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 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 UI77740

       UP21/10/30 P F110 {

  • R621 PSY UI77741

       UP21/10/30 P F110 {

  • R622 PSY UI77742

       UP21/10/30 P F110 {

  • R62H PSY UI77743

       UP21/10/30 P F110 {

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

Document Information

Modified date:
12 December 2023