Previous CloneSet | Next CloneSet | Back to Main Report |
Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
---|---|---|---|---|
16 | 4 | 1 | 0.987 | paragraph |
Clone Abstraction | Parameter Bindings |
Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
---|---|---|---|
1 | 16 | 3630 | CCCC10.COB |
2 | 16 | 3771 | CCCC15.COB |
3 | 16 | 3366 | CCCC2.COB |
4 | 16 | 3070 | CCCC6.COB |
| ||||
* * 1110-VALIDATE-TERM-ID. SET TERM-IDENTIFIER-INDEX TO 1. SEARCH TERM-IDENTIFIER-ENTRY IN TERM-IDENTIFIER-TABLE AT END MOVE 1 TO GI03-FLAG WHEN TERM-CODE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS EQUAL TO TERM-CODE IN RUNTIME-PARAMETER-AREA MOVE TERM-TITLE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) TO TERM-TITLE IN REPORT-TITLE-LINE-2. |
| ||||
* * 1110-VALIDATE-TERM-ID. SET TERM-IDENTIFIER-INDEX TO 1. SEARCH TERM-IDENTIFIER-ENTRY IN TERM-IDENTIFIER-TABLE AT END MOVE 1 TO GI03-FLAG WHEN TERM-CODE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS EQUAL TO TERM-CODE IN RUNTIME-PARAMETER-AREA MOVE TERM-TITLE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) TO TERM-TITLE IN REPORT-TITLE-LINE-2. |
| ||||
* * 1110-VALIDATE-TERM-ID. SET TERM-IDENTIFIER-INDEX TO 1. SEARCH TERM-IDENTIFIER-ENTRY IN TERM-IDENTIFIER-TABLE AT END MOVE 1 TO TERM-ID-FLAG WHEN TERM-CODE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS EQUAL TO TERM-CODE IN RUNTIME-PARAMETER-AREA MOVE TERM-TITLE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) TO TERM-TITLE IN REPORT-TITLE-LINE-2. |
| ||||
* * 1110-VALIDATE-TERM-ID. SET TERM-IDENTIFIER-INDEX TO 1. SEARCH TERM-IDENTIFIER-ENTRY IN TERM-IDENTIFIER-TABLE AT END MOVE 1 TO TERM-ID-FLAG WHEN TERM-CODE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS EQUAL TO TERM-CODE IN RUNTIME-PARAMETER-AREA MOVE TERM-TITLE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) TO TERM-TITLE IN REPORT-TITLE-LINE-2. |
| |||
* * 1110-VALIDATE-TERM-ID. SET TERM-IDENTIFIER-INDEX TO 1. SEARCH TERM-IDENTIFIER-ENTRY IN TERM-IDENTIFIER-TABLE AT END MOVE 1 TO [[#24b8ed40]] WHEN TERM-CODE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS EQUAL TO TERM-CODE IN RUNTIME-PARAMETER-AREA MOVE TERM-TITLE IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX)TO TERM-TITLE IN REPORT-TITLE-LINE-2 . |
CloneAbstraction |
Parameter Index | Clone Instance | Parameter Name | Value |
---|---|---|---|
1 | 1 | [[#24b8ed40]] | TERM-ID-FLAG |
1 | 2 | [[#24b8ed40]] | GI03-FLAG |
1 | 3 | [[#24b8ed40]] | GI03-FLAG |
1 | 4 | [[#24b8ed40]] | TERM-ID-FLAG |