CloneSet199


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
13220.968sentence_list[5]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1133241
CCCC12.COB
2133817
CCCC14.COB
Clone Instance
1
Line Count
13
Source Line
3241
Source File
CCCC12.COB

           MOVE ZERO TO ADD-ELEMENT-COLUMNS-FLAG.
           PERFORM 2211-ADD-ELMNT-DISTRICT-TOTALS
                   UNTIL ADD-ELEMENT-COLUMNS-DONE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-ELEMENT-ROW-INDEX.
           SEARCH COLLEGE-ELEMENT-TOTALS-ROWS
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-ELEMENT-ROW-INDEX
               NEXT SENTENCE.
           SET EDIT-ERROR-LITERAL-INDEX
             TO       COLLEGE-ELEMENT-ROW-INDEX.


Clone Instance
2
Line Count
13
Source Line
3817
Source File
CCCC14.COB

           MOVE ZERO TO ADD-ELEMENT-COLUMNS-FLAG.
           PERFORM 2211-ADD-TO-DISTRICT-MATRIX
                   UNTIL ADD-ELEMENT-COLUMNS-DONE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-ELEMENT-ROW-INDEX.
           SEARCH COLLEGE-ELEMENT-TOTALS-ROWS
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-ELEMENT-ROW-INDEX
               NEXT SENTENCE.
           SET DISTRICT-ELEMENT-ROW-INDEX
             TO       COLLEGE-ELEMENT-ROW-INDEX.


Clone AbstractionParameter Count: 2Parameter Bindings

           MOVE ZERO TO ADD-ELEMENT-COLUMNS-FLAG.
           PERFORM [[#24beb5e0]]
             UNTIL ADD-ELEMENT-COLUMNS-DONE.
           SET ORIGINAL-INDEX-VALUE
             TO COLLEGE-ELEMENT-ROW-INDEX.
           SEARCH COLLEGE-ELEMENT-TOTALS-ROWS
             AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
             WHEN ORIGINAL-INDEX-VALUE IS NOT EQUAL TO
                  COLLEGE-ELEMENT-ROW-INDEX
               NEXT SENTENCE.
           SET [[#24beb440]]
             TO COLLEGE-ELEMENT-ROW-INDEX.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24beb5e0]]
       2211-ADD-TO-DISTRICT-MATRIX 
12[[#24beb5e0]]
       2211-ADD-ELMNT-DISTRICT-TOTALS 
21[[#24beb440]]
       DISTRICT-ELEMENT-ROW-INDEX 
22[[#24beb440]]
       EDIT-ERROR-LITERAL-INDEX