PQ97906: IPR UNLOAD UTILITY SHOULD ALLOW DFSURGU1 DD INSTEAD OF SYSUT2 DD

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• This APAR enables IPR Unload utility to allow DFSURGU1 DD
  instead of SYSUT2 DD.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of IMS High Performance Unload     *
  *                 for OS/390 Release 1 (FMID=H1IN110)          *
  *                 who are using IMS Parallel Reorganization    *
  *                 for z/OS Version 2 Release 1 (FMID=N25N210)  *
  *                 or Version 3 Release 1 (FMID=H25N310).       *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR enables IPR Unload utility    *
  *                      to accept DFSURGU1 DD statement         *
  *                      instead of SYSUT2 DD statement          *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  This APAR enables IPR V2 Unload utility and IPR V3 Unload
  utility to accept the DDs DFSURGU1 and DFSURGU2 instead of
  SYSUT2 and SYSUT3 for the unloaded data set.
  
  - DFSURGU1 DD is used when the SYSUT2 DD statement is not
    specified, even if no OUTPUT control statement is specified.
  
  - You can specify the DD names DFSURGU1 and DFSURGU2 on the
    OUTPUT control statement for changing the format type or
    specifying an exit routine.
  
  For this enhancement, the following macros and modules
  which are contained in IMS High Performance Unload for OS/390,
  Release 1 (FMID=H1IN110) are modified:
   Macro:  HPSUHOUT
   Module: HPSUSTMT,HPSUURG7,HPSUURG8,HPSUURG9,HPSU015
  

Problem conclusion

Temporary fix

Comments

• ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS Parallel Reorganization for z/OS Version 3 Release 1
  User's Guide (SC18-9228-00) should be modified as follows.
  
  3.0     IPR Unload Utility
  3.7     JCL Requirements
  3.7.2   DD Statements
  
  Table 11. DD Statements and Record Format for the IPR Unload
            Utility
   (Two DD names and a note are added to the Table 11.)
  ---------------------------------------------------------------
  | DDNAME : DFSURGU1
  | Use : Output
  | Need : Optional (6)
  |
  | DDNAME : DFSURGU2
  | Use : Output
  | Need : Optional (6)
  |
  | Notes:
  | 6. You can use the DFSURGU1 statement and the DFSURGU2 DD
  |    statement only if the SYSUT2 DD statement is not specified.
   ---------------------------------------------------------------
  :
   SYSUT2 DD
   SYSUT3 DD
   SYSUT4 DD
    Defines the output data set on which the database is unloaded.
    The data set must reside on either a tape or a direct access
    device. It can also be defined as DUMMY.
  
    If a block size is not specified on the SYSUTn DD statement,
    the IPR Unload utility uses the half track size for each
    device type. If the database contains segments larger than
    the block size, the maximum block size 32K is used.
  
    Do not specify the LRECL value on the DD statement. The IPR
    Unload utility uses the default record size (that is, block
    size minus 4).
  
    The IPR Unload utility uses BUFNO=24 as the default buffer
    number. When the default buffer number is used, the buffer is
    allocated above the 16MB line. If you want to change
    the buffer number, specify DCB=BUFNO=nn on the DD statement.
  
  |DFSURGU1 DD
  |DFSURGU2 DD
  | Defines the output data set on which the database is unloaded
  | the same way as the SYSUTn DD. These statements are available
  | only when the SYSUT2 DD statement is not specified.
  
    :
    :
  
   3.8     Control Statements
   3.8.3   Control Statements for Unload Function
   3.8.3.5 OUTPUT Control Statement
  
    Specifies output characteristics of an IPR Unload job.
    This control statement is optional. If you do not explicitly
    specify this control statement, OUTPUT=SYSUT2,*HD will be used
  
              +---SYSUT2---+   +----*HD-----+
              |            |   |            |
   >>-OUTPUT=-+------------+-,-+------------+-+--------------+-><
              |            |   |            | |              |
              +-| ddname |-+   +-| format |-+ +-|,exitspec |-+
  
   ddname:
  
  |---+--SYSUT3---------------------+--------------------------|
      |                             |
      +--SYSUT4---------------------+
      |                             |
      |     +--,-------------+      |
      |     |                |      |
      |     v                |      |
      +--(-----+--SYSUT2--+-----)---+
      |        |          |         |
      |        +--SYSUT3--+         |
      |        |          |         |
      |        +--SYSUT4--+         |
      |                             |
  |   +--DFSURGU1-------------------+
  |   |                             |
  |   +--(--DFSURGU1--,DFSURGU2--)--+
  
    ddname
     The first operand (ddname) of an OUTPUT statement specifies
     the DD name for the unload data set.
     The following DD names are allowed: SYSUT2, SYSUT3, and
  |  SYSUT4. DFSURGU1 and DFSURGU2 are also allowed.
       You can specify multiple DD names as a list of DD names.
  |  If no DD name is specified, the DD name of SYSUT2 or DFSURGU1
     is assumed.
  
     If an exit routine is specified in the OUTPUT statement,
     the segment data is edited by the exit routine and written to
     the data set identified by the DD name.
  
     You can specify up to three DD names. If you specify more
     than one DD name, you must enclose the list of DD names
     with a pair of parentheses. For example:
           OUTPUT=SYSUT2,*HD
           OUTPUT=(SYSUT2,SYSUT3),*HD
           OUTPUT=(SYSUT2,SYSUT3,SYSUT4),*HD
  
  |  Notes:
  |  1.You can use the DFSURGU1 DD statement instead of the SYSUT2
  |    DD statement. In this case, the unloaded segment records
  |    are written to the DFSURGU1 data set even if no OUTPUT
  |    control statement is specified.
  |  2.The DFSURGU2 DD statement is available only when
  |    the DFSURGU1 DD statement is used.
  |  3.You cannot specify SYSUTn (n=2,3,4) and DFSURGUn (n=1,2)
  |    together on the OUTPUT control statements.
  
     :
     :
  E.0     Messages and Codes
  E.3     Messages
  E.3.5   HPSU Messages
  
  (HPSU3256E, HPSU3257E and HPSU3849E are modified
   and HPSU3253I is added.)
  
  |HPSU3256E BLKSIZE OR LRECL OF ddname   IS TOO SMALL
  
  |Explanation: The block size or the record size of the ddname
   data set is too small.  For *HD output, the block size is
   always the maximum device capacity. For other output, the block
   size or the record size is the maximum device capacity unless
   a block size or record size is coded on the JCL statement.
   System Action: IPR Unload ends abnormally.
   Programmer Response: If the utility uses the maximum device
  |capacity, check if the ddname can be allocated on a device
   with more track capacity. If the utility uses the block size
   or the record size specified on the JCL statement, check if
   the block size or the record size can be increased or use
   the default maximum device capacity.
   Record size can be specified only for *F1, *F2, and *F3 format.
   If the record size (LRECL) is coded on the JCL statement, it
   must be less than or equal to the block size minus 4.
  
   *
  
  |HPSU3257E OPEN OF ddname   HAS FAILED
  
  |Explanation: IPR Unload could not open the ddname data set
   to be unloaded the database.
   System Action: IPR Unload ends abnormally.
  |Programmer Response: Correct the DD statement.
  
   *
  
   HPSU3849E INVALID OUTPUT TYPE IS SPECIFIED
  
   Explanation: IPR Unload detected an incorrect output type
   on the OUTPUT control statement. Only SYSUT2, SYSUT3,
   or SYSUT4 can be specified.
  |DFSURGU1 and DFSURGU2 are also allowed.
   System Action: IPR Unload ends abnormally.
   Programmer Response: Correct the control statement.
  
   *
  
  |HPSU3253I DFSURGUn DD IS USED INSTEAD OF SYSUTn DD
  |
  |Explanation:  The SYSUTn (n=2 or 3) DD statement is not
  |specified. IPR Unload utility uses the DFSURGUn (n=1 or 2) DD
  |statement instead of the SYSUTn (n=2 or 3) DD statement.
  |System Action: The IPR Unload continues processing.
  |Programmer Response: None.
  
  ================== End of Doc-Change ==================
  

APAR Information

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

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

  UQ96212

Modules/Macros

•    HPSUHOUT HPSUSTMT HPSUURG7 HPSUURG8 HPSUURG9
  HPSU015
  

Fix information

• Fixed component name

  IMS HIGHPERF UN

• Fixed component ID

  5655E0600

Applicable component levels

• R110 PSY UQ96212

     UP04/12/21 P F412

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.