CloneSet21


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
191130.981linkage_section
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1193047
CCCC1.COB
2193066
CCCC11.COB
3192856
CCCC12.COB
4192899
CCCC13.COB
5193420
CCCC14.COB
6193263
CCCC2.COB
7192971
CCCC4.COB
8192839
CCCC5.COB
9192964
CCCC6.COB
10192785
CCCC8.COB
11193022
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 AbstractionParameter Count: 3Parameter 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
11[[#22a6f240]]
       X 
12[[#22a6f240]]
       X(1) 
13[[#22a6f240]]
       X(1) 
14[[#22a6f240]]
       X(1) 
15[[#22a6f240]]
       X(1) 
16[[#22a6f240]]
       X(1) 
17[[#22a6f240]]
       X(1) 
18[[#22a6f240]]
       X(1) 
19[[#22a6f240]]
       X(1) 
110[[#22a6f240]]
       X 
111[[#22a6f240]]
       X(1) 
21[[#22a6f180]]
       X 
22[[#22a6f180]]
       X 
23[[#22a6f180]]
       X(1) 
24[[#22a6f180]]
       X 
25[[#22a6f180]]
       X 
26[[#22a6f180]]
       X 
27[[#22a6f180]]
       X 
28[[#22a6f180]]
       X 
29[[#22a6f180]]
       X 
210[[#22a6f180]]
       X 
211[[#22a6f180]]
       X 
31[[#22a6efe0]]
       10 
32[[#22a6efe0]]
       10 
33[[#22a6efe0]]
       10 
34[[#22a6efe0]]
       7 
35[[#22a6efe0]]
       10 
36[[#22a6efe0]]
       10 
37[[#22a6efe0]]
       10 
38[[#22a6efe0]]
       10 
39[[#22a6efe0]]
       10 
310[[#22a6efe0]]
       10 
311[[#22a6efe0]]
       10