CloneSet58


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
16730.963paragraph
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1163385
CCCC1.COB
2163874
CCCC10.COB
3163191
CCCC12.COB
4163763
CCCC14.COB
5163724
CCCC2.COB
6163299
CCCC6.COB
7163103
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 AbstractionParameter Count: 3Parameter 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
11[[#24b25ec0]]
       RUNTIME-PARAMETER-COLLEGES 
12[[#24b25ec0]]
       RUNTIME-COLLEGE-ENTRY 
13[[#24b25ec0]]
       RUNTIME-COLLEGE-ENTRY 
14[[#24b25ec0]]
       RUNTIME-PARAMETER-COLLEGES 
15[[#24b25ec0]]
       RUNTIME-PARAMETER-COLLEGES 
16[[#24b25ec0]]
       RUNTIME-PARAMETER-COLLEGES 
17[[#24b25ec0]]
       RUNTIME-COLLEGE-ENTRY 
21[[#24b25e20]]
       COURSE-INVENTORY-RECORD 
22[[#24b25e20]]
       DATA-VALIDATION-WORK-FIELDS 
23[[#24b25e20]]
       STUDENT-ENROLLMENT-RECORD 
24[[#24b25e20]]
       STUDENT-DSPS-DATA-RECORD 
25[[#24b25e20]]
       STUDENT-PRG-AWARD-RECORD 
26[[#24b25e20]]
       STUDENT-FINANCIAL-DATA-RECORD 
27[[#24b25e20]]
       DATA-VALIDATION-WORK-FIELDS 
31[[#24b25d80]]
       COLLEGE-NAME 
32[[#24b25d80]]
       COLLEGE-NAME 
33[[#24b25d80]]
       COLLEGE-NAME 
34[[#24b25d80]]
       COLLEGE-NAME 
35[[#24b25d80]]
       COLLEGE-NAME 
36[[#24b25d80]]
       COLLEGE-OUT 
37[[#24b25d80]]
       COLLEGE-NAME