Previous CloneSet | Next CloneSet | Back to Main Report |
Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
---|---|---|---|---|
11 | 2 | 2 | 0.976 | if_then_statement |
Clone Abstraction | Parameter Bindings |
Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
---|---|---|---|
1 | 11 | 4928 | CCCC10.COB |
2 | 11 | 4940 | CCCC10.COB |
| ||||
MOVE 1 TO REJECT-RECORD-FLAG ADD 1 TO COLLEGE-INT-CNT (1) MOVE INTEGRITY-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (7 EDIT-ERROR-COLUMN-INDEX) IF AWARDS-COUNT GREATER 0 PERFORM 23401-FLAG-INT-ERR-AWARD-AMTS VARYING HOLD-AWARD-INDEX FROM 1 BY 1 UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT |
| ||||
MOVE 1 TO REJECT-RECORD-FLAG ADD 1 TO COLLEGE-INT-CNT (2) MOVE INTEGRITY-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (7 EDIT-ERROR-COLUMN-INDEX) IF AWARDS-COUNT GREATER 0 PERFORM 23402-FLAG-INT-ERR-AWARD-TYPES VARYING HOLD-AWARD-INDEX FROM 1 BY 1 UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT |
| |||
MOVE 1 TO REJECT-RECORD-FLAG ADD 1 TO COLLEGE-INT-CNT ( [[#24bd5b20]]) MOVE INTEGRITY-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (7 EDIT-ERROR-COLUMN-INDEX ) IF AWARDS-COUNT GREATER 0 PERFORM [[#24bd5a80]] VARYING HOLD-AWARD-INDEX FROM 1 BY 1 UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT |
CloneAbstraction |
Parameter Index | Clone Instance | Parameter Name | Value |
---|---|---|---|
1 | 1 | [[#24bd5b20]] | 1 |
1 | 2 | [[#24bd5b20]] | 2 |
2 | 1 | [[#24bd5a80]] | 23401-FLAG-INT-ERR-AWARD-AMTS |
2 | 2 | [[#24bd5a80]] | 23402-FLAG-INT-ERR-AWARD-TYPES |