PK97208: FORWARD FIT OF IMSPA V410 PK95753, PK96717 AND PK98344 TO V420

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• 1) PK95753 Forward fit - ABEND878-10 from IPISDBUA.
  In a run with a large number of database updates the 24-bit
     storage used to hold database queue entries may be exhausted.
  2) PK96717 Forward fit - Loop in IPI4PROC when flushing
                           non-transaction queue elements for high
                           water mark (HWM) processing.
     If the oldest record on the Originating Transaction queue is
     an ancillary record rather than the transaction at the top of
     a transit set then records are not flushed and queue pointers
     are not updated leading to a loop.
  3) PK98344 Forward fit - Abend0C4 in IPIIPROC module in IPI4PROC
                           load module when flushing queue
                           elements for high water mark (HWM)
                           processing to add program-switch
                           responses.
     Originating Transactions can be flushed at high-water mark
     (HWS) processing when trying to add program-switch response
     records and link them to the corresponding Originating
     Transactions.
  
  Another issue fixed: On IMSPA panel IPICXJC1 when entering
  a date range and using option 1 to manually enter the logs
                          or
  from the ISPF main menu option 3, type RUN against a report
  set for both IMS and CEX logs (hit enter), then specify dates
  and times (hit enter) the dialog fails with:
    ISPD204 Invalid parameter 'PGM(IPIRSSAV) PARM(V,%s) ,
    jcl->datefmt' contains unrecognized parameter.
    Current dialog statement:  SELECT PGM(IPIRSSAV) PARM(V,%s) ,
    jcl->datefmt
  Keywords: ABENDS878 RC10 ABEND looping abend878-10 MSGISPD204
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of IMS Performance Analyzer V4.2       *
  ****************************************************************
  * PROBLEM DESCRIPTION: Forward fit of PK95753 (1), PK96717(2)  *
  *                      and PK98344(3) to V4.2.                 *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  This APAR is correcting the following via forward fit.
  1. Abend 878-10 from IPISDBUA.
  In a run with a large number of database updates the 24-bit
  storage used to hold database queue entries may be exhausted.
  2. Loop in IPI4PROC when flushing non-transaction queue elements
  for high water mark (HWM) processing.
  If the oldest record on the Originating Transaction queue is
  an ancillary record rather than the transaction at the top of
  a transit set then records are not flushed and queue pointers
  are not updated leading to a loop.
  3. Abend0C4 in IPIIPROC module in IPI4PROC load module when
  flushing queue elements for high water mark (HWM) processing
  to add program-switch responses.
  Change code to ensure that the current transaction pointer is
  set to the top-level transaction in the transit-set when
  adding a program-switch response, before checking eligibility
  of the current transaction for flushing, so that the
  program-switch response has a valid anchor.
  

Problem conclusion

• The following are the changes for each of the above problems:
  1. Update IPISDBUA to allocate storage for IQE elements above
  the line in 31-bit storage.
  2. Change the order of testing so that a non-active
  top-of-transit-set record is presented as a candidate for
  flushing when HWM hit.
  3. Change code to ensure that the current transaction pointer
  is set to the top-level transaction in the transit-set
  when adding a program-switch response, before checking
  eligibility of the current transaction for flushing, so
  that the program-switch response has a valid anchor.
  

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:

  UK51337

Modules/Macros

• H23K420J IPI#RSC5 IPI#RSC9 IPI#RSIR IPI#TUCR
  IPI#Z054 IPI@POM  IPI@PRIM IPIA21   IPICCHEK IPICCOMD IPICINTF
  IPICXDSP IPICXJCP IPICXJC1 IPICXJD0 IPICXPRF IPIDB201 IPIEVAVP
  IPIEVDSP IPIEVOLG IPIEVOLL IPIEVOLP IPIEVRS  IPIEVXSP IPIGEEX
  IPIGEGR  IPIGEGRF IPIGEPNL IPIIPROC IPIMLDS  IPIMLES  IPIMLOL
  IPIMLRF  IPIMLRS  IPIPRALP IPIPRCX  IPIPRDA  IPIPRSMP IPIRFLIS
  IPIRFSUM IPIRFSU1 IPIRSAI  IPIRSAN  IPIRSAR  IPIRSAS  IPIRSAV
  IPIRSBC  IPIRSBG  IPIRSBL  IPIRSBS  IPIRSBV  IPIRSC   IPIRSCG
  IPIRSCK  IPIRSCL  IPIRSCP  IPIRSCS  IPIRSC1  IPIRSC2  IPIRSC3
  IPIRSC4  IPIRSC5  IPIRSC6  IPIRSC7  IPIRSC8  IPIRSC9  IPIRSDA
  IPIRSDC  IPIRSDEC IPIRSDL  IPIRSDO  IPIRSDT  IPIRSDU  IPIRSES
  IPIRSEX  IPIRSFA  IPIRSFC  IPIRSFE  IPIRSFI  IPIRSFL  IPIRSFO
  IPIRSFQ  IPIRSFR  IPIRSFT  IPIRSFU  IPIRSFV  IPIRSFX  IPIRSGA
  IPIRSGD  IPIRSGP  IPIRSHF  IPIRSIR  IPIRSIW  IPIRSJSL IPIRSJSM
  IPIRSJST IPIRSLG  IPIRSLH  IPIRSLO  IPIRSL4  IPIRSL4A IPIRSL4B
  IPIRSL4C IPIRSL4D IPIRSL5  IPIRSL5A IPIRSMC  IPIRSME  IPIRSMG
  IPIRSMH  IPIRSMNU IPIRSMQ  IPIRSMS  IPIRSMT  IPIRSMX  IPIRSNQ
  IPIRSOT  IPIRSPS  IPIRSRC  IPIRSSA  IPIRSSAV IPIRSSB  IPIRSSC
  IPIRSST  IPIRSS4  IPIRSS4A IPIRSS4B IPIRSS4C IPIRSS4D IPIRSS5
  IPIRSS5A IPIRSTE  IPIRSTG  IPIRSTM  IPIRSTO  IPIRSTRP IPIRSTU
  IPIRST1  IPIRST2  IPIRST3  IPIRST4  IPIRST5  IPIRST6  IPIRSU$
  IPIRSVS  IPIRSXT  IPIRSX4A IPISAPAR IPISDAGV IPISDAP0 IPISDBUA
  IPISDCX1 IPISDGRP IPISDGRS IPISDGRV IPISDLGV IPISDMNV IPISDRCV
  IPISDSYG IPISDSYV IPISDTRF IPISDUPR IPISDVPR IPISIRUR IPISLGAR
  IPISMAIN IPISMERG IPIS00   IPIS01   IPIZDCXG IPIZSCEX IPIZSDEV
  IPIZSDGV IPIZSJCL IPIZXDRV IPIZ002  IPIZ010  IPI4PROC
  

Fix information

• Fixed component name

  IMS PERF ANALYZ

• Fixed component ID

  5655E1500

Applicable component levels

• R420 PSY UK51337

     UP09/10/29 P F910

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.