CloneSet73


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

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	19	3533	CCCC10.COB
2	19	3662	CCCC15.COB
3	19	3331	CCCC7.COB

Clone Instance
1

Line Count
19

Source Line
3533

Source File

CCCC10.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRINT-FLAG              PIC X(3).
               88  VALID-PRINT-FLAG             VALUE  '000' THROUGH
                                                                  '999'
                                                       'ALL'.
               88  PRINT-ALL                    VALUE  'ALL'.
           03  FILLER                  PIC X.
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC X(2).
               05  TERM-CODE           PIC X(1).
           03  FILLER                  PIC X(1).
           03  DISTRICT-ID             PIC X(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
3662

Source File

CCCC15.COB

      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03  FILLER                  PIC 9(3) COMPUTATIONAL.
           03  PRT-CONTROL             PIC X(3).
               88  VALID-PRINT-FLAG              VALUE '000' THROUGH
                                                                  '999'
                                                        'ALL'.
               88  PRINT-ALL                     VALUE  'ALL'.
           03  FILLER                  PIC X(1).
           03  TERM-CHECK.
               05  CALENDAR-YEAR       PIC X(2).
               05  TERM-CODE           PIC X(1).
           03  FILLER                  PIC X(1).
           03  DISTRICT-ID             PIC X(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
3331

Source File

CCCC7.COB

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

Clone Abstraction

Parameter Count: 5

Parameter Bindings

      /
      *
      *
       LINKAGE SECTION.
      *
       01  RUNTIME-PARAMETER-AREA.
           03 FILLER
              PIC 9(3)
               [[#24b44ea0]]COMPUTATIONAL.
           03 [[#24b44de0]]
             PIC X(3).
             88 VALID-PRINT-FLAG
                VALUE '000' THROUGH '999'
                      'ALL'.
             88 PRINT-ALL
                VALUE 'ALL'.
           03 FILLER
              PIC [[#24b41bc0]].
           03 [[#24b44c20]].
             05 CALENDAR-YEAR
                PIC X(2).
             05 TERM-CODE
                PIC X(1).
           03 FILLER
              PIC X(1).
           03 DISTRICT-ID
              PIC X(3).
           03 [[#24b44a60]]
             OCCURS 10 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	`[[#24b44ea0]]`	USAGE IS
1	2	`[[#24b44ea0]]`
1	3	`[[#24b44ea0]]`
2	1	`[[#24b44de0]]`	PRINT-FLAG
2	2	`[[#24b44de0]]`	PRINT-FLAG
2	3	`[[#24b44de0]]`	PRT-CONTROL
3	1	`[[#24b41bc0]]`	X(1)
3	2	`[[#24b41bc0]]`	X
3	3	`[[#24b41bc0]]`	X(1)
4	1	`[[#24b44c20]]`	PARAMETER-TERM-ID
4	2	`[[#24b44c20]]`	TERM-CHECK
4	3	`[[#24b44c20]]`	TERM-CHECK
5	1	`[[#24b44a60]]`	PARAMETER-COLLEGE-ENTRY
5	2	`[[#24b44a60]]`	PARAMETER-COLLEGES
5	3	`[[#24b44a60]]`	PARAMETER-COLLEGES