| Previous CloneSet | Next CloneSet | Back to Main Report |
| Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
|---|---|---|---|---|
| 57 | 2 | 0 | 1.000 | paragraph_list[3] |
| Clone Abstraction | Parameter Bindings |
| Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
|---|---|---|---|
| 1 | 57 | 3783 | CCCC2.COB |
| 2 | 57 | 3350 | CCCC6.COB |
| ||||
*
*
2210-ADD-DISTRICT-ELMNT-TOTALS.
SET COLLEGE-ELEMENT-COLUMN-INDEX
TO 1.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO 1.
SET ELEMENT-COLUMN-INDEX
TO 1.
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.
*
*
2211-ADD-TO-DISTRICT-MATRIX.
ADD COLLEGE-ELEMENT-TOTAL
IN COLLEGE-ELEMENT-TOTALS-COLUMNS
(COLLEGE-ELEMENT-ROW-INDEX
COLLEGE-ELEMENT-COLUMN-INDEX)
TO DISTRICT-ELEMENT-TOTAL
IN DISTRICT-ELEMNT-TOTALS-COLUMNS
(DISTRICT-ELEMENT-ROW-INDEX
DISTRICT-ELEMENT-COLUMN-INDEX).
SET ORIGINAL-INDEX-VALUE
TO COLLEGE-ELEMENT-COLUMN-INDEX.
SEARCH COLLEGE-ELEMENT-TOTALS-COLUMNS
AT END
MOVE 1 TO ADD-ELEMENT-COLUMNS-FLAG
WHEN ORIGINAL-INDEX-VALUE
IS NOT EQUAL TO COLLEGE-ELEMENT-COLUMN-INDEX
NEXT SENTENCE.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO COLLEGE-ELEMENT-COLUMN-INDEX.
*
*
2220-ADD-DISTRICT-SUM-TOTALS.
ADD COLLEGE-TOTAL
IN COLLEGE-TOTAL-ENTRY
(COLLEGE-TOTAL-INDEX)
TO DISTRICT-TOTAL
IN DISTRICT-TOTAL-ENTRY
(DISTRICT-TOTAL-INDEX).
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.
|
| ||||
* MOVE ZEROS TO COLLEGE-INTEGRITY-TOTALS
* IN PROGRAM-ACCUMULATORS.
*
*
2210-ADD-DISTRICT-ELMNT-TOTALS.
SET COLLEGE-ELEMENT-COLUMN-INDEX
TO 1.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO 1.
SET ELEMENT-COLUMN-INDEX
TO 1.
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.
*
*
2211-ADD-TO-DISTRICT-MATRIX.
ADD COLLEGE-ELEMENT-TOTAL
IN COLLEGE-ELEMENT-TOTALS-COLUMNS
(COLLEGE-ELEMENT-ROW-INDEX
COLLEGE-ELEMENT-COLUMN-INDEX)
TO DISTRICT-ELEMENT-TOTAL
IN DISTRICT-ELEMNT-TOTALS-COLUMNS
(DISTRICT-ELEMENT-ROW-INDEX
DISTRICT-ELEMENT-COLUMN-INDEX).
SET ORIGINAL-INDEX-VALUE
TO COLLEGE-ELEMENT-COLUMN-INDEX.
SEARCH COLLEGE-ELEMENT-TOTALS-COLUMNS
AT END
MOVE 1 TO ADD-ELEMENT-COLUMNS-FLAG
WHEN ORIGINAL-INDEX-VALUE
IS NOT EQUAL TO COLLEGE-ELEMENT-COLUMN-INDEX
NEXT SENTENCE.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO COLLEGE-ELEMENT-COLUMN-INDEX.
*
*
2220-ADD-DISTRICT-SUM-TOTALS.
ADD COLLEGE-TOTAL
IN COLLEGE-TOTAL-ENTRY
(COLLEGE-TOTAL-INDEX)
TO DISTRICT-TOTAL
IN DISTRICT-TOTAL-ENTRY
(DISTRICT-TOTAL-INDEX).
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.
|
| |||
* MOVE ZEROS TO COLLEGE-INTEGRITY-TOTALS
* IN PROGRAM-ACCUMULATORS.
*
*
2210-ADD-DISTRICT-ELMNT-TOTALS.
SET COLLEGE-ELEMENT-COLUMN-INDEX
TO 1.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO 1.
SET ELEMENT-COLUMN-INDEX
TO 1.
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.
*
*
2211-ADD-TO-DISTRICT-MATRIX.
ADD COLLEGE-ELEMENT-TOTAL
IN COLLEGE-ELEMENT-TOTALS-COLUMNS (
COLLEGE-ELEMENT-ROW-INDEX
COLLEGE-ELEMENT-COLUMN-INDEX
)
TO DISTRICT-ELEMENT-TOTAL
IN DISTRICT-ELEMNT-TOTALS-COLUMNS (
DISTRICT-ELEMENT-ROW-INDEX
DISTRICT-ELEMENT-COLUMN-INDEX
).
SET ORIGINAL-INDEX-VALUE
TO COLLEGE-ELEMENT-COLUMN-INDEX.
SEARCH COLLEGE-ELEMENT-TOTALS-COLUMNS
AT END
MOVE 1 TO ADD-ELEMENT-COLUMNS-FLAG
WHEN ORIGINAL-INDEX-VALUE IS NOT EQUAL TO
COLLEGE-ELEMENT-COLUMN-INDEX
NEXT SENTENCE.
SET DISTRICT-ELEMENT-COLUMN-INDEX
TO COLLEGE-ELEMENT-COLUMN-INDEX.
*
*
2220-ADD-DISTRICT-SUM-TOTALS.
ADD COLLEGE-TOTAL
IN COLLEGE-TOTAL-ENTRY (COLLEGE-TOTAL-INDEX)
TO DISTRICT-TOTAL
IN DISTRICT-TOTAL-ENTRY (DISTRICT-TOTAL-INDEX).
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.
|
| CloneAbstraction |
| Parameter Index | Clone Instance | Parameter Name | Value |
|---|---|---|---|
| None | |||