CloneSet25


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
30730.983sentence_list[20]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1304652
CCCC1.COB
2304339
CCCC11.COB
3303741
CCCC13.COB
4304787
CCCC2.COB
5303888
CCCC4.COB
6303477
CCCC5.COB
7304268
CCCC9.COB
Clone Instance
1
Line Count
30
Source Line
4652
Source File
CCCC1.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 1 LINE.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET TOTAL-COLLEGE-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
2
Line Count
30
Source Line
4339
Source File
CCCC11.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 1 LINE.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
3
Line Count
30
Source Line
3741
Source File
CCCC13.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 3 LINES.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
4
Line Count
30
Source Line
4787
Source File
CCCC2.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 1 LINE.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
5
Line Count
30
Source Line
3888
Source File
CCCC4.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 3 LINES.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
6
Line Count
30
Source Line
3477
Source File
CCCC5.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 3 LINES.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone Instance
7
Line Count
30
Source Line
4268
Source File
CCCC9.COB

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO                             1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO                            1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM       BLANK-LINE
                   AFTER ADVANCING 3 LINES.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-TOTAL-INDEX
             TO                       1.
           SET TOTAL-DESCRIPTION-INDEX
             TO                           1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
                   UNTIL TABLE-SEARCH-COMPLETED.


Clone AbstractionParameter Count: 3Parameter Bindings

           MOVE 2 TO HEADER-CONTROL-FLAG.
           MOVE SUM1-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                  IN PROGRAM-LITERAL-AND-WORK TO PROGRAM-NAME
                                                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET COLLEGE-ELEMENT-ROW-INDEX
             TO 1.
           SET EDIT-ERROR-LITERAL-INDEX
             TO 1.
           PERFORM 8210-PRINT-CLG-ELEMENT-TOTALS
             UNTIL TABLE-SEARCH-COMPLETED.
           PERFORM 8220-PRINT-CLG-INTGRTY-TOTALS.
           MOVE 6 TO HEADER-CONTROL-FLAG.
           MOVE SUM3-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE HOLD-COLLEGE-ID TO REPORT-CLG-DIST-ID.
           MOVE SUMMARY-PROGRAM-NAME
                  IN PROGRAM-LITERAL-AND-WORK TO PROGRAM-NAME
                                                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           WRITE PRINT-RECORD-2
             FROM BLANK-LINE
             AFTER ADVANCING [[#22a736a0]] [[#22a72ee0]].
           MOVE ZERO TO TABLE-SEARCH-FLAG.
           SET [[#22a72e20]]
             TO 1.
           SET TOTAL-DESCRIPTION-INDEX
             TO 1.
           PERFORM 8230-PRINT-COLLEGE-SUM-TOTALS
             UNTIL TABLE-SEARCH-COMPLETED.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#22a736a0]]
       1 
12[[#22a736a0]]
       1 
13[[#22a736a0]]
       3 
14[[#22a736a0]]
       3 
15[[#22a736a0]]
       3 
16[[#22a736a0]]
       1 
17[[#22a736a0]]
       3 
21[[#22a72ee0]]
       LINE 
22[[#22a72ee0]]
       LINE 
23[[#22a72ee0]]
       LINES 
24[[#22a72ee0]]
       LINES 
25[[#22a72ee0]]
       LINES 
26[[#22a72ee0]]
       LINE 
27[[#22a72ee0]]
       LINES 
31[[#22a72e20]]
       TOTAL-COLLEGE-INDEX 
32[[#22a72e20]]
       COLLEGE-TOTAL-INDEX 
33[[#22a72e20]]
       COLLEGE-TOTAL-INDEX 
34[[#22a72e20]]
       COLLEGE-TOTAL-INDEX 
35[[#22a72e20]]
       COLLEGE-TOTAL-INDEX 
36[[#22a72e20]]
       COLLEGE-TOTAL-INDEX 
37[[#22a72e20]]
       COLLEGE-TOTAL-INDEX