IBM Support

PI84047: INCORRECT COBOL STATEMENT NUMBER GIVEN IN ERROR MESSAGE

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • When encountering a decimal divide exception , the incorrect
    statement number is given in error message CEE3211S.  This can
    occur when compiling with ARCH(10) and either OPT(1) or OPT(2).
    The failing instruction is a DP, generated for a DIVIDE
    statement; but error message points to a MOVE statement.
    

Local fix

  • Compile with OPT(0) or with ARCH(9).
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V6.1 compiling     *
    *                 and running programs using compiler options  *
    *                 OPT(1|2) and ARCH(10|11) that contain        *
    *                 COMPUTE statements that divide               *
    *                 PACKED-DECIMAL or USAGE DISPLAY numbers and  *
    *                 encounter a divide by zero condition at      *
    *                 runtime.                                     *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect runtime message line number:  *
    *                      The error message for a division by     *
    *                      zero displays an incorrect line number. *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    The compiler was associating an incorrect line number with a DP
    instruction, causing divisions by zero messages to display an
    incorrect line number.
    

Problem conclusion

  • The compiler was fixed to use the correct line number for DP
    instructions so that the runtime message has the correct line
    number.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI84047

  • 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-07-05

  • Closed date

    2017-08-18

  • Last modified date

    2018-08-21

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

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

    PI87662

Modules/Macros

  •    IGYQCBE
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R610 PSY UI49694

       UP17/08/25 P F708

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":"BU048","label":"IBM Software"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.1","Edition":"","Line of Business":{"code":"LOB70","label":"Z TPS"}}]

Document Information

Modified date:
05 September 2024