CloneSet49


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
18810.988sentence_list[5]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1184470
CCCC11.COB
2183854
CCCC13.COB
3184691
CCCC14.COB
4184978
CCCC2.COB
5184025
CCCC4.COB
6183590
CCCC5.COB
7184068
CCCC6.COB
8184413
CCCC9.COB
Clone Instance
1
Line Count
18
Source Line
4470
Source File
CCCC11.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET DISTRICT-TOTAL-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
2
Line Count
18
Source Line
3854
Source File
CCCC13.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
3
Line Count
18
Source Line
4691
Source File
CCCC14.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
4
Line Count
18
Source Line
4978
Source File
CCCC2.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET DISTRICT-TOTAL-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
5
Line Count
18
Source Line
4025
Source File
CCCC4.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
6
Line Count
18
Source Line
3590
Source File
CCCC5.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
7
Line Count
18
Source Line
4068
Source File
CCCC6.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone Instance
8
Line Count
18
Source Line
4413
Source File
CCCC9.COB

           MOVE COLLEGE-TOTAL
                   IN COLLEGE-TOTAL-ENTRY
                   (COLLEGE-TOTAL-INDEX) TO
                      TOTAL-FIELD
                   IN TOTAL-DETAIL-LINE.
           WRITE PRINT-RECORD-2
             FROM       TOTAL-DETAIL-LINE
                   AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO       COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
           AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
           WHEN ORIGINAL-INDEX-VALUE
                   IS NOT EQUAL TO COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET TOTAL-DESCRIPTION-INDEX
             TO       COLLEGE-TOTAL-INDEX.


Clone AbstractionParameter Count: 1Parameter Bindings

           MOVE COLLEGE-TOTAL
                  IN COLLEGE-TOTAL-ENTRY (COLLEGE-TOTAL-INDEX) TO
                                                             TOTAL-FIELD
                                                               IN
                                                       TOTAL-DETAIL-LINE
           .
           WRITE PRINT-RECORD-2
             FROM TOTAL-DETAIL-LINE
             AFTER ADVANCING 1 LINE.
           SET ORIGINAL-INDEX-VALUE
             TO COLLEGE-TOTAL-INDEX.
           SEARCH COLLEGE-TOTAL-ENTRY
             AT END
               MOVE 1 TO TABLE-SEARCH-FLAG
             WHEN ORIGINAL-INDEX-VALUE IS NOT EQUAL TO
                  COLLEGE-TOTAL-INDEX
               NEXT SENTENCE.
           SET [[#24b027a0]]
             TO COLLEGE-TOTAL-INDEX.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
12[[#24b027a0]]
       DISTRICT-TOTAL-INDEX 
13[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
14[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
15[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
16[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
17[[#24b027a0]]
       TOTAL-DESCRIPTION-INDEX 
18[[#24b027a0]]
       DISTRICT-TOTAL-INDEX