IBM Support

PI51286: RATIONAL BUSINESS DEVELOPER (RBD) 9.1.1: CICS TRANSACTION ABEND WITH 0C4 IN ELACOMC

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Users get  0C4 abend in ELACOMC in our production cics and then
    get a lot of other cics abends.
    
    This happens when the storage being used is above the 1GB mark
    in CICS.
    

Local fix

  • Use the COBOL compiler option trunc(bin)
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: EGL CICS users that have region sizes above  *
    *                 the 1GB memory range                         *
    ****************************************************************
    * PROBLEM DESCRIPTION: THE MODULE ELACOMC IS DOING POINTER     *
    *                      ARITHMETIC FOR PERFORMANCE REASONS. THE *
    *                      MODULE WAS ERRONEOUSLY COMPILED         *
    *                      WITH TRUNC(STD) INSTEAD OF TRUNC(BIN).  *
    *                      THIS CAUSES THE PIC S9(9) COMP-4 FIELD  *
    *                      to BE TRUNCATED PRODUCING AN INVALID    *
    *                      ADRESS. THE ABEND OCCURS BECAUSE OF THI *
    *                      BAD ADDRESS.                            *
    ****************************************************************
    * RECOMMENDATION: APPLY THIS MAINTENANCE.                      *
    ****************************************************************
    The module ELACOMC is doing pointer arithmetic for
    performance reasons. The module was erroneously
     compiled  with trunc(std) instead of trunc(bin).
    This causes the pic s9(9) comp-4 field to
     be truncated producing an invalid address.
    The abend occurs because of this bad address.
    

Problem conclusion

  • The module ELACOMC was recompiled with trunc(bin)
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI51286

  • Reported component name

    RATL COBOL RT Z

  • Reported component ID

    5655R2900

  • Reported release

    601

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2015-10-27

  • Closed date

    2015-12-09

  • Last modified date

    2016-01-04

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

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

Modules/Macros

  • ELACOMC
    

Fix information

  • Fixed component name

    RATL COBOL RT Z

  • Fixed component ID

    5655R2900

Applicable component levels

  • R601 PSY UI33732

       UP15/12/15 P F512

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":"SSN27B","label":"Rational COBOL Runtime for zSeries"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.0.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.0.1","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
04 January 2016