PK05665: FP DEDB POINTER CHECKER (FABADA5) DISPLAYS INCORRECT OUTPUTS OF SEGMENT FREQUENCY MAX AND SDEV. FORWARD FIT FOR PQ99527,PK03129.

APAR status

• Closed as program error.

Error description

• Fast Path DEDB Pointer Checker (FABADA5) displays incorrect
  outputs of segment frequency MAX and SDEV. This is a forward
  fit APAR of FPB V1R2 APAR PQ99527,PK03129.
  .
  1) FABADA5 displays truncated values of SEGMENT FREQUENCY MAX
     when the value is beyond 5 digits.
  2) FABADA5 displays "****" for the field of standard deviation,
     when the deviation is too large to calculate.
  3) From the pointer checker report under SEGMENT PLACEMENT
     STATISTICS, the "RECORD I/O    AVG:" value contains '*****'.
     This is a forward fit APAR of FPB V1R2 APAR PQ99527,PK03129.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All FP Basic Tools Version 2 Release 1       *
  *                 users of DEDB Pointer Checker.               *
  *                 (FMID: H31A210)                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Forward Fit of APAR PQ99527 and         *
  *                      PK03129.                                *
  *                                                              *
  *                      1) FABADA5 displays truncated values of *
  *                      SEGMENT FREQUENCY MAX when the value    *
  *                      is beyond 5 digits.                     *
  *                                                              *
  *                      2) FABADA5 displays '****' for the      *
  *                      field of standard deviation, when the   *
  *                      deviation is too large to calculate.    *
  *                                                              *
  *                      3) From the pointer checker report      *
  *                      under SEGMENT PLACEMENT STATISTICS,     *
  *                      the 'RECORD I/O    AVG:' value          *
  *                      contains '*****'.                       *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  1) FABADA5 displays truncated values of SEGMENT FREQUENCY MAX
  when the value is beyond 5 digits.
  
  2) FABADA5 displays '****' for the field of standard deviation,
  when the deviation is too large to calculate.
  
  3) From the pointer checker report under SEGMENT PLACEMENT
  STATISTICS, the 'RECORD I/O    AVG:' value contains '*****'
  due to the shortage of internal table entries to stack analyzed
  segment information occurred.
  

Problem conclusion

• DEDBPC (FABADA5) has been modified as follows.
  
  1) The value of the standard deviation is shown instead of the
  character string '****',  when base data to calculate the
  standard deviation is too large.
  
  2) When the decimal digits of the integer value is too long to
  report in the report field, then the value will be displayed in
  K(1000) unit.
  
  3) When the decimal digits of the decimal point value is too
  long to report in the report field, then the value will be
  displayed with the decimal point position shifted right one.
  
  The truncated decimal value will be rounded by 5.
  
  4) Whenever the shortage of internal table entries occur,
  FABADA5 expands it.
  The logic to check if internal table shortage occurred and
  display '*****' in the report are removed.
  
  The details of module and macro modifications are as follows:
  
  The new macro FABUEDIT has been introduced to edit input value
  in K (1000) unit or edit it with the decimal point shifted one
  digit right, if digits of input value is larger than the digit
  that can be displayed in report.
  
  The new macro DA5XTBL0 has been introduced to do:
  
   1) GETMAIN first internal table.
   2) When the shortage of internal table entries occurs, GETMAIN
   new table entry that is fixed increment number of entries
   larger than the old table, copy records to new table and
   FREEMAIN old table.
  
  The macro DA5SDEV0 has been modified to calculate standard
  deviation as follows, when its base data is too large to
  calculate.
  
   1) Divide base data by 4 repeatedly until it becomes smaller
      than the restriction  (X'3FFFFFFF').
   2) Count times of dividing data.
   3) Calculate a standard deviation.
   4) Multiply standard deviation by 2 (=times of dividing data).
  
  The macro DA#MDA51 has been modified to increase following input
  fields length by 1byte:
  
  &A.#CI, &A.#OVF, &A.FSEMX, &A.FSEMN, &A.FLNMX, &A.FLNMN,
  &A.BRFM, &A.BRFMN, &A.DRFMX, &A.DRFMN, &A.IRFMX, &A.IRFMN,
  &B.#UOW, &B.#USEI, &B.#DCI, &B.DFSEMX, &B.DFSEMN, &B.DFLNMX,
  &B.DFLNMN, &B.DBRFMX, &B.DBRFMN, &B.DDRFMX, &B.DDRFMN, &B.DIRFMX
  &B.DIRFMN, &B.#ICI, &B.IFSEMX, &B.IFSEMN, &B.IFLNMX, &B.IFLNMN,
  &B.IBRFMX, &B.IBRFMN, &B.IDRFMX, &B.IDRFMN, &B.IIRFMX, &B.IIRFMN
  &C.R#OCC, &C.RMXL, &C.RMNL, &C.P#B, &C.P#D, &C.P#I, &D.#RAPS.
  
  The macro DA5WRKG0 has been modified follows.
  
   1) Increase following input fields length by 1byte:
  
      OS#BCI, DS#UOW, DS#DCIMN, DS#DCIMX, IS#UOW, IS#ICIMN,
      IS#ICIMX, TREC#,  TRECLNMX, TRECLNMN, TRTIOMX, TRTIOMN,
      TRCIOMX, TRCIOMN, RPLELN, RPLTBL, RPLENT, RP#REC, PTCHWRKG.
  
   2) Add internal table control fields that have table entry
      information.
  
  The macro DA5WRKP0 has been modified to increase following input
  fields length by 1byte:
  
  SDEVN.
  
  The macro DA5WRK20 has been modified to add the mapping DSECT
  for internal table control fields.
  
  The macro DA5INIT0 has been modified to call XTBL0000 subroutine
  (DA5XTBL0) in order to GETMAIN first internal tables.
  
  The macro DA5RECP0 has been modified to call XTBL0000 subroutine
  (DA5XTBL0) in order to expand internal table at the shortage of
  table entries.
  
  The macro DA5PSIO0 has been modified.
  The logic to check if internal table shortage occurred and
  display '*****' in the report are removed.
  
  Following parts have been modified to use FABUEDIT macro to
  edit data to report them:
  
  DA5PFSB0, DA5PFSD0, DA5PFSI0, DA5PGRA0, DA5PRPL0, DA5PRPR0,
  DA5PSIO0, DA5PSPL0, DA5PSYR0.
  
  The macro DA5MAIN0 has been modified to add FABUCHG of APAR
  PK05665.
  
  The macro DA5UOWR0 has been modified to correspond to increase
  of input field length.
  
  The module FABADA5 has been modified to copy DA5XTBL0.
  210Y
  DA#MDA51
  DA5HIS20
  DA5INIT0
  DA5MAIN0
  DA5PFSB0
  DA5PFSD0
  DA5PFSI0
  DA5PGRA0
  DA5PRPL0
  DA5PRPR0
  DA5PSIO0
  DA5PSPL0
  DA5PSYR0
  DA5RECP0
  DA5SDEV0
  DA5UOWR0
  DA5WRKG0
  DA5WRKP0
  DA5WRK20
  DA5XTBL0
  FABADA5
  FABUEDIT
  

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:

  UK03743

Modules/Macros

•    DA#MDA51 DA5HIS20 DA5INIT0 DA5MAIN0 DA5PFSB0
  DA5PFSD0 DA5PFSI0 DA5PGRA0 DA5PRPL0 DA5PRPR0 DA5PSIO0 DA5PSPL0
  DA5PSYR0 DA5RECP0 DA5SDEV0 DA5UOWR0 DA5WRKG0 DA5WRKP0 DA5WRK20
  DA5XTBL0 FABADA5  FABUEDIT
  

Fix information

• Fixed component name

  IMS HP FP UTILI

• Fixed component ID

  5655K9400

Applicable component levels

• R210 PSY UK03743

     UP05/05/25 P F505