PI39778: HPIC ABEND U3916 WHEN STACKBASE=REAL IS USED FOR CIC OF NON-RECOVERABLE DB

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• IMS High Performance Image Copy terminates with ABEND U3916 due
  to logic error of STACKBASE=REAL, when  HPIC creates a
  Concurrent Image Copy data set of Non-Recoverable DB.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS High Performance Image Copy for z/OS *
  *                 Version 4 Release 2 users ( FMID=H1J0420 )   *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR fixes following problems:     *
  *                      - IMS HP Image Copy terminates with     *
  *                        ABEND U3916 ( ABENDU3916 ) when using *
  *                        STACK output with STACKBASE=REAL, if  *
  *                        the image copy process is bypassed    *
  *                        for the first DBDS or area in the     *
  *                        each stacked tape by following        *
  *                        reasons:                              *
  *                        - Running process is Concurrent Image *
  *                          Copy (CIC) and the first DBDS or    *
  *                          area is non-recoverable database in *
  *                          DBRC.                               *
  *                        - The database is index database and  *
  *                          virtual image copy process (VIC) is *
  *                          requested.                          *
  *                        - The database is index database and  *
  *                          HDPC=O is requested.                *
  *                      - IMS HP Image Copy terminates with     *
  *                        RC=08 and message FABJ0177E           *
  *                        ( MSGFABJ0177E ) when VIC=Y is        *
  *                        specified other than GLOBAL           *
  *                        statement.                            *
  *                      - IMS HP Image Copy sets the incorrect  *
  *                        return code in RC and SMS= reason     *
  *                        code in SMS_RSN= to message FABJ3916E *
  *                        ( MSGFABJ3916E ).                     *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  This APAR fixes following problems:
  - IMS HP Image Copy terminates with ABEND U3916 ( ABENDU3916 )
    when using STACK output with STACKBASE=REAL, if the image copy
    process is bypassed for the first DBDS or area in the each
    stacked tape by following reasons:
    - Running process is Concurrent Image Copy (CIC) and the first
      DBDS or area is non-recoverable database in DBRC.
    - The database is index database and virtual image copy
      process (VIC) is requested.
    - The database is index database and HDPC=O is requested.
    The cause of this problem is that blank sets in the data set
    name text unit of DYNALLOC macro and when IMS HP Image Copy
    issues the DYNALLOC.
  
  - IMS HP Image Copy terminates with RC=08 and message FABJ0177E
    ( MSGFABJ0177E ) when VIC=Y is specified other than GLOBAL
    statement.
    The cause of this problem is that IMS HP Image Copy mishandles
    the flag in internal control block and builds NOTIFY.UIC
    command with incorrect syntax.
  
  - IMS HP Image Copy sets the incorrect return code in RC and
    SMS= reason code in SMS_RSN= to message FABJ3916E
    ( MSGFABJ3916E ).
    The cause of this problem is that IMS HP Image Copy does not
    fetch correct return code and SMS reason code field when
    DYNALLOC returns error.
  

Problem conclusion

• ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS High Performance Image Copy for z/OS Version 4 Release 2
  User's Guide SC19-2756-01 ( SC19275601 ) should be changed as
  follows:
  
  Part 3. Running IMS HP Image Copy
    Chapter 12. IMS HP Image Copy reports
      Processing messages for the Image Copy function
  :
  |     Note:
  |       %NODATA is reported in the output DD name field when one
  |       of the following is true:
  |       - Requested DBDS or area is non-recoverable database
  |         under Concurrent Image Copy process.
  |       - Database is index database and VIC=Y is requested.
  |       - Database is index database and HDPC=O is requested.
  
  
      Image Copy Dump Process report
  :
        DD
          The image copy ddname in the process.
  |       %NODATA is reported in the output DD name field when one
  |       of the following is true:
  |       - Requested DBDS or area is un-recoverable
  |         non-recoverable database under Concurrent Image Copy
  |         process.
  |       - Database is index database and VIC=Y is requested.
  |       - Database is index database and HDPC=O is requested.
  
  
  The following modules and macros have been modified to bypass
  DYNALLOC process of dummy data set for stacking if IMS HP Image
  Copy dose not need to generate image copy data set for DBDS or
  area.
    FABJDFCA FABJDFCB FABJDFCN FABJDFC2 FABJDFC3 FABJDFC4 FABJDFC9
    FABJDMPA FABJDMPB FABJDMPN FABJDMP2 FABJDMP3 FABJDMP4 FABJDMP9
    FABJBLKD FABJICDD FABJOFDD
  
  FABJDALC has been modified to issue the correct information in
  the message FABJ3916E ( MSGFABJ3916E ).
  
  FABJPARM has been modified to generate the NOTIFY.UIC command
  correctly.
  

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:

  UI27597

Modules/Macros

• FABJDALC FABJDFCA FABJDFCB FABJDFC2 FABJDFC3
  FABJDFC4 FABJDFC9 FABJDMPA FABJDMPB FABJDMP2 FABJDMP3 FABJDMP4
  FABJDMP9 FABJICDD FABJOFDD FABJPARM
  

Fix information

• Fixed component name

  IMS HP IMAGE CO

• Fixed component ID

  5655K9600

Applicable component levels

• R420 PSY UI27597

     UP15/05/15 P F505

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.