PQ80398: ADD GOLC (GLOBAL ONLINE CHANGE) SUPPORT FOR DFR

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• This APAR will add GOLC (Gloabal Online Change) support to DFR.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: IMS DEDB FAST RECOVERY RELEASE 220 USERS     *
  *                 WHO INTEND TO USE GLOBAL ONLINE CHANGE       *
  *                 IMPLEMENTED IN IMS V8.                       *
  ****************************************************************
  * PROBLEM DESCRIPTION: SMALL PROGRAM ENHANCEMENT (SPE) FOR     *
  *                      SUPPORT IMS GLOBAL ONLINE CHANGE.       *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
   This APAR provides an SPE to support IMS global online change.
  
  < Overview of the SPE >
   If the scope of the online change of the IMS system to be
  recovered is global, DFR will use the OLCSTAT data set to get
  the name of the active MODBLKS and ACBLIB data sets. If the data
  set is local, DFR still uses MODSTAT or MODSTAT2 data set.
  

Problem conclusion

Temporary fix

Comments

•  The description of the enhancement provided by this APAR should
  be written in the IMS DEDB Fast Recovery User's Guide and
  Reference (SC27-0928).
  
  << Documentation Changes >>
   In Chapter 4. "Input and Output for DEDB Fast Recover under IMS
  V8" - "Understand Required Input" - "JCL Requirements", add the
  following statements.
  
  Understand Required Input
    JCL Requirements
      EXEC
        OLC=   Specifies the scope of the online change of the IMS
              system to be recovered.
              OLC=L   The online change applies locally to the IMS
                     system, and DFR decides the active MODBLKS
                     and ACBLIB data sets on the basis of the
                     record in the MODSTAT or MODSTAT2 data set.
              OLC=G   The online change applies globally to the
                     IMS system--that is, the IMS system uses
                     online change libraries consistently with
                     other IMS systems across the IMSplex to which
                     it belongs. DFR decides the active MODBLKS
                     and ACBLIB data sets on the basis of the
                     record in the OLCSTAT data set.
               The default is L.
        CSLG=  This parameter is the same as the CSLG= parameter
              specified in the EXEC statement of the IMS control
              region and a three-character suffix for the Common
              Service Layer IMS.PROCLIB member, DFSCGxxx. When
              OLC=G is specified, this parameter must also be
              specified. DFR compares values specified in the
              EXEC statement with the values specified in the
              DFSCGxxx. They include OLC= parameter. Because DFR
              dynamically allocates the OLCSTAT data set by using
              the data set name specified in the OLCSTAT=
              parameter in the DFSCGxxx, you do not need to
              specify OLCSTAT DD statement in the JCL. When
              OLC=L is specified or defaulted, this parameter
              is optional.
               Even if OLC=L is specified or defaulted in the
              EXEC statement while the OLC=GLOBAL is specified in
              the DFSCGxxx, DFR assumes that the OLC=LOCAL is
              also specified in the IMS.PROCLIB DFSCGxxx member
              and continues the job.
               The background of this assumption is that, even if
              OLC=GLOBAL is specified in the DFSCGxxx, its scope
              will be forced to local if CSL does not work at the
              IMS initialization.
              During the log record process, DFR will also verify
              the specification of the OLC= parameter with the
              data logged in the checkpoint log (X'4001' Begin
              Checkpoint log record).
      PROCLIB DD
         Specifies the IMS.PROCLIB data set, which includes the
        DFSCGxxx member (xxx is the value specified in the CSLG=
        EXEC parameter). If the CSLG= parameter is specified in
        the EXEC statement, this DD statement must be specified.
        DFR verifies the values specified in the EXEC statement
        with the contents of the DFSCGxxx member. If necessary,
        dynamically allocate the OLCSTAT data set using
        the name specified in the OLCSTAT= parameter in the
        member.
      OLCSTAT DD
         Specifies OLCSTAT data set when the scope of the online
        change is global. Because DFR dynamically allocates the
        necessary OLCSTAT data set by using the data set name
        specified in the OLCSTAT= parameter in the IMS.PROCLIB
        DFSCGxxx member (xxx is the value specified in the CSLG=
        EXEC parameter), you do not need to specify this DD
        statement.
      MODSTAT DD
      MODSTAT2 DD
         Specify these data sets only if the scope of the online
        change of the IMS is local. If the scope of the online
        change of the IMS system is global, these data sets are
        not required and will be ignored even if they are
        specified.
  
   In the section "Messages" in Appendix B. "Messages and Codes",
  add the following messages:
  DFR3001E DEDB FAST RECOVERY TERMINATED DUE TO EXEC PARAMETER
   ERRORS. REASON CODE=nn
  Code Meaning
  18    A character other than 'L' or 'G' is specified for the
       OLC= operand.
  19    The CSLG parameter is not specified while the OLC=G
       parameter is specified, or the specified value of CSLG is
       not 3 characters.
  DFR1051E DYNAMIC ALLOCATION ERROR FOR OLCSTAT
   RC=rrrrrrrr/ssssssss,DSNAME=ds-name
  Explanation:  A dynamic allocation failure occurred during the
   online change of data set OLCSTAT. In the message text:
   rrrrrrrr: The return code from the dynamic allocation service.
   ssssssss: The reason code from the dynamic allocation service.
   ds-name : Data set name of the OLCSTAT.
  System Action:  The job terminates abnormally with code U1051.
  Programmer Response:  Correct the dynamic allocation problem and
   rerun the job.
  DFR1052W DYNAMIC UNALLOCATION ERROR FOR OLCSTAT
  Explanation:  A dynamic unallocation failure occurred during the
   online change of data set OLCSTAT.
  System Action:  The job continues and finally terminates with
   return code 4 or higher.
  Programmer Response:  None.
  DFR1053E DATASET service FAILED FOR OLCSTAT
   RC=rrrrrrrr/ssssssss,DSNAME=ds-name
  DFR1053W DATASET service FAILED FOR OLCSTAT
   RC=rrrrrrrr/ssssssss,DSNAME=ds-name
  Explanation:  A data set failure occurred. In the message text:
   service :  The service that failed. The service can be OPEN,
   READ, or CLOSE.
   rrrrrrrr:  The return code from the MVS/DFSMS service.
   ssssssss:  The reason code from the MVS/DFSMS service.
   ds-name :  The data set name of OLCSTAT.
  System Action:  If the message is issued with suffix 'W', the
   job continues, and finally terminates with return code 4 or
   higher. Otherwise, the job terminates abnormally with code
   U1053.
  Programmer Response:  If the message is issued with suffix 'W',
   there is no programmer response. Otherwise, correct the data
   set problem and rerun the job.
  DFR1054E THE CONTENTS OF DATASET OLCSTAT IS NOT CORRECT. REASON
   CODE=nn
  Explanation:  The content of OLCSTAT data set which is specified
   in the IMS.PROCLIB DFSCGxxx member is incorrect. The type of
   error is shown by reason code nn.
  Code Meaning
  0    The OLCSTAT data set is not initialized.
  0    The record header length is incorrect.
  03   The OLCSTAT data set lock word is incorrect.
  04   The MODBLKS suffix is incorrect.
  05   The ACBLIB suffix is incorrect.
  06   The FORMAT suffix is incorrect.
  System Action:  The job terminates abnormally with code U1054.
  Programmer Response:  Check that the data set name in the
   DFSCGxxx IMS.PROCLIB member is correct. If it is not, analyze
   and correct the cause of the error and rerun the job.
  DFR1055E GLOBAL ONLINE CHANGE IS IN PROGRESS. DFR CANNOT GET
   ACCESS TO THE OLCSTAT DATASET
  Explanation:  As a global online change is in progress with the
   OLCSTAT data set, DFR cannot get access to the data set.
  System Action:  The job terminates with a return code of 16.
  Programmer Response:  There are the following two responses
   depending on the status of other IMS systems that belong to the
   same IMSplex system.
   1)  If there is any IMS system that is active, wait until the
   global online change is finished and then rerun the job.
   2)  If there is no active IMS system and no online change in
   progress, run the Global Online Change Utility (DFSUOLC0) to
   unlock the OLCSTAT data set and rerun the job.
  DFR1056E THE ONLINE CHANGE TYPE OF DFSCGxxx AND OLC=olctype DO
   NOT MATCH
  Explanation:  The online change type (local or global) between
   the type logged in the checkpoint log record (X'4001') which
   DFR processes as the recovery start checkpoint and that found
   in the DFSCGxxx IMS.PROCLIB member OLC= parameter does not
   match. In the message text:
   olctyp:  The online change type defined in the DFSCGxxx.
  System Action:  DFR terminates abnormally with code U1056.
  Programmer Response:  The mismatch should not occur. Check the
   cause of the error and correct the mismatch of the online
   change type, and rerun the job.
  DFR1057E SPECIFIED PARAMETER CONFLICTS BETWEEN EXEC AND
   IMS.PROCLIB MEMBER DFSCGxxx. REASON CODE=nn
  Explanation:  The specified value in the EXEC statement
   conflicts with that specified in the DFSCGxxx.
   The type of error is shown by reason code nn.
  Code Meaning
  01    Although OLC=G is specified in the EXEC statement,
       OLC=LOCAL is specified (or defaulted) in the DFSCGxxx.
  System Action:  The job terminates with a return code of 16.
  Programmer Response:  Correct the inconsistency and rerun the
                       job.
  DFR1058E SYSTEM DATASETS ARE INCONSISTENT - OLCSTAT. REASON
   CODE=nn OLDS.MODID=aaaaaaaa, OLCSTAT.MODID=bbbbbbbb
  Explanation:  The scope of the online change of the IMS system
   to be recovered is global. DFR found a mismatch the level of
   MODBLKS and/or the ACBLIB data set. In the message text:
   aaaaaaaa: The latest modify ID from the processing of the log
   records in the OLDSs.
   bbbbbbbb: The modify ID which DFR found in the OLCSTAT data set
   during the control block initialization.
   nn      : The reason code.
  Code Meaning
  01    There is an IMS record in the OLCSTAT data set and the IMS
       is up to date with the online change libraries, while the
       modify ID does not match between the one in the header in
       OLCSTAT data set and in the one in the log record (X'4001':
       Begin Checkpoint log record and/or X'7000': Online Change
       log record) in the log. This means that the log is not
       synchronized with the OLCSTAT data set.
  02    Although the modify ID in the log is consistent with the
       modify ID in the header of the OLCSTAT data set, there is
       no record for the IMS system in the OLCSTAT data set and
       the IMS system is not the same level as the online change
       libraries.
  03    The modify ID in the header in the OLCSTAT data set shows
       that one global online change, which included MODBLKS
       and/or ACBLIB, was done before a failed IMS system was
       recovered.
        In this situation, DFR cannot assure the consistency of
       the loaded control blocks: DDIRs, DMBs, and the logged data
       in the log.
  04    The modify ID in the header of the OLCSTAT data set shows
       two or more global online changes were done since the
       failure of the IMS system to be recovered.
        In this situation, DFR cannot assure the consistency of
       the loaded control blocks: DDIRs, DMBs, and the logged data
       in the log.
  System Action:  DFR terminates abnormally with code U1058.
  Programmer Response:  If the reason code is 01 or 02, check the
   cause of the error, and if necessary, run the Global Online
   Change Utility (DFSUOLC0) to correct the OLCSTAT data set, and
   then rerun the job.  If the reason code is 03 or 04, use the
   DB Recovery Utility (DFSURDB0) to recover DEDBs.
  DFR1059E NO ALLOCATION FOR DDNAME=PROCLIB
  Explanation:  The execution JCL does not contain a PROCLIB DD
   statement.
  System Action:  The job terminates with a return code of 16.
  Programmer Response:  Add the correct DD statement and rerun the
   job.
  DFR1060E CANNOT OPEN THE IMS.PROCLIB DATASET
  Explanation:  The IMS.PROCLIB data set cannot be opened.
  System Action:  The job terminates abnormally with code U1060.
  Programmer Response:  Correct the data set error and rerun the
   job.
  DFR1061E BLDL FAILED FOR IMS.PROCLIB MEMBER DFSCGxxx
  Explanation:  IMS.PROCLIB member DFSCGxxx cannot be found in the
   data set specified on the PROCLIB DD statement. There is an
   error in the value specified in the CSLG= EXEC parameter or in
   the data set specified in the PROCLIB DD statement.
  System Action:  The job terminates with a return code of 16.
  Programmer Response:  Check and correct the error, and rerun
   the job.
  DFR1062E UNABLE TO READ THE PROCLIB RECORD. REASON CODE=nn
  Explanation:  There is an error in the record in the member
   DFSCGxxx of the IMS.PROCLIB data set specified in the PROCLIB
   DD statement. The type of error is shown by reason code nn.
  Code Meaning
  01    Record cannot be read due to an I/O error.
  02    Record format error was found.
  03    The OLCSTAT= parameter is not found in the records.
  System Action:  DFR terminates abnormally with code U1062.
  Programmer Response:  Correct the error or specify the correct
   data set name in the PROCLIB DD statement and rerun the job.
  DFR1063W OLC=LOCAL WAS ASSUMED FOR IMS.PROCLIB MEMBER DFSCGxxx
  Explanation:  Although OLC=L is specified or defaulted in the
   EXEC statement and OLC=GLOBAL is specified in the DFSCGxxx, DFR
   assumes that OLC=LOCAL is specified in the DFSCGxxx.
  System Action:  The job continues and finally terminates with
   return code 4 or higher.
  Programmer Response:  None.
  

APAR Information

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

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

  UQ82611

Modules/Macros

•    DFRCPRM8 DFRCTL80 DFRIGOC8 DFRLCTL8 DFRLINK
  DFRLOLC8 DFROLC8  DFRRSCD8 DFRRSC8  H1J2220J
  

Fix information

• Fixed component name

  DEDB FAST RECOV

• Fixed component ID

  5655E3200

Applicable component levels

• R220 PSY UQ82611

     UP03/12/03 P F312

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.