| Previous CloneSet | Next CloneSet | Back to Main Report |
| Clone Mass | Clones in CloneSet | Parameter Count | Clone Similarity | Syntax Category [Sequence Length] |
|---|---|---|---|---|
| 13 | 7 | 2 | 0.980 | record_or_data_item_entry_list[2] |
| Clone Abstraction | Parameter Bindings |
| Clone Instance (Click to see clone) | Line Count | Source Line | Source File |
|---|---|---|---|
| 1 | 13 | 832 | CCCC11.COB |
| 2 | 13 | 584 | CCCC13.COB |
| 3 | 13 | 665 | CCCC14.COB |
| 4 | 14 | 997 | CCCC2.COB |
| 5 | 13 | 658 | CCCC4.COB |
| 6 | 13 | 542 | CCCC5.COB |
| 7 | 13 | 703 | CCCC9.COB |
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(115).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(100).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
* 03 INTEGRITY-ERR-?-DESC.
* 05 INT-ERR-?-PART-1 PIC X(42)
* VALUE 'A GRADE (SX04) WAS REPORTED AS UD,UG,W,MW '
* 05 INT-ERR-?-PART-2 PIC X(37)
* VALUE 'OR XX BUT UNITS (SX03) WAS NOT = 8888'.
* 03 INTEGRITY-ERR-?-DESC.
* 05 INT-ERR-?-PART-1 PIC X(42)
* VALUE 'A GRADE (SX04) WAS REPORTED AS I,IP OR RD '
* 05 INT-ERR-?-PART-2 PIC X(31)
* VALUE 'BUT UNITS (SX03) WAS NOT = 9999'.
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(80).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(120).
*
* FOLLOWING TABLE IS USED FOR EDITING THE DISTRICT & COLLEGE IDS
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(120).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(100).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 7 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| ||||
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE VALUE SPACE.
03 FILLER PIC X(01).
03 INTEGRITY-TOTAL PIC ZZZ,ZZ9.
03 FILLER PIC X(2).
03 INTEGRITY-DESCRIPTION PIC X(100).
*
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS 10 TIMES
INDEXED BY RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID PIC X(3).
05 COLLEGE-NAME PIC X(30).
|
| |||
* 03 INTEGRITY-ERR-?-DESC.
* 05 INT-ERR-?-PART-1 PIC X(42)
* VALUE 'A GRADE (SX04) WAS REPORTED AS UD,UG,W,MW '
* 05 INT-ERR-?-PART-2 PIC X(37)
* VALUE 'OR XX BUT UNITS (SX03) WAS NOT = 8888'.
* 03 INTEGRITY-ERR-?-DESC.
* 05 INT-ERR-?-PART-1 PIC X(42)
* VALUE 'A GRADE (SX04) WAS REPORTED AS I,IP OR RD '
* 05 INT-ERR-?-PART-2 PIC X(31)
* VALUE 'BUT UNITS (SX03) WAS NOT = 9999'.
*
*
01 INTEGRITY-TOTAL-DETAIL-LINE
VALUE SPACE.
03 FILLER
PIC X(01).
03 INTEGRITY-TOTAL
PIC ZZZ,ZZ9.
03 FILLER
PIC X(2).
03 INTEGRITY-DESCRIPTION
PIC [[#24b0e2e0]].
*
* FOLLOWING TABLE IS USED FOR EDITING THE DISTRICT & COLLEGE IDS
*
01 RUNTIME-PARAMETER-TABLE.
03 RUNTIME-COLLEGE-ENTRY
OCCURS [[#24b0e240]]TIMES
INDEXED
BY
RUNTIME-PARAMETER-INDEX.
05 COLLEGE-ID
PIC X(3).
05 COLLEGE-NAME
PIC X(30).
|
| CloneAbstraction |
| Parameter Index | Clone Instance | Parameter Name | Value |
|---|---|---|---|
| 1 | 1 | [[#24b0e2e0]] | X(80) |
| 1 | 2 | [[#24b0e2e0]] | X(100) |
| 1 | 3 | [[#24b0e2e0]] | X(120) |
| 1 | 4 | [[#24b0e2e0]] | X(115) |
| 1 | 5 | [[#24b0e2e0]] | X(100) |
| 1 | 6 | [[#24b0e2e0]] | X(100) |
| 1 | 7 | [[#24b0e2e0]] | X(120) |
| 2 | 1 | [[#24b0e240]] | 10 |
| 2 | 2 | [[#24b0e240]] | 10 |
| 2 | 3 | [[#24b0e240]] | 10 |
| 2 | 4 | [[#24b0e240]] | 10 |
| 2 | 5 | [[#24b0e240]] | 7 |
| 2 | 6 | [[#24b0e240]] | 10 |
| 2 | 7 | [[#24b0e240]] | 10 |