PM08623: BARH INVLNLS6 CMAS LOOP - END OF NAMELIST NOT PROPERLY RECOGNIZED

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When executing multiple BAS commands to create multiple
  definitions to add to a resource group, a BARH call is generated
  and any NAMELIST entries will be processed.  The problem occurs
  because the end of the NAMELIST entries is not being properly
  recognized.  If the last two bytes following the last namelist
  entry are not x'0000', we assume whatever follows is another
  namelist entry.  This results in a failure and the following
  exception trace entry:
  .
   BARH XLSD XDNR BAS EXCP.     20 INVLNLS6 EUI  SYS30    CMAS
  .
  This entry indicates an RESPONSE=INVALID_NAMELIST
  REASON=INVALID_RESDEF.  The failing function is ADDTOGRP for
  RESTYPE 0EE1 PROGDEF and RESTYPE2 of 180A PGMINGRP
  .
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All CICSPlex SM V4R1M0 Users                 *
  ****************************************************************
  * PROBLEM DESCRIPTION: An abend ASRA/S0C4 may occur in a CMAS  *
  *                      in method EYU0BARH (BARH) at offset     *
  *                      X'1C6', or an abend AICA may occur in   *
  *                      BARH or in a method called by BARH,     *
  *                      when one of the following actions is    *
  *                      performed against the specified         *
  *                      resource table:                         *
  *                                                              *
  *                        Action       Table                    *
  *                        ------------ ---------------------    *
  *                        ADDTOGRP     All BAS CICS resource    *
  *                                     definitions              *
  *                        ADDPCMAS     APSPEC                   *
  *                        ADDSCMAS     APSPEC                   *
  *                        ASSIGN       CPLEXDEF                 *
  *                        UNASSIGN     CPLEXDEF                 *
  *                        ADDTOSPC     MONGROUP                 *
  *                        ADDSYSGRP    MONSPEC                  *
  *                        ADDSYSDEF    MONSPEC                  *
  *                        ADDTODSC     RASGNDEF                 *
  *                        ADDTODSC     RESGROUP                 *
  *                        ADDTOSPC     RTAGROUP                 *
  *                        ADDTOAPS     RTAGROUP                 *
  *                        ADDSYSGRP    RTASPEC                  *
  *                        ADDSYSDEF    RTASPEC                  *
  *                        ADDTRAN      TRANGRP                  *
  *                        ADDTOSPC     WLMGROUP                 *
  *                        ADDSYSGRP    WLMSPEC                  *
  *                        ADDSYSDEF    WLMSPEC                  *
  *                                                              *
  *                      If the AICA occurs, examination of the  *
  *                      CMAS's auxtrace dataset will show       *
  *                      repeated exception traces for BARH with *
  *                      a debug text of "INVLNLS6" and a trace  *
  *                      point ID of 20.                         *
  ****************************************************************
  * RECOMMENDATION: After applying the PTF that resolves this    *
  *                 APAR, all CMASes must be restarted.  Note    *
  *                 that the restarts do not need to occur at    *
  *                 the same time.                               *
  ****************************************************************
  When one of the above actions is performed, BARH is passed a
  namelist structure which identifies which resources to perform
  the action against.  BARH checks for end of namelist by checking
  the two bytes after the end of the last element:
  
  -  if the two bytes are not allocated to the CMAS, the abend
     ASRA/S0C4 will occur.
  
  -  if either of the two bytes are non-zero, BARH will attempt to
     process the residual data as a namelist entry, after which it
     will determine that no further namelist entries exist and
     will issue an exception trace with a debug text of "INVLNLS6"
     and a trace point ID of 20.  After issuing the exception
     trace, BARH will invalidly branch to code that will again
     issue the "INVLNLS6" excpetion trace.  This will continue
     until the AICA occurs.
  

Problem conclusion

• BARH has been updated to check for end of namelist properly, and
  to return to its caller after issuing the "INVLNLS6" exception
  trace.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

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

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

  UK55702

Modules/Macros

• EYU0BARH
  

Fix information

• Fixed component name

  CICS TS Z/OS V4

• Fixed component ID

  5655S9700

Applicable component levels

• R60M PSY UK55702

     UP10/04/01 P F003

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.