PH63104: THE DEFINITION OF DATATYPE=BIT IS INCORRECT WHEN IMPORTING PL/I COPYBOOK

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When importing a BIT variable from a PL/I copybook into a DBD
  macro source, an error occurs in DBDGEN because the IMS
  Administration Tool sets DATATYPE=BIT and the value longer than
  1 byte to BYTES=.
  
  BYTES must be 1 with DATATYPE=BIT in DBDGEN.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of IMS Administration Tool for z/OS    *
  *                 who performs the PL/I copybook import        *
  *                 function (FMID=HALC110).                     *
  ****************************************************************
  * PROBLEM DESCRIPTION: In the PL/I copybook import process, if *
  *                      a copybook has a BIT item larger than 1 *
  *                      byte defined as an ARRAY structure, a   *
  *                      DBDGEN error occurs and the following   *
  *                      message is displayed.                   *
  *                       - FLD602 - WHEN DATATYPE = BIT,        *
  *                                  BYTE = 1 MUST BE SPECIFIED  *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  This error occurs when the BIT item in an ARRAY structure is
  defined to exceed 1 byte in the PL/I copybook, as in the
  following example.
    DCL 1 STRUCT1 (32),
         2 BIT1 BIT (01);
  
  When IMS Administration Tool parses the copybook and imports it
  into the DBD source, it sets the wrong combination of parameters
  in the FIELD statement. Specifically, DATATYPE=BIT and BYTES=n
  (n is greater than 1, and n is 4 in the above example) are set.
  When specifying DATATYPE=BIT in the FIELD statement, BYTES=1
  must be specified, so a DBDGEN error with the FLD602 message
  occurred.
  

Problem conclusion

• IMS Administration Tool has been modified to set the correct
  parameters (DATATYPE=BINARY and BYTES=n (n is greater than 1))
  in the FIELD statement when the BIT item in an ARRAY structure
  is defined to exceed 1 byte in the PL/I copybook.
  

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:

  UI98469

Modules/Macros

• ATY@PRSB
  

Fix information

• Fixed component name

  IMS ADMIN TOOL

• Fixed component ID

  5655CAT00

Applicable component levels

• R110 PSY UI98469

     UP24/09/20 P F409

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.