IBM Support

PM14429: EGL generated COBOL program fails with abend APCT due to an invalid value in the CICS EIBCALEN field

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Rational Business Developer V7.5.1.5:
    
    A VisualAge Generator generated COBOL program receives an abend
    AZCT which is expected when the transcation times out.
    
    After migrating the program from VisualAge Generator to Rational
    Business Developer and regenerating the program with Rational
    Business Developer, an abend APCT is received instead of the
    expected AZCT abend.
    
    The following is the failing scenario:
    
    1) EGL generataed COBOL program XYZ requests an exec cics
       handle abend program (ELAESABD).
    
    2) When the transaction times out and receives an abend
       AZCT, the handle abend program ELAESABD is passed control as
       expected.
    
    3) As control is being passed to ELAESABD, a commarea address of
       0's and a commarea length of 4 is passed.  Since the commarea
       address is 0's, the link to ELAESABD fails with an
       invalid_commarea_address.  This is the cause for the APCT
       abend.
    
    4) Program XYZ does not have a commarea, but it is linking to
       program ABC with a commarea that has a length of 4.
    
    5) When control is returned from ABC to XYZ, the CICS EIBCALEN
       (EIB Commarea Length) did not return to 0, but continued to
       hold the value of 4.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    The logic was getmaining a new EIB commarea and setting the
    EIBCALEN field, then called another program. When the
    program returned, the commarea was freed by the length was
    still set in EIBCALEN. This caused a problem in the abend
    handler routine that the customer had. We changed the logic
    to save/restore the previous EIBCALEN value on these calls.
    

Problem conclusion

  • Software updated. Fixtest available.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PM14429

  • Reported component name

    RBD EGL FOR COB

  • Reported component ID

    5724S5001

  • Reported release

    751

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2010-05-13

  • Closed date

    2010-10-13

  • Last modified date

    2010-10-13

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

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

Fix information

  • Fixed component name

    RBD EGL FOR COB

  • Fixed component ID

    5724S5001

Applicable component levels

  • R751 PSN

       UP

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7.5.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
13 October 2010