Skip to content

Complete the missing copies list with all levels of inclusion #1808

@rooksdo

Description

@rooksdo

Only the first level of missing copies is displayed
When a program references a copy that contains another copy, if the embedded copy is missing it won't display in the missing copy list.

How to reproduce

       IDENTIFICATION DIVISION.
       PROGRAM-ID. DVZZMFT0.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       COPY COPY1.
       PROCEDURE DIVISION.
           DISPLAY final-var OF group3 OF group2 OF group1
           GOBACK
           .
       END PROGRAM DVZZMFT0.    

COPY1

 01 group1.
       COPY COPY2.

COPY2

    05 group2.
          COPY COPY3.

COPY3

       10 group3.
                15 final-var PIC X.

Expected result
Missing copys at all levels of inclusion should be listed in the Missing Copies list.

Metadata

Metadata

Assignees

Labels

Type

No type

Projects

No projects

Relationships

None yet

Development

No branches or pull requests

Issue actions