PK49072: DFR ABENDU3402 WITH MSGDFR3402E REASON CODE=NODMAC

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• If one of the following occurs after creation of the x'4087'
  log record, DFR in IMS V8, V9, or V10 issues a DFR3402E
  message and ends with an abend code U3402 ( ABENDU3402 ):
  - AREA is deleted by ACBLIB online change
  - DB is deleted by ACBLIB online change
  - DB is deleted by MODBLKS online change
  - DB is deleted by DELETE DB command (only when DRD is enabled
    in IMS V10)
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS DEDB FAST RECOVERY Version 2         *
  *                 Release 2 (FMID=H1J2220) users.              *
  ****************************************************************
  * PROBLEM DESCRIPTION: If one of the following is performed to *
  *                      a DEDB contained in the checkpoint log  *
  *                      (x'4087') which DFR uses for recovery,  *
  *                      DFR in IMS V8, V9, and V10 issues a     *
  *                      MSGDFR3402E message and ends with an    *
  *                      abend code U3402.                       *
  *                      - AREA is deleted by ACBLIB online      *
  *                        change                                *
  *                      - DB is deleted by ACBLIB online change *
  *                      - DB is deleted by MODBLKS online       *
  *                        change                                *
  *                      - DB is deleted by DELETE DB command    *
  *                        (only when DRD is enabled in IMS V10) *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  If there is no DMAC for the DEDB area for which the checkpoint
  (x'4087') has been logged, DFR in IMS V8, V9, and V10 issues a
  MSGDFR3402E message and ends with an abend code U3402. But, when
  one of the following is performed, it is correct that DMAC is
  not found.
  - AREA is deleted by ACBLIB online change
  - DB is deleted by ACBLIB online change
  - DB is deleted by MODBLKS online change
  - DB is deleted by DELETE DB command
    (only when DRD is enabled in IMS V10)
  So DFR should issue a MSGDFR3402W message instead of
  a MSGDFR3402E message, and ends with return code of 4 or higher
  instead of an abend code U3402.
  

Problem conclusion

• The following modules have been modified.
  (x = 8, 9 and A)
  
  DFRLFCKx - This module was changed so that DFR issues a
             MSGDFR3402W message and ends with return code of 4
             or higher when AREA or DB is deleted after creating
             x'4087' log.
  *
  ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS DEDB Fast Recovery for z/OS Version 2 Release 2 User's Guide
  and Reference (Document Number: SC27-0928-03) should be changed
  as follows.
  ================================================================
  Appendix B. Messages and Codes
    B.3 Messages
  
  DFR3402E  CHECKPOINTED BLOCKS DO NOT MATCH LOADED BLOCKS.
            REASON CODE xxxxxx
  DFR3402W  CHECKPOINTED BLOCKS DO NOT MATCH LOADED BLOCKS.
            REASON CODE xxxxxx
  
  Explanation: ...
  
  Code Meaning
  
  DDIR
  ...
  
  NODDIR
  ...
  
  NODMCB
    There is no DMCB that corresponds to the DMAC/ADSC/BUFFER of
    a DEDB which has been logged. Although DB definition existed
    in ACB library specified to IMS when a checkpoint which DFR
  | uses was logged by IMS, it does not exist in IMS definition
  | or in ACB library specified to DFR.
  
  DMAC
  ...
  
  NODMAC
    There is no DMAC for the DEDB area for which a checkpoint has
    been logged. The definition for DB which was being opened when
    the checkpoint has been logged by IMS does not exist
  | in IMS definition or in ACB library specified to DFR.
  
  ADSC
  ...
  
  NOADSC
  ...
  
  DBFR
  ...
  
  DDEPBF
  ...
  
  NORPST
  ...
  
  IEEQE
  ...
  
  This error is caused by one of the following:
  
   1. ...
  
   2. Module DFSDDIRx (x is the value specified on the SUF= EXEC
      parameter) was changed. This cause is applicable only in IMS
      Version 9 or earlier.
  
   3. DMB of ACB library was changed
      - Incorrect library was specified
      - DB definition was deleted by ACB library online change
  
  |4. DB definition created by IMS log was changed. This cause is
  |   applicable only in IMS Version 10 or later.
  |   - DB definition was deleted by MODBLKS online change or
  |     DELETE DB command.
  
   5. There was an error while reading DMB from the ACB library
  
  System Action: ...
  
  System Programmer Response: ...
  ...
  
  |If the message was issued with suffix 'W',
  |- in IMS Version 9 or earlier
  |confirm that a set of ACBLIB or/and MODBLKS are correct for
  |the job and that a DEDB online change was accomplished before
  |IMS failed. If a set of ACBLIB or/and MODBLKS are incorrect,
  |specify the correct one and rerun the job.
  |- in IMS Version 10 or later
  |confirm that a set of ACBLIB is correct for the job ,that
  |a DEDB online change was accomplished before IMS failed ,and
  |that a DELETE DB command is issued before IMS failed.
  |If a set of ACBLIB is incorrect, specify the correct one
  |and rerun the job.
  *
  

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:

  UK27232

Modules/Macros

•    DFRLFCKA DFRLFCK8 DFRLFCK9
  

Fix information

• Fixed component name

  DEDB FAST RECOV

• Fixed component ID

  5655E3200

Applicable component levels

• R220 PSY UK27232

     UP07/07/20 P F707

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.