IBM Support

PK76819: USING CEDF AND ATTEMPTING TO ABEND A TRANSACTION USING PF12 LEADS TO AN UNEXPECTED ABENDASRA WITH PSW 08/11/14 PTF PECHANGE

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Problem:
    If a user invokes CEDF for transaction which executes a modules
    linked using LE (in this case Enterprise COBOL 3.4), then if the
    PF12 ABEND USER TASK option is selected at some point, then
    abend ASRA is generated, not the requested abend code.
    .
    The follwoing messages were issued :
    DFHAP1301  Language Environment has detected
    a corruption of its control blocks. Transaction aaaa currently
    executing.
    
    DFHSR0001  An abend (code 0C4/AKEA) has occurred at offset
    X'FFFFFFFF' in program bbbbbbbb.
    .
    The dump shows :
    In CICS trace we see a call to LE for RUNUNIT_END_INVOCATION
    and then an unexpected 0c4 occurs in LE:
    Instruction Length: 6   Interrupt Code: 0004
    PSW:  079D1000 9CBAD6CE Module CEEPLPKA + X'AD6CE'
    PSW is pointing into LE module CEEHCDLG.
    
    Additional Symptoms:
    CEDF suffers recursive abend ASRA's and CICS has to be
    canceled. You also get message:
    DFHSR0001 CISBTRD AN ABEND (CODE 0C4/AKEA) HAS OCCURRED AT
    OFFSET X'FFFFFFFF' IN PROGRAM RT026.
    .
    RT026 is a LE module.
    .
    You may see an 0C4 in  CEEHSGL + x'39C' trying to reference the
    of the EDBOCB, off of the EDB+x'10'.
    Trace shows:
    QR    SM 0301 SMGF  ENTRY FREEMAIN 00100478,LE_RUWA,TASK24
    QR    SM 0301 SMGF  ENTRY GETMAIN 4D68,YES,LE_RUWA,TASK24
    QR    SM 0302 SMGF  EXIT  GETMAIN/OK    00100478
    
    It looks like we are out of sync here on when this RUWA area
    is freed and/or getmained
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All.                                         *
    ****************************************************************
    * PROBLEM DESCRIPTION: If CEDF is used to request an abend of  *
    *                      a user application, this can lead to a  *
    *                      program check in Language Environment.  *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    If you are running an application under CEDF and you use the
    abend function, PF12, then CICS prematurely freemains RUWA
    storage needed by LE. This leads to a program check in LE.
    
    A similar problem can occur if an abend occurs while performing
    BMS paging.
    
    Additional Keywords:
    CSPG AZTS PGLK LINK LE_RUWA DFHEDFX ru_active DFHSR0001
    DFHAP1301 ASRA 0C4 AKEA
    

Problem conclusion

  • UK24904
    DFHAPLI1 has been changed so that it does not freemain LE's
    storage for non-LE programs.
    

Temporary fix

  •             *********
                * HIPER *
                *********
    FIX AVAILABLE BY PTF ONLY
    

Comments

APAR Information

  • APAR number

    PK76819

  • Reported component name

    CICSTS FOR VSE

  • Reported component ID

    564805400

  • Reported release

    B0P

  • Status

    CLOSED PER

  • PE

    YesPE

  • HIPER

    YesHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2008-12-04

  • Closed date

    2009-01-14

  • Last modified date

    2009-05-14

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

    PK75298

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

Modules/Macros

  •    DESLI1   DFHAPLI1
    

Fix information

  • Fixed component name

    CICSTS FOR VSE

  • Fixed component ID

    564805400

Applicable component levels

  • RB0P PSY UK43097

       UP09/01/21 P E421 ®

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":"BU011","label":"Systems - zSystems software"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"1.1.1","Edition":""}]

Document Information

Modified date:
14 May 2009