PK53772: FPB ENHANCEMENT TO SUPPORT FP RANDOMIZER XCI INTERFACE FOR BATCH

APAR status

• Closed as new function.

Error description

• FPB enhancement to support FP Randomizer XCI interface for Batch
  (that was provided by IMS V10 PK40256 ).
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All using FP randomizer XCI interface for    *
  *                 Batch users of High Performance Fast Path    *
  *                 Utilities FP Basic Tools Version 3 Release 1 *
  *                 (FMID: H31A310).                             *
  ****************************************************************
  * PROBLEM DESCRIPTION: FPB supports FP Randomizer XCI          *
  *                      interface for Batch provided by IMS V10 *
  *                      PK40256.                                *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  The following FPB tools supports FP Randomizer XCI interface
  for Batch provided by IMS V10 (5635-A01) PK40256.
  
  1. Tuning Aid
  2. Unload/Reload
  3. FABCUR6/FABEUR6
  4. FP randomizing module interface
  

Problem conclusion

Temporary fix

Comments

• ========================
  = DOCUMENTATION CHANGE =
  ========================
  The IMS High Performance Fast Path Utilities for z/OS User's
  Guide Volume 2: Fast Path Basic Tools Version 3 Release 1
  (SC18-9870-01).
  
  Appendix J. FPB-Invoking an IMS DEDB randomizing module
   Interface parameter
  
  FABCRMIF supports the XCI randomizer interface for batch
  provided by IMS Version 10 PK40256.
  
    The following description should be changed follows:
  
     +-------- Product-Sensitive Programming Interface ---------+
     |                                                          |
  |  FABCRMIF contains three functional units:
  |  for initialization, for invoking the randomizing module and
  |  for the XCI randomizer termination.
  
     An application program must call the FABCRMIF routine with
     the initialization parameter first to establish the
     environment for invoking the randomizing module. Then the
     application calls FABCRMIF, using the randomizing module
     invocation parameter for each root segment key.
  |  For invoking the XCI randomizer, an application    program
  |  must call the FABCRMIF routine with the termination
  |  parameter to terminate the processing of the associated DBD.
     |                                                          |
     +--------End of Product-Sensitive Programming Interface ---+
  
   Initialization parameter
  
     +-------- Product-Sensitive Programming Interface ---------+
     |                                                          |
     Function code
  
      This is an optional parameter. It must be a 4-byte character
      field containing INIT. The initialization function sets
      the required environment for subsequent calculation (CALC)
      calls. The INIT function must be performed prior to a CALC
      call of the associated DBD.
      Up to sixteen INIT calls can be made for sixteen different
      DBD names.
  |   In case of the XCI randomizer routine, up to sixteen DBDs
  |   can be processed by calling TERM call.
  
  
    The following parameter should be added as follows:
  
  |  Termination parameter
  
  |  +-------- Product-Sensitive Programming Interface ---------+
  |  |                                                          |
  |   FABCRMIF is called for the XCI randomizer termination
  |   using the following parameter list:
  
  |  Function code
  |   This is a mandatory parameter for XCI randomizer.
  |   It must be a 4-byte character field containing
  |   TERM. The TERM function must be performed after a INIT
  |   a call of the associated DBD.
  
  |  DBDNAME
  |   This is a mandatory parameter. It must be an 8-byte
  |   character field containing the DBD name of the DEDB having
  |   been processed (that is, the member name of ACBLIB).
  |  |                                                          |
  |  +--------End of Product-Sensitive Programming Interface ---+
  
   DBT V2 application that process multiple DEDBs sequentially
  
     The following description should be added as follows:
  
  |  TERM call for the XCI randomizer is effective same as
  |  FABARMIF,  FABBRMIF, FABCRMIF, and FABDRMIF.
  
  ---------------------------------------------------------------
  Appendix O. FPB.Messages and codes
    FABD messages
  
     The following message should be changed as follows:
  
  |   FABD3670E ERROR IN CALL TO RANDOMIZER ROUTINE rmodname
  |             FUNCTION: function name
  |             - RETURN CODE: xxx REASON CODE: X'xxxxxxxx'
      Explanation: FABCRMIF/FABDRMI0 invoked the XCI randomizer
  |   routine with a function code of 'INIT', 'CALC', or 'TERM'
      call, and then returned with error.
  |   "FUNCTION" and "REASON CODE" are issued only when
  |   FABCRMIF/FABDRMI0 invoked the XCI randomizer routine.
  |   Function is 'INITIALIZATION CALL' or 'RANDOMIZING CALL' or
  |   'TERMINATION CALL'.
  
     The following message should be added as follows:
  
      FABD3701 ERROR IN "TERM" CALL TO FABCRMIF
               - FUNC="TERM";"DBDNAME" PARAMETER NOT FOUND
               - TERMINATION HAS BEEN PERFORMED ALREADY OR NOT
                 FOUND FOR DMB MEMBER xxxxxxxx
  
      Explanation: Program FABCRMIF/FABDRMI0 determined that
      the parameter list specified by the calling program was
      incorrect.
      System action: FABCRMIF/FABDRMI0 ends with an abend code of
      4011.
      Programmer response: Correct the CALL specifications in the
      program being used to invoke FABCRMIF/FABDRMI0.
      Rerun the job.
  
    FABC messages
  
     The following messages should be changed as follows:
  
      FABC3700E >>>>> UNLOAD FAILED FOR AREA nnnnn (AREANAME:
                      areaname)
             - ERROR OCCURRED DURING CALL TO RANDOMIZER rmodname
  |            FUNC:RANDOMIZING CALL
  
      Explanation: Program FABCUR1 determined that the unload
      subtask processing the specified area was unable to complete
      successfully.
      The first message is issued when an abend occurs during
      a call to the database Randomizer module.
  |   "FUNC:RANDOMIZING CALL" is issued only when the unload
  |   subtask processing invoked XCI randomizer.
  
      FABC3790E ERROR IN CALL TO RANDOMIZER xxxxxxxx
  |             FUNCTION: function name
  |             - RETURN CODE: xxx REASON CODE: X'xxxxxxxx'
                - AREA: zzzzz (AREANAME areaname)
                - SEG RBA: xxxxxxxx
      Explanation: An unload subtask called the specified
      randomizer module to calculate the new area and RAP
      number values for a root segment. The values returned
      were invalid.
  |   "FUNCTION" and "REASON CODE" are issued only when
  |   FABCUR1 or an unload subtask called XCI randomizer routine.
  
      FABC3953E ERROR IN CALL TO RANDOMIZER xxxxxxxx
  |             FUNCTION: function name
  |             - RETURN CODE: xxxx REASON CODE: X'xxxxxxxx'
  
      Explanation: Program FABCUR6 called the specified
      randomizer module to calculate the new area and RAP
      number values for a root segment. The values returned
      were invalid.
  |   "FUNCTION" and "REASON CODE" are issued only when
  |   FABCUR6 called XCI randomizer routine.
  

APAR Information

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

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

  UK30622

Modules/Macros

•    FABAGDD  FABALINK FABAMDDT FABBGDD  FABBMDDT
  FABBME1  FABCGDD  FABCMDDT FABCMMIF FABCMPC0 FABCRMIR FABCRMIS
  FABCRMIU FABCRMIX FABCRMIZ FABCRPRM FABCSREC FABCUR1  FABCUR1U
  FABCUR6X FABC1DMA FABC1EOJ FABC1EXR FABC1EXT FABC1GCD FABC1INI
  FABC1OP1 FABC1SBM FABC1SB0 FABC1SCH FABC6BLK FABC6EOF FABC6INI
  FABC6MGT FABC6ROT FABDGDD  FABDXCI  H31A310J ME1EOJ0  ME1WSTG0
  UR#DUCT0 UR1WSTG0
  

Fix information

• Fixed component name

  IMS HP FP UTILI

• Fixed component ID

  5655K9400

Applicable component levels

• R310 PSY UK30622

     UP07/10/26 P F710