PK26601: VARIOUS DFR PROBLEMS THAT NEED TO BE ADDRESSED

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• This APAR is created for errors detected internally.
  Here is a list of items being addressed:
  1) There is an incorrect format check of AREASLCT statement.
  2) An unnecessary update of SDEP CI for pre-allocation.
  3) DFR3525A message text needs adjustment.
  4) DFR3610A message reply character sequence change needed.
  5) DFR3001E message reason code error change needed.
  6) ABEND013 - 64 occurs when "//PROCLIB DD DUMMY" is specified.
  7) An incorrect conflict check of OLC= parameter between EXEC
     parameter and IMS.PROCLIB(DFSCGxxx).
  8) ABENDU0162 with message DFR1062E RSN=03 occurs instead of
     RC=16 with message DFR1057E RSN=01.
  9) An incorrect conflict check of OLC= parameter between EXEC
     parameter and X'4001' log.
  10) ABEND0C4 with message DFR3107E occurs instead of ABENDU3107
      with message DFR3107E.
  
  Additional keywords: ABENDS013 MSGDFR3525A MSGDFR3001E ABENDS0C4
                       MSGDFR1057E MSGDFR1062E MSGDFR3107E
                       TYPE4001
  

Local fix

Problem summary

•  9
  ****************************************************************
  * USERS AFFECTED: All IMS DEDB FAST RECOVERY Version 2         *
  *                 Release 2 (FMID=H1J2220) users in IMS V8 or  *
  *                 IMS V9.                                      *
  ****************************************************************
  * PROBLEM DESCRIPTION: Various problems of DFR detected as the *
  *                      results of an additional code review    *
  *                      and tests.                              *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  The following problems are fixed by this APAR:
  
  1. There is an incorrect format check of AREASLCT statement.
  
     An AREASLCT control statement and a keyword are coded in free
     format (columns 1-72) in an 80-byte record.
     If some characters are specified in columns 73-80, DFR issues
     MSGDFR3624E or MSGDFR3622E and terminates with RC=16.
  
  2. An unnecessary update of SDEP CI for pre-allocation.
  
     When a status of an SVSO DEDB area is 'RETRY(CFreason)' by a
     cause of a connectivity error of CF structures,
     DFR unnecessarily updates SDEP CIs of the SVSO DEDB area for
     pre-allocation.
  
  3. DFR3525A message text needs adjustment.
  
     Although the right message text is (A), DFR issues (B).
  
     (A) DFR3525A REPLY ERROR. REENTER 'YES' AFTER ENSURING
                  I/O PREVENTION FOR THE FAILED ACTIVE IMS HAS
                  COMPLETED
  
     (B) DFR3525A REPLY ERROR. REENTER 'YES' AFTER ENSURING
                  I/OPREVENTION FOR THE FAILED IMS HAS COMPLETED
  
  4. DFR3610A message reply character sequence change needed.
  
     When a reply to MSGDFR3610A is 'TERMx' (5 characters) or
     'CONTx' (5 characters), DFR continues processing with no
     error.
  
  5. DFR3001E message reason code error change needed.
  
     When a last parameter in an EXEC parameter has no operand,
     DFR issues MSGDFR3001E with an incorrect REASON CODE=09.
  
  6. ABEND013 - 64 occurs when "//PROCLIB DD DUMMY" is specified.
  
     In a global online change environment, DFR terminates
     with ABENDS013-64 instead of RC=16 with MSGDFR1059E when
     a //PROCLIB DD statement for IMS.PROCLIB data set ddname
     is specified as DUMMY.
  
  7. An incorrect conflict check of OLC= parameter between EXEC
     parameter and IMS.PROCLIB(DFSCGxxx).
  
     When OLC=G and CSLG=xxx are specified in EXEC parameters, and
     OLC= parameter is not specified in DFSCGxxx of IMS.PROCLIB
     member (OLC=LOCAL is specified by the default), DFR continues
     processing.
  
  8. ABENDU0162 with message DFR1062E RSN=03 occurs instead of
     RC=16 with message DFR1057E RSN=01.
  
     When OLC=G and CSLG=xxx are specified in EXEC parameters, and
     OLC=LOCAL is specified without OLCSTAT= parameter in DFSCGxxx
     of IMS.PROCLIB member, DFR issues DFR1062E REASON CODE=03 and
     terminates with ABENU1062 instead of RC=16 with MSGDFR1057E
     REASON CODE=01.
  
  9. An incorrect conflict check of OLC= parameter between EXEC
     parameter and X'4001' log.
  
     When OLC=L is specified in EXEC parameters, and the X'4001'
     log record contains an indicator of a global online change
     environment, DFR continues processing with no error.
  
  10. ABEND0C4 with message DFR3107E occurs instead of ABENDU3107
      with message DFR3107E.
  
      When DFR cannot write X'06' log record because of an OLDS
      primary extent full, DFR terminates with ABENDS0C4 instead
      of ABENDU3107.
  

Problem conclusion

• The following modules have been modified.
  (x = 8 and 9)
  
  DFRCCATx - The value for a check of EOL was changed from
             80-column into 72-column.
  DFRNRDOx - This module was changed to check an existence of CF
             related error for an SVSO DEDB area before updating
             SDEP CIs for pre-allocation.
             When there is an error, updating processing of SDEP
             CIs is bypassed.
  DFRNFCTx - The message text of MSGDFR3525A was corrected.
  DFRXCONx - The number of bytes at the time of checking the area
             for a response to MSGDFR3601 was changed from 4 bytes
             into 5 bytes.
  DFRCPRMx - When a last EXEC parameter was judged as "There is no
             operand", it changed so that REASON CODE of
             MSGDFR3001E for the parameter might be set.
  DFRIGOCx - This module was changed as follows;
             1. A error handling for //PROCLIB DD DUMMY statement
                was added.
             2. "L" was set to the initial value of the area where
                the value of the OLC= parameter of DFSCGxxx is
                saved.
             3. The conditions for issuing MSGDFR1057E and
                MSGDFR1062E were corrected.
  DFRLOLCx - This module was changed as follows;
             1. The message text of MSGDFR1056E was changed.
             2. A conflict check of OLC= parameter between the
                EXEC parameter and X'4001' log record was added.
  DFRGCLSx - This module was changed to save a base register (R12)
             of a calling module and to reset a base register
             (R12) of a self-module.
  *
  ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS DEDB Fast Recovery for z/OS Version 2 Release 2 User's Guide
  and Reference (Document Number: SC27-0928-02) should be changed
  as follows.
  ================================================================
   4.0 Input and Output for DEDB Fast Recover under IMS V8 and V9
    4.1 Understand Required Input
     4.1.5 Area Recovery Retry Control Statement
      4.1.5.1 Rules for Area Recovery Retry Control Statement
  
       - A control statement and a keyword are coded in free
  |      format (columns 1-72) in an 80-byte record.
                       :
  ================================================================
   Appendix B. Messages and Codes
    B.3 Messages
  *---------------------------------------------------------------
  - DFR1056E requires the changes in the 'Message Text' and
    'Explanation'.
  
  | DFR1056E THE ONLINE CHANGE TYPE OF EXEC PARAMETER AND
  |          OLC=olctype DO NOT MATCH
  |
  |  Explanation : DFR found that the online change type
  |  (local or global) in the checkpoint log record (X'4001')
  |  which DFR uses for recovery and the online change type
  |  specified in OLC= EXEC parameter did not match.
  |
  |  The olctype is the online change type in the checkpoint log
  |  record (X'4001) as follows:
  |
  |       LOCAL  : Local online change is enabled.
  |       GLOBAL : Global online change is enabled.
  |
      System Action :
                               :
  *---------------------------------------------------------------
  - DFR3001E requires the changes in explanation of REASON CODE.
  
    DFR3001E DEDB FAST RECOVERY TERMINATED DUE TO EXEC PARAMETER
             ERRORS. REASON CODE=nn
  
      Explanation:  There is an error in one or more of the EXEC
      parameters. The type of error is indicated by the reason
      code nn.
  
        Code  Meaning
                  :
  |      02   The IMSID= operand is not 1 to 4 characters long.
                  :
  |      05   The RSENAME= operand is not 1 to 8 characters long.
                  :
  |      17   The IMSPLEX= operand is not 1 to 5 characters long.
                  :
  |      19   The CSLG parameter is not specified while OLC=G
  |           parameter is specified, or the specified value of
  |           CSLG is not 1 to 3 characters long.
                  :
  *---------------------------------------------------------------
  - DFR3620I requires the change in the 'Message Text'.
  
  | DFR3620I AREA SELECTION FUNCTION SPECIFIED.
  **
  

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:

Modules/Macros

•    DFRCCAT8 DFRCCAT9 DFRCPRM8 DFRCPRM9 DFRGCLS8
  DFRGCLS9 DFRIGOC8 DFRIGOC9 DFRLOLC8 DFRLOLC9 DFRNFCT8 DFRNFCT9
  DFRNRDO8 DFRNRDO9 DFRXCON8 DFRXCON9
  

Fix information

• Fixed component name

  DEDB FAST RECOV

• Fixed component ID

  5655E3200

Applicable component levels

• R220 PSY UK15633

     UP06/06/26 P F606

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.