PQ89630: HPIC CAN NOT HANDLE DYNALLOC FAIL OF HALDB FOR IMS V8 AND V9.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• HPIC mishandles dynalloc fail of HALDB for IMS V8 and V9, and
  processing continues and fails with S0C4 abend.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of IMS High Performance Image      *
  *                 Copy for z/OS Version 3 Release 1            *
  *                 (FMID=H1J0310).                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR accumulate following          *
  *                      3 APAR fixes of ICE V2.1.               *
  *                      - PQ88227                               *
  *                      Image Copy function terminates with     *
  *                      ABEND S0C4 ( ABEND0C4), when the        *
  *                      dynamic allocation for HALDB fails.     *
  *                      - PQ87801                               *
  *                      Since Recovery function can process     *
  *                      only one DBDS. HPIC provides new        *
  *                      skeletal JCL for GENGCL.RECOV that      *
  *                      invokes FABJMAIN Recovery function      *
  *                      for full function database and is       *
  *                      used DSG, CA Group, or DBDS Group       *
  *                      GENJCL.RECOV process.                   *
  *                      - PQ88616                               *
  *                      The CRC turns off the IC NEEDED FLAG of *
  *                      DBDS record in DBRC, when the CRC runs  *
  *                      against the database that is            *
  *                      reorganized but is not taken IC of      *
  *                      reorgnized database yet.                *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  This APAR is forword fit from following 3 APARs from ICE V2.1:
   - PQ88227
   - PQ87801
   - PQ88616
  < Fix of PQ88227 >
  The Image Copy function changes the timing of HALDB data set
  for IMS V8 and V9 by APAR PQ83801. That time the Image copy
  function dynamically allocate the input data set as DISP=OLD
  and handles DYNAMIC ALLOCATION error incorrectly. Inconsequence
  of that ICE terminates with ABEND S0C4 ( ABEND0C4 ) when failing
  dynamic allocation.
  HPIC should allocate the input database data set as DISP=SHR,
  and issue correct error message for HALDB dynamic allocation
  fail.
  < Fix of PQ87801 >
  Since the Recovery function can process only one DBDS at one
  time, the client should write more than one JOBSTEP of FABJMAIN
  if they recover DSG, CA Group, or DBDS Group.
  By this APAR, HPIC provides new GENJCL SKELETAL JCL FABJRVGR
  for FABJMAIN recovery, that generates FABJMAIN recovery JCL
  for FULL Function database by GENJCL.RECOV.  When you used
  it for DSG, CA Group, or DBDS Group, the recovery JOBSTEPs for
  all DBDS that register in group is generated by one process.
  < Fix of PQ88616 >
  The CRC register the output IC data set as IC record into DBRC
  for one of following condition:
  - The secondary IC data set is not registered
  - The pair of IC data sets are registered, but one of them are
    flagged as ERROR
  HPIC uses DELETE.IC for deleting exist IC record them issues
  NOTIFY.IC of correct IC records. But when the database is just
  reorganized and flagged on IC NEEDED, NOTIFY command turn off
  ICNEEDED FLAG. ICE CRC must not keeps DBDS Flag, so CRC uses
  CHANGE.IC instead of DELETE/NOTIFY.IC Command.
  

Problem conclusion

• FABJDPSN and FABJDMPN have been modified following:
   - Dynamically allocate HALDB with DISP=SHR
   - Issue FABJ3916E and FABJ3917E message when failing
     dynamic allocation for HALDB.
  FABJDMP7, FABJDMP8, and FABJDMP9 has been reassembled.
  FABJDPS7, FABJDPS8, and FABJDPS9 has been reassembled.
  
  FABJCRC0 and FABJDBCM have been modified to use CHANGE.IC
  command instead of NOTIFY.IC command.
  
  **********************************************************
  * * * * *  HOW TO USE NEW SKELETAL JCL FABJRVGR  * * * * *
  **********************************************************
  Before using skeletal JCL, read following direction and
  modify the sample skeletal JCL and your GENJCL JCL.
    1. Customize the member FABJRVGR. The modification guide
       is written in the FABJRVGR as NOTE.
    2. Concatenate the sample library ( ICEHLQ.SHPSSAMP ), that
       FABJRVGR is resided, in JCLPD DD statement of your GENJCL
       job.
    3. Specify MEMBER(FABJRVGR) in GENJCL.RECOV statement.
        Example:
           GENJCL.RECOV GROUP(group_name) MEMBER(FABJRVGR)
  

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:

Modules/Macros

• FABJCRC0 FABJDBCM FABJDMPN FABJDMP7 FABJDMP8
  FABJDMP9 FABJDPSN FABJDPS7 FABJDPS8 FABJDPS9 FABJRVGR
  

Fix information

• Fixed component name

  IMS HP IMAGE CO

• Fixed component ID

  5655K9600

Applicable component levels

• R310 PSY UQ89357

     UP04/06/11 P F406

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.