IBM Support

PH34688: A COPY STATEMENT EMBEDDED WITHIN ANOTHER STATEMENT IS NOT CORRECTLY EXPANDED AND PARSED BY THE AD COBOL PARSER.

Subscribe to this APAR

By subscribing, you receive periodic emails alerting you to the status of the APAR, along with a link to the fix after it becomes available. You can track this item individually or track all items by product.

Notify me when this APAR changes.

Notify me when an APAR for this component changes.

 

APAR status

  • Closed as program error.

Error description

  • The COBOL parser in Application Discovery (AD) Build Client
    expands a COPY statement if it ends with a period, which is a
    correct usage of the COPY statement.  However, if the COPY
    statement is embeded within a block of statement, such as an
    EVALUATE or IF statement, the AD parser regards the period of
    the COPY statement as the end of the embedding statement and
    ignores the rest of the embedding statement, thus giving
    incorrect flowchart and program flow information.
    

Local fix

  • The build decisions feature in AD Build Client can be used to
    PATTERN replace the original string of "COPY <copybook name>."
    (with a period) with "COPY <copybook name>" (without a period).
    Applying this decision, the flowchart and program flow are shown
    correctly.
    

Problem summary

  • The Cobol COPY statement ends with a period. Having support for
    multiple formats of include files, the AD Cobol Compiler
    preserved the period after the expansion of copybook.
    

Problem conclusion

  •  The fix consisted in removing the period that is part of COPY
    statement when the copybook is expanded. The fix will be
    available in 6.0.0.0 version.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH34688

  • Reported component name

    APPL DISCOVERY

  • Reported component ID

    5737B1600

  • Reported release

    510

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2021-02-22

  • Closed date

    2021-03-15

  • Last modified date

    2021-03-15

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

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

Fix information

  • Fixed component name

    APPL DISCOVERY

  • Fixed component ID

    5737B1600

Applicable component levels

[{"Line of Business":{"code":"LOB35","label":"Mainframe SW"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSRR9Q","label":"IBM Application Discovery for IBM Z"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510"}]

Document Information

Modified date:
16 March 2021