| 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 |