Previous CloneSet | Next CloneSet | Back to Main Report |
Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
---|---|---|---|---|
16 | 6 | 3 | 0.959 | sentence_list[4] |
Clone Abstraction | Parameter Bindings |
Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
---|---|---|---|
1 | 16 | 3292 | CCCC1.COB |
2 | 16 | 3101 | CCCC12.COB |
3 | 16 | 3129 | CCCC13.COB |
4 | 16 | 3650 | CCCC14.COB |
5 | 16 | 3069 | CCCC5.COB |
6 | 16 | 3013 | CCCC8.COB |
| ||||
* PERFORM 2500-ACCUMULATE-UNKNOWNS. IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2600-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM ) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2600-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-COURSE-DATA ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-COURSE-INV-DATA. |
| ||||
IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2600-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2600-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-PRG-AWARD-RECORD ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-PROGRAM-AWARD-DATA. |
| ||||
* PERFORM 2400-ACCUMULATE-UNKNOWNS. IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2500-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM ) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2500-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-SV-RECORD ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-SV-FILE. |
| ||||
IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2500-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM ) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2500-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-STUDENT-ENRL-RECORD ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-ENRL-FILE. |
| ||||
IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2500-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM ) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2500-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-PBS-RECORD ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-PBS-FILE. |
| ||||
IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM 2600-FILL-ERROR-MATRIX ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM 2600-FILL-ERROR-MATRIX. IF NOT REJECT-RECORD PERFORM 8600-WRITE-DSPS-RECORDS ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM 8000-READ-STUDENT-DSPS-DATA. |
| |||
* PERFORM 2500-ACCUMULATE-UNKNOWNS. * PERFORM 2400-ACCUMULATE-UNKNOWNS. IF REJECT-RECORD IF PRINT-ALL-PAGES PERFORM [[#24b03dc0]] ELSE IF (REPORT-PAGE-COUNTER IS GREATER PRT-PAGE-MAXIMUM OR REPORT-PAGE-COUNTER IS EQUAL PRT-PAGE-MAXIMUM) AND PAGE-FULL MOVE SPACES TO EDIT-ERROR-TABLE ELSE PERFORM [[#24b03dc0]]. IF NOT REJECT-RECORD PERFORM [[#24b03f80]] ELSE ADD 1 TO TOTAL-COLLEGE-RECORDS-REJECT. MOVE ZERO TO DATA-VALIDATION-FLAGS. PERFORM [[#24b217c0]]. |
CloneAbstraction |
Parameter Index | Clone Instance | Parameter Name | Value |
---|---|---|---|
1 | 1 | [[#24b03dc0]] | 2600-FILL-ERROR-MATRIX |
1 | 2 | [[#24b03dc0]] | 2500-FILL-ERROR-MATRIX |
1 | 3 | [[#24b03dc0]] | 2600-FILL-ERROR-MATRIX |
1 | 4 | [[#24b03dc0]] | 2500-FILL-ERROR-MATRIX |
1 | 5 | [[#24b03dc0]] | 2600-FILL-ERROR-MATRIX |
1 | 6 | [[#24b03dc0]] | 2500-FILL-ERROR-MATRIX |
2 | 1 | [[#24b03f80]] | 8600-WRITE-COURSE-DATA |
2 | 2 | [[#24b03f80]] | 8600-WRITE-PBS-RECORD |
2 | 3 | [[#24b03f80]] | 8600-WRITE-DSPS-RECORDS |
2 | 4 | [[#24b03f80]] | 8600-WRITE-SV-RECORD |
2 | 5 | [[#24b03f80]] | 8600-WRITE-PRG-AWARD-RECORD |
2 | 6 | [[#24b03f80]] | 8600-WRITE-STUDENT-ENRL-RECORD |
3 | 1 | [[#24b217c0]] | 8000-READ-COURSE-INV-DATA |
3 | 2 | [[#24b217c0]] | 8000-READ-PBS-FILE |
3 | 3 | [[#24b217c0]] | 8000-READ-STUDENT-DSPS-DATA |
3 | 4 | [[#24b217c0]] | 8000-READ-SV-FILE |
3 | 5 | [[#24b217c0]] | 8000-READ-PROGRAM-AWARD-DATA |
3 | 6 | [[#24b217c0]] | 8000-READ-ENRL-FILE |