PK84204: FIX THE PROBLEM OF ABEND U3957 INTRODUCED BY UK42033

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The APAR fixes the error which was coded by APAR/PTF
  PK76238/UK42033.
  HPIC mishandled non-registered DEDB AREA at dynalloc/dealloc
  process.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS High Performance Image Copy for z/OS *
  *                 Version 4 Release 1 users ( FMID=H1J0410 )   *
  ****************************************************************
  * PROBLEM DESCRIPTION: After applying APAR PK76238, HPIC Image *
  *                      Copy function issues message FABJ3957E  *
  *                      ( MSGFABJ3957E ) and terminates with    *
  *                      ABEND U3957 ( ABENDU3957 ) when all of  *
  *                      the following conditions are satisfied: *
  *                      - DBRC=Y                                *
  *                      - EXEC PGM=FABJMAIN                     *
  *                      - The organization of the input         *
  *                        database is DEDB                      *
  *                      - The input DEDB is not registered      *
  *                        in DBRC                               *
  *                      - The input DEDB area data set is       *
  *                        allocated by JCL DD statement         *
  *                                                              *
  *                      Also, this APAR fixes following         *
  *                      problems:                               *
  *                      - HPIC Image Copy function issues       *
  *                        message FABJ3801E ( MSGFABJ3801E )    *
  *                        and terminates with ABEND U3801       *
  *                        ( ABENDU3801 ).                       *
  *                      - HPIC Image Copy function issues       *
  *                        message FABJ3916E ( MSGFABJ3916E )    *
  *                        and terminates with ABEND U3916       *
  *                        ( ABENDU3916 ).                       *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  After applying APAR PK76238, HPIC Image Copy function issues
  message FABJ3957E ( MSGFABJ3957E ) and terminates with ABEND
  U3957 ( ABENDU3957 ) when all of the following conditions are
  satisfied:
  - DBRC=Y
  - EXEC PGM=FABJMAIN
  - The organization of the input database is DEDB
  - The input DEDB is not registered in DBRC
  - The input DEDB area data set is allocated by JCL DD statement
  
  By APAR PK76238, HPIC has changed the timing of issuing the
  DEVTYPE macro for the input DEDB area data set. So HPIC misreads
  the specification of the input DEDB area data set DD in the JCL,
  and terminates with abend as execution error.
  
  This APAR fixes the above problem and HPIC Image Copy function
  issues message DFS3708W ( MSGDFS3708W ) and terminates with
  RC=04 on the conditions above.
  
  Also, this APAR fixes following problems:
  - HPIC Image Copy function issues message FABJ3801E
    ( MSGFABJ3801E ) and terminates with ABEND U3801
    ( ABENDU3801 ) when all of the following conditions are
    satisfied:
    - DBRC=Y
    - EXEC PGM=FABJMAIN
    - The organization of the input database is DEDB
    - The DBDS record of the input DEDB is not registered in DBRC
  This APAR fixes the above problem and HPIC Image Copy function
  issues message DFS3708W ( MSGDFS3708W ) and terminates with
  RC=04 on the conditions above.
  
  - HPIC Image Copy function issues message FABJ3916E
    ( MSGFABJ3916E ) and terminates with ABEND U3916
    ( ABENDU3916 ) when all of the following conditions are
    satisfied:
    - DBRC=N
    - EXEC PGM=FABJMAIN
    - The organization of the input database is DEDB
    - The input DEDB area data set is not allocated
  This APAR fixes the above problem and HPIC Image Copy function
  issues message DFS3726A ( MSGDFS3726A ) and terminates with
  RC=08 on the conditions above.
  

Problem conclusion

• FABJMAIN has been modified to issue the DEVTYPE macro with an
  AREA name and to check whether the input database data set is
  specified in JCL or not before the error handling.
  
  FABJDALC and FABJDALO have been modified to check whether the
  input database data set was dynamically allocated from MDA
  library or not and to unallocate only the allocated data set.
  
  FABJDBAL and FABJIDXN have been modified not to turn on the
  internal flag indicating that the input full function database
  data set has been dynamically allocated from MDA library.
  
  FABJIDX7, FABJIDX8, FABJIDX9, FABJIDXA and FABJIDXB have been
  reassembled.
  

Temporary fix

• *********
  * HIPER *
  *********
  

Comments

APAR Information

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

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

  UK45740

Modules/Macros

• FABJDALC FABJDALO FABJDBAL FABJIDXA FABJIDXB
  FABJIDXN FABJIDX7 FABJIDX8 FABJIDX9 FABJMAIN
  

Fix information

• Fixed component name

  IMS HP IMAGE CO

• Fixed component ID

  5655K9600

Applicable component levels

• R410 PSY UK45740

     UP09/04/18 P F904 «

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.