CloneSet58


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
16	7	3	0.963	paragraph

Clone Abstraction

Parameter Bindings


CCCC1.COB
CCCC10.COB
CCCC12.COB
CCCC14.COB
CCCC2.COB
CCCC6.COB
CCCC8.COB

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	16	3385	CCCC1.COB
2	16	3874	CCCC10.COB
3	16	3191	CCCC12.COB
4	16	3763	CCCC14.COB
5	16	3724	CCCC2.COB
6	16	3299	CCCC6.COB
7	16	3103	CCCC8.COB

Clone Instance
1

Line Count
16

Source Line
3385

Source File

CCCC1.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-PARAMETER-COLLEGES
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN COURSE-INVENTORY-RECORD
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
2

Line Count
16

Source Line
3874

Source File

CCCC10.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-PARAMETER-COLLEGES
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN STUDENT-FINANCIAL-DATA-RECORD
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-OUT
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
3

Line Count
16

Source Line
3191

Source File

CCCC12.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-PARAMETER-COLLEGES
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN STUDENT-PRG-AWARD-RECORD
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
4

Line Count
16

Source Line
3763

Source File

CCCC14.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-COLLEGE-ENTRY
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN STUDENT-ENROLLMENT-RECORD
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
5

Line Count
16

Source Line
3724

Source File

CCCC2.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-COLLEGE-ENTRY
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN DATA-VALIDATION-WORK-FIELDS
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
6

Line Count
16

Source Line
3299

Source File

CCCC6.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-COLLEGE-ENTRY
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN DATA-VALIDATION-WORK-FIELDS
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Instance
7

Line Count
16

Source Line
3103

Source File

CCCC8.COB

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO                           1.
           SEARCH RUNTIME-PARAMETER-COLLEGES
           AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
           WHEN COLLEGE-ID
                   IN RUNTIME-PARAMETER-TABLE
                   (RUNTIME-PARAMETER-INDEX)
                   IS EQUAL TO COLLEGE-ID
                   IN STUDENT-DSPS-DATA-RECORD
               MOVE COLLEGE-NAME
                       IN RUNTIME-PARAMETER-TABLE
                       (RUNTIME-PARAMETER-INDEX) TO
                          COLLEGE-NAME
                       IN REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

Clone Abstraction

Parameter Count: 3

Parameter Bindings

      *
      *
       2110-SEARCH-PARAMETER-TABLE.
           SET RUNTIME-PARAMETER-INDEX
             TO 1.
           SEARCH [[#24b25ec0]]
             AT END
               MOVE 1 TO COLLEGE-SEARCH-FLAG
             WHEN COLLEGE-ID
                    IN RUNTIME-PARAMETER-TABLE (RUNTIME-PARAMETER-INDEX)
                  IS EQUAL TO COLLEGE-ID
                                IN [[#24b25e20]]
               MOVE COLLEGE-NAME
                      IN RUNTIME-PARAMETER-TABLE (
                                                 RUNTIME-PARAMETER-INDEX
                                                 ) TO [[#24b25d80]]
                                                       IN
                                                     REPORT-TITLE-LINE-3
               MOVE ZERO TO COLLEGE-SEARCH-FLAG.

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#24b25ec0]]`	RUNTIME-PARAMETER-COLLEGES
1	2	`[[#24b25ec0]]`	RUNTIME-COLLEGE-ENTRY
1	3	`[[#24b25ec0]]`	RUNTIME-COLLEGE-ENTRY
1	4	`[[#24b25ec0]]`	RUNTIME-PARAMETER-COLLEGES
1	5	`[[#24b25ec0]]`	RUNTIME-PARAMETER-COLLEGES
1	6	`[[#24b25ec0]]`	RUNTIME-PARAMETER-COLLEGES
1	7	`[[#24b25ec0]]`	RUNTIME-COLLEGE-ENTRY
2	1	`[[#24b25e20]]`	COURSE-INVENTORY-RECORD
2	2	`[[#24b25e20]]`	DATA-VALIDATION-WORK-FIELDS
2	3	`[[#24b25e20]]`	STUDENT-ENROLLMENT-RECORD
2	4	`[[#24b25e20]]`	STUDENT-DSPS-DATA-RECORD
2	5	`[[#24b25e20]]`	STUDENT-PRG-AWARD-RECORD
2	6	`[[#24b25e20]]`	STUDENT-FINANCIAL-DATA-RECORD
2	7	`[[#24b25e20]]`	DATA-VALIDATION-WORK-FIELDS
3	1	`[[#24b25d80]]`	COLLEGE-NAME
3	2	`[[#24b25d80]]`	COLLEGE-NAME
3	3	`[[#24b25d80]]`	COLLEGE-NAME
3	4	`[[#24b25d80]]`	COLLEGE-NAME
3	5	`[[#24b25d80]]`	COLLEGE-NAME
3	6	`[[#24b25d80]]`	COLLEGE-OUT
3	7	`[[#24b25d80]]`	COLLEGE-NAME