IBM Support

PK83174: 'CEMT S PROG(*) PH' PRODUCES A LARGE NUMBER OF ENTRIES AND S0C4 IN DFHEMT56 + X'181C' TRYING TO WRITE INTO ERDSA

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • 'CEMT S PROG(*) PH' causes CEMT task to use 14 meg of EUDSA and
    finally produces a S0C4 when invalid values (large negative
    numbers) cause module DFHEMT56 + x'181E' to overwrite the ERDSA
    storage. The GENERSET routine calling GENSET1. The code does a
    MH of REALLSIZ with REALLNUM, but REALLNUM is X'81BD'. This
    causes a large negative value to be used as the offset into the
    REALD display, which holds the results of the CEMT command, and
    tries to overwrite ERDSA.
    Additional keywords:  KIXREVWRW
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All.                                         *
    ****************************************************************
    * PROBLEM DESCRIPTION: CEMT S PROG(*) PH results in an         *
    *                      abend0C4 in DFHEMT56.                   *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    An attempt to make a change to the attributes of more than 32767
    programs using CEMT SET PROGRAM(*) xxx, where xxx is the
    attribute being set, results in a storage violation. This is
    because a multiply halfword instruction in DFHEMT56 causes a
    large negative value to be used as an offset into storage, and
    so an attempt is made to write into ERDSA.
    Keywords: DFHEIN56 PHASEIN
    

Problem conclusion

  • DFHEMT56 has been changed to limit the number of elements being
    set for CEMT SET PROGRAM to 32766. If the number of elements is
    greater than or equal to 32767, a "too many elements" message is
    displayed and no programs will be updated by the SET request.
    
    You should ensure any generic changes to or implemented via
    a SET PROGRAM request should be applied to less than 32767
    elements.
    

Temporary fix

  • FIX AVAILABLE BY PTF ONLY
    

Comments

  • ž**** PE09/11/16 FIX IN ERROR. SEE APAR PK99788  FOR DESCRIPTION
    

APAR Information

  • APAR number

    PK83174

  • Reported component name

    CICSTS V3 Z/OS

  • Reported component ID

    5655M1500

  • Reported release

    500

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2009-03-24

  • Closed date

    2009-08-28

  • Last modified date

    2009-11-30

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

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

    PK93117 UK49670

Modules/Macros

  •    DFHEIMDS DFHEIN55 DFHEMT55 DFHEMT56
    

Fix information

  • Fixed component name

    CICSTS V3 Z/OS

  • Fixed component ID

    5655M1500

Applicable component levels

  • R500 PSY UK49670

       UP09/09/05 P F909

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":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"3.2","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":"3.2","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
30 November 2009