PK64733: HP LOAD ALLOWS THE USER TO SELECT THE BEHAVIOR FOR THE CASE OF A MISSING TRAILER RECORD.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• APAR PK40210 changed the message and return code for the case
  of a missing trailer record, from HPSR0003W and RC=04 to
  HPSR0003E and RC=16.  This APAR makes it possible to select
  which combination of message and return code will be given
  in that situation.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of IBM IMS High Performance Load   *
  *                 for z/OS Version 2 Release 1 (FMID=H1IM210)  *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR makes it possible to take     *
  *                      back the changes of APAR PK40210 .      *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  The trailer record in the *HD or *SH unload data set is used to
  check the count of reloaded segment occurrences.
  
  When the trailer record is not found in the *HD or *SH unload
  data set, HP Load or IPR Reload utility had issued MSGHPSR0003W
  and ended with RC=04 before applying APAR PK40210.
  
  After applying PK40210, the return code is changed to RC=16
  and the load job using an unload data set in which the trailer
  record is eliminated purposely fails.
  
  This APAR makes it possible to take back the change of PK40210.
  *************
  ** Caution **
  *************
  If you want to receive RC=04, apply both PK64733 and PK64732.
  If you want to receive RC=16, DO NOT APPLY PK64732 .
  

Problem conclusion

• HP Load has been modified to handle the message and return code
  for the case of a missing trailer record.
  
  ========================
  = Documentation Change =
  ========================
  IMS High Performance Load for z/OS Version 2 Release 1 User's
  Guide SC18-9222-03 ( SC18922203 ) should be changed as follows:
  ================================================================
  APPENDIX1.3 Appendix C. Messages and codes
  APPENDIX1.3.1 Return codes
  APPENDIX1.3.1.1 High Performance Load return codes
  
    +------------------------------------------------------------+
    | Table 27. Return codes of High Performance Load            |
    +---------+---------+----------------------------------------+
    | Return  | Reason  |                                        |
    |  Code   |  Code   |                 Meaning                |
    +---------+---------+----------------------------------------+
    |    0    |  None   | Successful completion.                 |
    +---------+---------+----------------------------------------+
    |    4    | The reason code is a logical sum of the          |
    |         | following codes:                                 |
    |         +---------+----------------------------------------+
    |         | X'0001' | No header or trailer record. This code |
    |         |         | is returned if the input unloaded      |
    |         |         | data set did not have an unload type   |
    |         |         | header or trailer record. The database |
    |         |         | was successfully reloaded. High        |
    |         |         | Performance Load issues a message that |
    |         |         | explains which type of record was      |
    |         |         | missing.                               |
    +---------+---------+----------------------------------------+
      :         :         :
    +---------+---------+----------------------------------------+
  | |   16    |  None   | The database was not reloaded          |
  | |         |         | successfully. The reload segment count |
  | |         |         | was not equal to the unload count.     |
  | |         |         | Or the reload segment count cannot be  |
  | |         |         | verified despite the unload data set   |
  | |         |         | should have a trailer record and the   |
  | |         |         | verification is required.              |
    +---------+---------+----------------------------------------+
      :         :         :
  
  
  
  APPENDIX1.3.3 Messages
  APPENDIX1.3.3.1 High Performance Load messages
  
  (HPSR0003E is modified as follows.)
  
  | HPSR0003W LAST RECORD WAS NOT A TRAILER RECORD
  
    Explanation: The last record in the HD unloaded data set
    (DFSUINPT DD) was not an unload trailer record, although
    the unloaded data set should have a trailer record.
  | System action: High Performance Load sets a return code of
  | 4 and completes the reloading of the database.
    Programmer response: Verify that the input HD unloaded
    data set is correct. If it is not, correct it, and resubmit
    the job.
    Problem determination: None.
  
  
  (A new message is added as follows.)
  
  | HPSR0036E LAST RECORD WAS NOT A TRAILER RECORD
  
  | Explanation: The last record in the HD unloaded data set
  | (DFSUINPT DD) was not an unload trailer record, although
  | the unloaded data set should have a trailer record.
  | System action: High Performance Load sets a return code of 16.
  | Programmer response: Verify that the input HD unloaded
  | data set is correct. If it is not, correct it, and resubmit
  | the job.
  | Problem determination: None.
  

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:

  UK36535

Modules/Macros

•    HPSRHDLA HPSRHDLD HPSRHDL7 HPSRHDL8 HPSRHDL9
  HPSRHSLA HPSRHSLD HPSRHSL7 HPSRHSL8 HPSRHSL9 HPSRMSGT HPSRRLDA
  HPSRRLDM HPSRRLD7 HPSRRLD8 HPSRRLD9
  

Fix information

• Fixed component name

  IMS HIGH PERF L

• Fixed component ID

  5655E0700

Applicable component levels

• R210 PSY UK36535

     UP08/05/20 P F805

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.