Previous CloneSet | Next CloneSet | Back to Main Report |
Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
---|---|---|---|---|
8 | 7 | 0 | 1.000 | paragraph |
Clone Abstraction | Parameter Bindings |
Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
---|---|---|---|
1 | 8 | 3524 | CCCC1.COB |
2 | 8 | 3520 | CCCC11.COB |
3 | 8 | 3334 | CCCC13.COB |
4 | 8 | 3881 | CCCC14.COB |
5 | 8 | 3420 | CCCC4.COB |
6 | 8 | 3219 | CCCC8.COB |
7 | 8 | 3462 | CCCC9.COB |
| ||||
* ADD CLG-INTEGRITY-ERR-17-TOTAL * TO DIST-INTEGRITY-ERR-17-TOTAL. * * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| ||||
* * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
| |||
* ADD CLG-INTEGRITY-ERR-17-TOTAL * TO DIST-INTEGRITY-ERR-17-TOTAL. * * 2240-WRITE-RPT-TTLS-RECDS-FILE. MOVE ZERO TO TABLE-SEARCH-FLAG. SET COLLEGE-ELEMENT-ROW-INDEX TO 1. SET EDIT-ERROR-LITERAL-INDEX TO 1. PERFORM 2241-WRITE-SUM1-TOTALS UNTIL TABLE-SEARCH-COMPLETED. PERFORM 2242-WRITE-SUM2-TOTALS. PERFORM 2243-WRITE-SUM3-TOTALS. |
CloneAbstraction |
Parameter Index | Clone Instance | Parameter Name | Value |
---|---|---|---|
None |