Previous CloneSet | Next CloneSet | Back to Main Report |
Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
---|---|---|---|---|
11 | 3 | 1 | 0.977 | imperative_statement_list |
Clone Abstraction | Parameter Bindings |
Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
---|---|---|---|
1 | 11 | 5237 | CCCC10.COB |
2 | 11 | 5255 | CCCC10.COB |
3 | 15 | 5282 | CCCC10.COB |
| ||||
* MOVE 1 TO REJECT-RECORD-FLAG 10-6-92 ADD 1 TO ERROR-COUNT (12 3) ADD 1 TO ERROR-COUNT (18 3) MOVE 1 TO REASONABLE-FLAG MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (12 EDIT-ERROR-COLUMN-INDEX) MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (18 EDIT-ERROR-COLUMN-INDEX) |
| ||||
* MOVE 1 TO REJECT-RECORD-FLAG 10-6-92 ADD 1 TO ERROR-COUNT (13 3) ADD 1 TO ERROR-COUNT (18 3) MOVE 1 TO REASONABLE-FLAG MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (13 EDIT-ERROR-COLUMN-INDEX) MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (18 EDIT-ERROR-COLUMN-INDEX) |
| ||||
* IF (INCOME-1-UNKNOWN OR NO-INCOME-1) * AND * (NOT-APPL-FIVE OR UNKNOWN-FIVE OR ZERO-FIVE) * MOVE 1 TO REJECT-RECORD-FLAG 10-12-93 ADD 1 TO ERROR-COUNT (17 3) ADD 1 TO ERROR-COUNT (18 3) MOVE 1 TO REASONABLE-FLAG MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (17 EDIT-ERROR-COLUMN-INDEX) * MOVE REASONABLENESS-LITERAL * TO VALIDATION-FLAG * IN EDIT-ERROR-TABLE-COLUMNS * (21 EDIT-ERROR-COLUMN-INDEX) MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS (18 EDIT-ERROR-COLUMN-INDEX) |
| |||
* MOVE 1 TO REJECT-RECORD-FLAG 10-6-92 * MOVE 1 TO REJECT-RECORD-FLAG 10-6-92 * IF (INCOME-1-UNKNOWN OR NO-INCOME-1) * AND * (NOT-APPL-FIVE OR UNKNOWN-FIVE OR ZERO-FIVE) * MOVE 1 TO REJECT-RECORD-FLAG 10-12-93 ADD 1 TO ERROR-COUNT ( [[#24ba05e0]] 3) ADD 1 TO ERROR-COUNT (18 3) MOVE 1 TO REASONABLE-FLAG MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS( [[#24ba05e0]] EDIT-ERROR-COLUMN-INDEX ) * MOVE REASONABLENESS-LITERAL * TO VALIDATION-FLAG * IN EDIT-ERROR-TABLE-COLUMNS * (21 EDIT-ERROR-COLUMN-INDEX) MOVE REASONABLENESS-LITERAL TO VALIDATION-FLAG IN EDIT-ERROR-TABLE-COLUMNS( 18 EDIT-ERROR-COLUMN-INDEX ) |
CloneAbstraction |
Parameter Index | Clone Instance | Parameter Name | Value |
---|---|---|---|
1 | 1 | [[#24ba05e0]] | 12 |
1 | 2 | [[#24ba05e0]] | 13 |
1 | 3 | [[#24ba05e0]] | 17 |