IBM Support

PI08163: READQ TD SET COMMAND FOR EXTRAPARTITION TD QUEUES ENCOUNTER A S0C4 DFHAP0001 FOR PROGRAMS DEFINE AS DATALOC(BELOW)

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • CICS 5.1 is not honoring dataloc(below) for EXEC CICS READQ TD
    SET() commands for extrapartition TD queues. This results in a
    31-bit address being returned causing a S0C4 DFHAP0001 to be
    issued.
    .
    ADDITIONAL KEYWORDS:
    KIXREVRJS
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All CICS users.                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: DFHAP0001 0C4 abend in user application *
    *                      following EXEC CICS READQ TD SET        *
    *                      command.                                *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    An EXEC CICS READQ TS SET command is run. The address returned
    in the SET register is a 31-bit above the line address. The
    program is running AMODE 24, and defined with
    DATALOCATION(BELOW). Consequently, the program encounters an
    abend0C4 when attempting to read the address returned by the
    READQ SET.
    This occurs only for Extrapartition transient data queues.
    
    Additional Keywords: AP0001 msgDFHAP0001 abendS0C4
    

Problem conclusion

  • DFHTDA has been modified so that the address returned by CICS
    following a READQ TD SET command will respect the DATALOCATION
    setting of the current program.
    To achieve this, each task issuing READQ TD SET requests for
    an extrapartition transient data queue will acquire its own
    area of storage to hold the record. This area will be used for
    all READQ TD SET requests issued by that task. The address of
    this storage area will be held in the TCA (TCAIDAA).
    This mirrors the design for intrapartition transient data
    queues. Therefore, after applying this APAR, READQ TD SET
    requests for both intrapartition and extrapartition queues
    within the same task will utilise the same set storage
    address.
    

Temporary fix

  • FIX AVAILABLE BY PTF ONLY
    

Comments

  • ž**** PE14/07/24 FIX IN ERROR. SEE APAR PI21573  FOR DESCRIPTION
    

APAR Information

  • APAR number

    PI08163

  • Reported component name

    CICS TS Z/OS V5

  • Reported component ID

    5655Y0400

  • Reported release

    800

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2013-12-16

  • Closed date

    2014-02-14

  • Last modified date

    2015-03-05

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

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

    UI15121

Modules/Macros

  • DFHTDA
    

Fix information

  • Fixed component name

    CICS TS Z/OS V5

  • Fixed component ID

    5655Y0400

Applicable component levels

  • R800 PSY UI15121

       UP14/02/20 P F402

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":"5.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":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
05 March 2015