PK01382: IF NON-RECOVERABLE DB IS SPECIFIED AS THE INPUT DB FOR CIC, HPIC ABENDS WITH U3933 (ABENDU3933).

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• If a NON-RECOVERBLE DB is specified as the DBD= key word in a
  IC statement, or is a defined GROUP, HPIC terminates with
  ABEND U3933. DBRC=Y is required for CIC and the CIC process
  is not allowed for IC processing.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS High Performance Image Copy for z/OS *
  *                 Version 3 Release 2 users (FMID=H1J0320)     *
  ****************************************************************
  * PROBLEM DESCRIPTION: HPIC Concurrent Image Copy (CIC)        *
  *                      function abends U3933 ( ABENDU3933 )    *
  *                      when the input database is defined as   *
  *                      NON-RECOVERABLE in DBRC.                *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  HPIC Concurrent Image Copy (CIC) function abends U3933
  ( ABENDU3933 ). Because HPIC Concurrent Image Copy function gets
  an error from DBRC when the input database is defined as
  NON-RECOVERABLE in DBRC.
  

Problem conclusion

• FABJACQG has been modified to bypass the logic which checks DSN
  of output IC for the NON-RECOVERABLE DB of the HPIC Concurrent
  Image Copy process.
  
  FABJMAIN has been modified to request FABJRCH7, FABJRCH8, or
  FABJRCH9.
  
  FABJRPT0 has been modified following things:
  - The ICTYPE of ICERPRT DD is changed to 'N/A' from 'UIC' when
    HDPC=O is specified for the primary index or secondary index.
  - The ICERPRT DD for the NON-RECOVERABLE DB of the HPIC
    Concurrent Image Copy process is same contents as HPPC=O is
    specified for primary index or secondary index.
  
  FABJBLKD has been modified to add the new symbols for
  NON-RECOVERABLE DB.
  
  FABJDPSN has been modified following things:
  - An output image copy data set is not created and information
    message FABJ0183I is issued when the HPIC Concurrent Image
    Copy function processes the NON-RECOVERABLE DB.
  - Information message FABJ0184I is issued when HDPC=O is
    specified for primary index or secondary index without
    providing the correct HDPC library in STEPLIB.
  
  FABJDPS7, FABJDPS8, and FABJDPS9 have been reassembled.
  
  FABJRCHK has been modified to check the DB record in the DBRC
  RECON in order to get the information whether the input database
  is defined as NON-RECOVERABLE or not.
  
  FABJRCH7, FABJRCH8, and FABJRCH9 have been reassembled.
  
  FABJINT1 has been modified to set the flag for VIC process when
  the primary index or secondary index is processed.
  
  The following modules have been reassembled.
    FABJCMDB  FABJDBDN  FABJDBR9  FABJDREQ  FABJMDP9  FABJRDB7
    FABJCRC0  FABJDBD7  FABJDCTL  FABJDRQS  FABJMRGE  FABJRDB8
    FABJCRC1  FABJDBD8  FABJDMPN  FABJICDD  FABJNTFC  FABJRDB9
    FABJCTCV  FABJDBD9  FABJDMP0  FABJINT2  FABJORCN  FABJSAS2
    FABJCZCV  FABJDBF0  FABJDMP7  FABJIPRC  FABJORC7  FABJTERM
    FABJDALC  FABJDBLK  FABJDMP8  FABJMAS1  FABJORC8  FABJTGEN
    FABJDALO  FABJDBRC  FABJDMP9  FABJMDPN  FABJORC9  FABJUIC1
    FABJDBCM  FABJDBR7  FABJDOPN  FABJMDP7  FABJPARM  FABJXLIM
    FABJDBC1  FABJDBR8  FABJDPUT  FABJMDP8  FABJPRM2
  
  ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS High Performance Image Copy for z/OS Version 3 Release 2
  User's Guide SC18-7617-01 ( SC18761701 ) should be changed as
  follows:
  
  A.0Appendix A.  Return Codes, Abend Codes, and Messages
   A.3 Messages
  
  The message FABJ0183I is added.
  
  | FABJ0183I CONCURRENT IMAGE COPY FOR A NON-RECOVERABLE DATASET
  | DOES NOT CREATE AN IMAGE COPY DATA SET
  |
  | Explanation:
  | HPIC concurrent image copy process is not created an output
  | image copy data set for NON-RECOVERABLE database.
  |
  | System Action: None.
  |
  | Programmer Response: None.
  
  The message FABJ0184I is added.
  
  | FABJ0184I HD POINTER CHECKER IS NOT PERFORMED, HOWEVER HDPC=O
  | IS REQUESTED.
  |
  | Explanation:
  | HDPC HASH CHECK is requested without creating an output image
  | copy for primary or secondary index database. But the HDPC
  | HASH CHECK is not done, because correct HDPC library is not
  | provided in STEPLIB.
  |
  | System Action:
  | Program FABJMAIN continues processing without an HDPC HASH
  | check. The return code of the process is 04.
  |
  | Programmer Response:
  | If you wish, provide correct HPPC library in the STEPLIB and
  | rerun the job.
  

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:

  UK01399

Modules/Macros

•    FABJACQG FABJBLKD FABJCMDB FABJCRC0 FABJCRC1
  FABJCTCV FABJCZCV FABJDALC FABJDALO FABJDBCM FABJDBC1 FABJDBDN
  FABJDBD7 FABJDBD8 FABJDBD9 FABJDBF0 FABJDBLK FABJDBRC FABJDBR7
  FABJDBR8 FABJDBR9 FABJDCTL FABJDMPN FABJDMP0 FABJDMP7 FABJDMP8
  FABJDMP9 FABJDOPN FABJDPSN FABJDPS7 FABJDPS8 FABJDPS9 FABJDPUT
  FABJDREQ FABJDRQS FABJICDD FABJINT1 FABJINT2 FABJIPRC FABJMAIN
  FABJMAS1 FABJMDPN FABJMDP7 FABJMDP8 FABJMDP9 FABJMRGE FABJNTFC
  FABJORCN FABJORC7 FABJORC8 FABJORC9 FABJPARM FABJPRM2 FABJRCHK
  FABJRCH7 FABJRCH8 FABJRCH9 FABJRDB7 FABJRDB8 FABJRDB9 FABJRPT0
  FABJSAS2 FABJTERM FABJTGEN FABJUIC1 FABJXLIM
  

Fix information

• Fixed component name

  IMS HP IMAGE CO

• Fixed component ID

  5655K9600

Applicable component levels

• R320 PSY UK01399

     UP05/03/16 P F503

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.