PL06851: DDPREVW. MSGDBD6645 ON A PREVIEW OF A REDEFINING ELEMENT. PE69953 PE02185 87/01/28 PTF PECHANGE.

APAR status

• Closed as program error.

Error description

• THE USER DID AN EXPORT OF A SEGMENT FROM ONE DATA DICTIONARY
  SYSTEM, SPECIFYING MODE=UPDATE IN THE EXPORT COMMAND. THIS
  SEGMENT WAS SIMILAR TO THE FOLLOWING:
     01 DATE.
       02 DATE1.
         03 DATE2.
           04 YY PIC9(002).
           04 MM PIC9(002).
           04 DD PIC9(002).
   WHEN THE COMMAND STREAM PRODUCED BY EXPORT WAS PREVIEWED ON
  THE RECEIVING DICTIONARY SYSTEM, THE CRD (CHANGE RELATIONSHIP
  DATA) COMMAND GENERATED FOR ELEMENT YY RECEIVED MSGDBD6645. NO
  OTHER ERRORS WERE RECEIVED. THE PROBLEM ONLY OCCURS WHEN THERE
  IS A SITUATION WHERE ELEMENT(3) REDEFINES ELEMENT(2) REDEFINES
  ELEMENT(1) AND THE START POSITION IS THE SAME FOR ALL THREE.
   NOTE THAT IF THE COMMAND STREAM PRODUCED BY THE EXPORT IS RUN
  ON THE RECEIVING DICTIONARY, ALL COMMANDS ARE EXECUTED WITHOUT
  ERROR AND THE DATA IS ADDED TO THE DICTIONARY CORRECTLY.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: DATA DICT REL5 REL6 USERS OF PREVIEW COMMAND *
  ****************************************************************
  * PROBLEM DESCRIPTION: PREVIEW MSGDBD6645 ON MODE=UPDATE       *
  *                      EXPORT OUTPUT OF CRD COMMAND FOR SEG/   *
  *                      DTE OR DTE/DTE RELATIONSHIPS START=1    *
  ****************************************************************
  * RECOMMENDATION: APPLY FIX                                    *
  ****************************************************************
  A PREVIEW OF EXPORT OUTPUT WILL ISSUE MSGDBD6645 E 'RELATIONSHIP
  DOES NOT EXIST...' FOR CRD COMMANDS INVOLVING SEG/DTE OR DTE/DTE
  RELATIONSHIPS START=1 IF THE RELATIONSHIPS DO NOT ALREADY EXIST
  IN THE TARGET DICTIONARY.
  MODULE DBD5WREL SHOULD SEARCH THROUGH THE ENTIRE PROCESS LIST
  LOOKING FOR ANY PREVIOUS REFERENCES TO THE CURRENT RELATIONSHIP.
  DBD5WREL WILL FIRST SEARCH BY SUBJECT AND THEN BY RELATIONSHIP
  DATA. THE PROBLEM WAS CAUSED BY IDENTICAL RELATIONSHIP DATA
  (START=1), WHICH STOPPED THE PROCESS LIST SEARCH AT THE WRONG
  RELATIONSHIP.
  

Problem conclusion

• PTFS IN ERROR:  PE69953-T8602  R500
                  PE02185-T8608  R602
  MODULE DBD5WREL HAS BEEN MODIFIED TO ALLOW THE SEARCH OF THE
  PROCESS LIST TO CONTINUE TO COMPLETION.
  

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:

  UL08040 UL08041

Modules/Macros

• DBD5WREL
  

Fix information

• Fixed component name

  OS/VS DATA DICT

• Fixed component ID

  5740XXF00

Applicable component levels

• R500 PSY UL08041

     UP87/02/19 P F703

• R602 PSY UL08040

     UP87/02/19 P F703