IBM Support

PM12631: DFHWS2LS GENERATES COBOL COPYBOOKS WITH SYNTAX ERRORS WHEN ELEMENT LENGTH > 28 IF THE ELEMENT OCCURS > 99 TIMES

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • When running DFHWS2LS, if an element name *repeats* AND is
    longer than 28 bytes, CICS will truncate that element to 28
    bytes (due to COBOL field length limitations of 30 bytes), since
    this will permit CICS to append a 2-byte sequence suffix to the
    field name.  However, if that element repeats more than 99
    times, syntax errors will be generated for those elements after
    #99 (since a 31-byte COBOL element name is invalid).
    Additional Symptom(s) Search Keyword(s):
    KIXREVSCB
    

Local fix

  • Manually modify the Language Structure (i.e., COBOL Copybook)
    that was generated, so that your field names are < 30 bytes
    long.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All CICS Users                               *
    ****************************************************************
    * PROBLEM DESCRIPTION: Invalid COBOL language structure is     *
    *                      generated when WSDL contains more       *
    *                      than 99 element names which are all     *
    *                      identical for the first 28 characters.  *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    DFHWS2LS is being run against a WSDL which contains more than 99
    element names which are all identical for the first 28 character
    
    The first 99 element names all generate valid COBOL fieldnames
    of 30 characters long ( 28 identical characters and a 2 characte
    unique numeric identifier 01- 99 ).
    
    However, the 100th and subsequent elements generate field names
    which are 31 characters long because a 3 character unique
    numeric identifier is used, a 31 byte field name is invalid for
    COBOL.
    
    The same problem occurs for PLI and C where the first 29 and 50
    characters (respectively) of the element names are identical.
    

Problem conclusion

  • DFHWS2LS has been changed to handle more than 99 element names
    which are all identical up to where the language dependant
    truncation occurs. The first 99 element names will not change.
    When the 100th ( and subsequent ) element name(s) are processed,
    an additional byte will be removed from the end of the name to
    allow a 3 byte numeric substring to be added. When the 1000th (
    and subsequent ) element name(s) are processed a further byte is
    removed to allow a 4 byte numeric substring to be added. This
    allows up to 9999 identical elements to be processed.
    

Temporary fix

  • FIX AVAILABLE BY PTF ONLY
    

Comments

APAR Information

  • APAR number

    PM12631

  • Reported component name

    CICS TS Z/OS V4

  • Reported component ID

    5655S9700

  • Reported release

    600

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2010-04-20

  • Closed date

    2010-07-22

  • Last modified date

    2010-08-02

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

    PM09101

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

    UK59003

Modules/Macros

  •    DFJ@H176
    

Fix information

  • Fixed component name

    CICS TS Z/OS V4

  • Fixed component ID

    5655S9700

Applicable component levels

  • R60D PSY UK59003

       UP10/07/24 P F007

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.

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"4.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"4.1","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
02 August 2010