CloneSet21


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
19	11	3	0.981	linkage_section

Clone Abstraction

Parameter Bindings


CCCC1.COB
CCCC11.COB
CCCC12.COB
CCCC13.COB
CCCC14.COB
CCCC2.COB
CCCC4.COB
CCCC5.COB
CCCC6.COB
CCCC8.COB
CCCC9.COB

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	19	3047	CCCC1.COB
2	19	3066	CCCC11.COB
3	19	2856	CCCC12.COB
4	19	2899	CCCC13.COB
5	19	3420	CCCC14.COB
6	19	3263	CCCC2.COB
7	19	2971	CCCC4.COB
8	19	2839	CCCC5.COB
9	19	2964	CCCC6.COB
10	19	2785	CCCC8.COB
11	19	3022	CCCC9.COB

Clone Instance
1

Line Count
19

Source Line
3047

Source File

CCCC1.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID            VALUE '000' THROUGH
                                                                 '999'
                                                      'ALL'.
               88  PRINT-ALL-PAGES              VALUE 'ALL'.
           03  FILLER                  PIC X.
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
2

Line Count
19

Source Line
3066

Source File

CCCC11.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
3

Line Count
19

Source Line
2856

Source File

CCCC12.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
4

Line Count
19

Source Line
2899

Source File

CCCC13.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
5

Line Count
19

Source Line
3420

Source File

CCCC14.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
6

Line Count
19

Source Line
3263

Source File

CCCC2.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X(1).
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
7

Line Count
19

Source Line
2971

Source File

CCCC4.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
8

Line Count
19

Source Line
2839

Source File

CCCC5.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 7 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
9

Line Count
19

Source Line
2964

Source File

CCCC6.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID            VALUE '000' THROUGH
                                                                 '999'
                                                      'ALL'.
               88  PRINT-ALL-PAGES              VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
10

Line Count
19

Source Line
2785

Source File

CCCC8.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID            VALUE '000' THROUGH
                                                                 '999'
                                                      'ALL'.
               88  PRINT-ALL-PAGES              VALUE 'ALL'.
           03  FILLER                  PIC X.
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Instance
11

Line Count
19

Source Line
3022

Source File

CCCC9.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  PRT-CONTROL-VALID              VALUE '000' THROUGH
                                                                   '999'
                                                        'ALL'.
               88  PRINT-ALL-PAGES                VALUE 'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC 9(2).
               05  TERM-CODE           PIC 9(1).
           03  FILLER                  PIC X.
           03  DISTRICT-ID             PIC 9(3).
           03  PARAMETER-COLLEGES
                       OCCURS 10 TIMES
                       INDEXED BY PARAMETER-COLLEGE-INDEX.
               05  FILLER              PIC X(1).
               05  COLLEGE-ID          PIC X(3).

Clone Abstraction

Parameter Count: 3

Parameter Bindings

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03 FILLER
              PIC 9(3)
              COMPUTATIONAL.
           03 PRT-CONTROL
              PIC X(3).
              88 PRT-CONTROL-VALID
                 VALUE '000' THROUGH '999'
                       'ALL'.
              88 PRINT-ALL-PAGES
                 VALUE 'ALL'.
           03 FILLER
              PIC [[#22a6f240]].
           03 TERM-CHECK.
              05 CALENDAR-YEAR
                 PIC 9(2).
              05 TERM-CODE
                 PIC 9(1).
           03 FILLER
              PIC [[#22a6f180]].
           03 DISTRICT-ID
              PIC 9(3).
           03 PARAMETER-COLLEGES
              OCCURS [[#22a6efe0]]TIMES
                INDEXED
                BY
                  PARAMETER-COLLEGE-INDEX.
              05 FILLER
                 PIC X(1).
              05 COLLEGE-ID
                 PIC X(3).

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#22a6f240]]`	X
1	2	`[[#22a6f240]]`	X(1)
1	3	`[[#22a6f240]]`	X(1)
1	4	`[[#22a6f240]]`	X(1)
1	5	`[[#22a6f240]]`	X(1)
1	6	`[[#22a6f240]]`	X(1)
1	7	`[[#22a6f240]]`	X(1)
1	8	`[[#22a6f240]]`	X(1)
1	9	`[[#22a6f240]]`	X(1)
1	10	`[[#22a6f240]]`	X
1	11	`[[#22a6f240]]`	X(1)
2	1	`[[#22a6f180]]`	X
2	2	`[[#22a6f180]]`	X
2	3	`[[#22a6f180]]`	X(1)
2	4	`[[#22a6f180]]`	X
2	5	`[[#22a6f180]]`	X
2	6	`[[#22a6f180]]`	X
2	7	`[[#22a6f180]]`	X
2	8	`[[#22a6f180]]`	X
2	9	`[[#22a6f180]]`	X
2	10	`[[#22a6f180]]`	X
2	11	`[[#22a6f180]]`	X
3	1	`[[#22a6efe0]]`	10
3	2	`[[#22a6efe0]]`	10
3	3	`[[#22a6efe0]]`	10
3	4	`[[#22a6efe0]]`	7
3	5	`[[#22a6efe0]]`	10
3	6	`[[#22a6efe0]]`	10
3	7	`[[#22a6efe0]]`	10
3	8	`[[#22a6efe0]]`	10
3	9	`[[#22a6efe0]]`	10
3	10	`[[#22a6efe0]]`	10
3	11	`[[#22a6efe0]]`	10