IBM Support

PI80709: CBL V6.1 MOVE STMT GETS S0C4

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Ø
    CBL V6.1 MOVE stmt gets S0C4
    

Local fix

  • Ø-
    None.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V6.1 compiling     *
    *                 programs that contain a COMPUTE statement    *
    *                 that can produce a negative result, using    *
    *                 COMP-3 or USAGE DISPLAY senders and an       *
    *                 unsigned BINARY(COMP) receiver, where the    *
    *                 receiver is used in a subsequent             *
    *                 computation, table access, or reference      *
    *                 modification.                                *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect output at runtime: The        *
    *                      compiler may generate code that uses    *
    *                      the intermediate negative result        *
    *                      instead of the correct positive result. *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    The compiler was generating code that computed a negative
    result in a register, forced the result to positive when
    storing from the register to the receiver, and then used the
    value in a register in a subsequent computation, table access,
    or reference modification.
    

Problem conclusion

  • The compiler was fixed to force the contents of the register to
    be positive before its subsequent use.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI80709

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    610

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2017-04-27

  • Closed date

    2017-06-24

  • Last modified date

    2017-07-05

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

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

Modules/Macros

  • IGYQCBE
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R610 PSY UI48286

       UP17/06/30 P F706

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

Document Information

Modified date:
14 December 2020