CloneSet227


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
11	2	0	1.000	paragraph

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	11	2212	CCCC3.COB
2	11	3753	CCCC7.COB

Clone Instance
1

Line Count
11

Source Line
2212

Source File

CCCC3.COB

      *
      *
       2020-BUMP-ERROR-COLUMN-INDEX.
           SET ORIGINAL-INDEX-VALUE
             TO   EDIT-COLUMN-INDEX.
           SEARCH EDIT-ERROR-COLUMNS
                   IN EDIT-ERROR-TABLE
           AT END
               PERFORM 5000-PRINT-ERROR-REPORT
               SET EDIT-COLUMN-INDEX
                 TO                     1
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO EDIT-COLUMN-INDEX
               NEXT SENTENCE.

Clone Instance
2

Line Count
11

Source Line
3753

Source File

CCCC7.COB

      *
      *
       2020-BUMP-ERROR-COLUMN-INDEX.
           SET ORIGINAL-INDEX-VALUE
             TO   EDIT-COLUMN-INDEX.
           SEARCH EDIT-ERROR-COLUMNS
                   IN EDIT-ERROR-TABLE
           AT END
               PERFORM 5000-PRINT-ERROR-REPORT
               SET EDIT-COLUMN-INDEX
                 TO                     1
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO EDIT-COLUMN-INDEX
               NEXT SENTENCE.

Clone Abstraction

Parameter Count: 0

Parameter Bindings

      *
      *
       2020-BUMP-ERROR-COLUMN-INDEX.
           SET ORIGINAL-INDEX-VALUE
             TO EDIT-COLUMN-INDEX.
           SEARCH EDIT-ERROR-COLUMNS
                    IN EDIT-ERROR-TABLE
             AT END
               PERFORM 5000-PRINT-ERROR-REPORT
               SET EDIT-COLUMN-INDEX
                 TO 1
             WHEN ORIGINAL-INDEX-VALUE IS NOT EQUAL TO EDIT-COLUMN-INDEX
               NEXT SENTENCE.

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
None