PK51972: DFHSM0002 SEVERE ERROR (CODE X'0305') WHEN ISSUEING A FREEMAIN FOR THE LE_RUWA

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• A FREEMAIN is issued for an LE_RUWA, and gets the following
  exception:
  .
  SM 0305 SMGF *EXC* - Invalid_freemain_address -
          FUNCTION(FREEMAIN) ADDRESS(1E61DE78)
          REMARK(LE_RUWA) STORAGE_CLASS(TASK31)
  .
  The storage  being FREEMAIN'd is in the middle of an allocated
  piece.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: Message DFHSM0002 error code 0305 when  *
  *                      a task attempts to freemain an LE_RUWA. *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  CICS is running with SIT parameter RUWAPOOL=YES. This causes
  CICS to pre-allocate a pool of storage for the LE RUWAs
  (rununit workareas) required for EXEC CICS LINK or EXEC CICS
  XCTL requests issued for an LE program.
  While processing an EXEC CICS LINK, the RUWAPOOL becomes
  exhausted and an overflow LE_RUWA is getmained. CICS stores
  the address of the RUWA in field EISRUSTG and adds the amount
  of overflow storage into the cumulative total of RUWA storage.
  CICS uses this total as an indicator as to whether overflow
  storage was getmained at this link level - if the total is
  greater than the pool size then the storage is overflow storage.
  A problem occurs which causes CICS to call LE for
  program_check_recovery. LE returns to CICS with a return code of
  8, indicating that LE should not be called again for this
  rununit. This means that rununit_termination is bypassed,
  including the process to freemain the RUWA for this link level
  and decrement the cumulative total. At rununit_termination
  of a higher link level the RUWA total is therefore too high
  and incorrectly indicates that the RUWA storage is overflow
  storage which must be freemained.
  In fact this program is using an LE RUWA which is part
  of the pre-allocated RUWAPOOL. DFHAPLI1 attempts to freemain
  this area but, because the address points within the RUWAPOOL,
  this results in MSGDFHSM0002 with error code X'0305'.
  
  Keywords: run-unit work area rununit_work_area abend4038
            ruw_use_cursize SM0002
  

Problem conclusion

• DFHAPLI1's recovery routine has been changed to ensure storage
  associated with the current link level is freed, if the level
  is not the first link level or if it has performed an EXEC CICS
  XCTL.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

• ž**** PE08/11/14 FIX IN ERROR. SEE APAR PK75298  FOR DESCRIPTION
  

APAR Information

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

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

  UK33633 UK33634

Modules/Macros

•    DESLI1   DFHAPLI1 DFHAPLJ1 DFHAPLX1
  

Fix information

• Fixed component name

  CICSTS V3 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK33633

     UP08/02/14 P F802

• R500 PSY UK33634

     UP08/02/14 P F802

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.