PI52676: DEL DEFN TYPE(PGM) NAME(*) GET REPOSITORY ERROR WHEN BUFFER FULL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Issuing DEL DEFN Get Repository error.
  -----------------------   Plex . . PLEX1  Route . . IMS1
   Log for . . : DEL DEFN TYPE(PGM) NAME(*)
  FOR(IMSID(IMS1,IMS2,IMS3,IMS4))
  
   IMSplex . . . . . : PLEX1
   Routing . . . . . : IMS1
   Start time. . . . : 2015.313 12:19:56.83
   Stop time . . . . : 2015.313 12:19:57.44
   Return code . . . : 0200000C
   Reason code . . . : 00003008
   Reason text . . . : None of the clients were successful.
   Command master. . : IMS1
               Return     Reason
   MbrName     Code       Code       Reason text
   --------    --------   --------   --------------
   IMS1        00000014   00005110   Repository error
  
   MbrName  Messages
   -------- -----------------------
  IMS1     DFS3407E DELETE COMMAND COMPLETE FOR NONE,
  REQUEST=CSLRPDEL,
  RC=03000014, RSN=00005544, ERRORTEXT=16028000 00000004
           0000001E 0022001E 00000001 00000000, MBR=RSC,
  REPOTYPE=IMSRSC,
           REPONAME=IMSRSC_REPOSITORY
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * All IMS V14 users of IMSRSC repository DELETE DEFN command.  *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * The DELETE DEFN command fails with a RC=00000014             *
  * RSN=00005110 Repository error when attempting to delete a    *
  * large number of resources from the IMSRSC repository.  For   *
  * example:                                                     *
  *                                                              *
  *   -----------------------   Plex . . PLEX1  Route . . IMS1   *
  *  Log for . . : DEL DEFN TYPE(PGM) NAME(*)                    *
  * FOR(IMSID(IMS1,IMS2,IMS3,IMS4))                              *
  *                                                              *
  *  IMSplex . . . . . : PLEX1                                   *
  *  Routing . . . . . : IMS1                                    *
  *  Start time. . . . : 2015.313 12:19:56.83                    *
  *  Stop time . . . . : 2015.313 12:19:57.44                    *
  *  Return code . . . : 0200000C                                *
  *  Reason code . . . : 00003008                                *
  *  Reason text . . . : None of the clients were successful.    *
  *  Command master. . : IMS1                                    *
  *              Return     Reason                               *
  *  MbrName     Code       Code       Reason text               *
  *  --------    --------   --------   --------------            *
  *  IMS1        00000014   00005110   Repository error          *
  *                                                              *
  *  MbrName  Messages                                           *
  *  -------- -----------------------                            *
  * IMS1     DFS3407E DELETE COMMAND COMPLETE FOR NONE,          *
  * REQUEST=CSLRPDEL,                                            *
  * RC=03000014, RSN=00005544, ERRORTEXT=16028000 00000004       *
  *          0000001E 0022001E 00000001 00000000, MBR=RSC,       *
  * REPOTYPE=IMSRSC,                                             *
  *          REPONAME=IMSRSC_REPOSITORY                          *
  ****************************************************************
  * RECOMMENDATION:                                              *
  * INSTALL CORRECTIVE SERVICE FOR APAR/PTF                      *
  ****************************************************************
  The ReadKey routine in CSLRRD10 is not handling the "buffer
  full" return code from CSLRRP50 (RP5P_RSNBUFFUL) correctly.
  Instead of obtaining a new buffer and calling CSLRRP50 again,
  the "buffer full" return code is being treated as a repository
  error.
  

Problem conclusion

• Modified code in CSLRRD10 so that it no longer treats a "buffer
  full" return code from CSLRRP50 (RP5P_RSNBUFFUL) as an error
  condition.
  

Temporary fix

Comments

APAR Information

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

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

  UI33840

Modules/Macros

• CSLRRD10
  

Fix information

• Fixed component name

  IMS V14

• Fixed component ID

  5635A0500

Applicable component levels

• R400 PSY UI33840

     UP15/12/19 P F512

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.