PH63663: PARENT-CHILD RELATIONSHIPS BETWEEN FIELDS IS INCORRECT AFTER IMPORTING COBOL COPYBOOK BY IMS ADMINISTRATION TOOL.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When a COBOL copybook has a FILLER field and the FILLER field
  has one or more child fields defined by a structure or an array,
  the DBD must have the FIELD statement of the FILLER field and
  the FIELD statement of child field with PARENT="FILLER field
  name" parameter.
  However, the copybook import of IMS Administration Tool does not
  set the FILLER FIELD statement in DBD and it sets PARENT=null to
  the child FIELD statement. The FIELD statements are not in error
  from the view of DBD syntax.  DBDGEN, ACBGEN, and IMS catalog
  populate end normally for this DBD.  As a result, when an
  application refers to the DBD from IMS catalog, for instance,
  getting XML statements by GUR calls, the parent-child
  relationship of the fields are incorrect.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of IMS Administration Tool for z/OS    *
  *                 (FMID=HALC110) who use COBOL copybook import *
  *                 function.                                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: FIELD statements are incorrect after    *
  *                      importing COBOL copybook by IMS         *
  *                      Administration Tool(Admin Tool).        *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  After importing COBOL copybook by Admin Tool, two defects are
  found about FIELD statements.
  
  First, when a COBOL copybook has a FILLER field and the FILLER
  field has one or more child fields defined by a structure or an
  array, the DBD must have the FIELD statement of the FILLER
  field and the FIELD statement of child field with PARENT="
  FILLER field name" parameter. However, the copybook import of
  Admin Tool does not set the FILLER FIELD statement in DBD and
  it sets PARENT=null to the child FIELD statement. The FIELD
  statements are not error from the view of DBD syntax. DBDGEN,
  ACBGEN, and IMS catalog populate end with normally for this
  DBD. As the result, when an application refers to the DBD from
  IMS catalog, for instance, getting XML data by GUR calls,
  the parent-child relationship of the fields are incorrect.
  
      Example.
       05 EXAMPLE1.
        07  EXDATA1                          PIC S9(4)    COMP.
        07  FILLER REDEFINES EXDATA1.
          10  EXDATA2                        PIC S9(4)    COMP.
        07  EXDATA3                          PIC S9(4)    COMP.
        07  FILLER REDEFINES EXDATA3.
          10  EXDATA4       OCCURS 2 TIMES   PIC X.
  
  Next, when a PICTURE clause is defined with an assumed decimal
  point and binary format in a COBOL copybook, Admin Tool
  erroneously generates DATATYPE=SHORT, USHORT, INT, UINT, LONG,
  and ULONG. Admin Tool should generate DATATYPE=DECIMAL(pp,ss)
  and then DFSMARSH statement with INTERNALTYPECONVERTER=BINARY.
  
      Example.
       05 EXAMPLE2.
        07  EXDATA1                          PIC S9(6)V9(2) COMP.
  

Problem conclusion

• IMS Administration has been modified to generate correct
  FIELD and DFSMARSH statements.
  
  ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS Administration Tool for z/OS Version 1 Release 1 User's
  Guide and Reference (SC27-9011) is updated.
  Refer to topic "What's new in IMS Administration Tool"
  (https://www.ibm.com/docs/en/ims-admintool/1.1?topic=overview
  -whats-new-in-ims-administration-tool) in IBM Documentation
  for doc changes associated with this APAR.
  

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:

  UI98851

Modules/Macros

• ATY@PRSB
  

Fix information

• Fixed component name

  IMS ADMIN TOOL

• Fixed component ID

  5655CAT00

Applicable component levels

• R110 PSY UI98851

     UP24/10/25 P F410

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.