CloneSet67


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
43260.969record_01_description_entry
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
143308
CCCC12.COB
243378
CCCC6.COB
Clone Instance
1
Line Count
43
Source Line
308
Source File
CCCC12.COB

      *
      *
       01  PROGRAM-ACCUMULATORS                   VALUE ZEROS.
           03  TOTAL-COLLEGE-ENTRIES.
               05  TOTAL-COLLEGE-RECORDS-READ
                                       PIC 9(6).
               05  TOTAL-COLLEGE-RECORDS-WRITTEN
                                       PIC 9(6).
               05  TOTAL-COLLEGE-RECORDS-REJECT
                                       PIC 9(6).
           03  TOTAL-COLLEGE-ENTRY
                       REDEFINES TOTAL-COLLEGE-ENTRIES
                       OCCURS 3 TIMES
                       INDEXED BY TOTAL-COLLEGE-INDEX.
               05  COLLEGE-TOTAL       PIC 9(6).
           03  COLLEGE-ELEMENT-TOTALS.
               05  COLLEGE-ELEMENT-TOTALS-ROWS
                           OCCURS 9 TIMES
                           INDEXED BY COLLEGE-ELEMENT-ROW-INDEX.
                   07  COLLEGE-ELEMENT-TOTALS-COLUMNS
                               OCCURS 4 TIMES
                               INDEXED BY COLLEGE-ELEMENT-COLUMN-INDEX.
                       09  COLLEGE-ELEMENT-TOTAL
                                      PIC 9(5).
           03  TOTAL-DISTRICT-ENTRIES.
               05  TOTAL-DISTRICT-RECORDS-READ
                                       PIC 9(6).
               05  TOTAL-DISTRICT-RECORDS-WRITTEN
                                       PIC 9(6).
               05  TOTAL-DISTRICT-RECORDS-REJECT
                                       PIC 9(6).
           03  TOTAL-DISTRICT-ENTRY
                       REDEFINES TOTAL-DISTRICT-ENTRIES
                       OCCURS 3 TIMES
                       INDEXED BY TOTAL-DISTRICT-INDEX.
               05  DISTRICT-TOTAL      PIC 9(6).
           03  DISTRICT-ELEMENT-TOTALS.
               05  DISTRICT-ELEMENT-TOTALS-ROWS
                           OCCURS 9 TIMES
                           INDEXED BY DISTRICT-ELEMENT-ROW-INDEX.
                   07  DISTRICT-ELEMNT-TOTALS-COLUMNS
                               OCCURS 4 TIMES
                               INDEXED BY DISTRICT-ELEMENT-COLUMN-INDEX.
                       09  DISTRICT-ELEMENT-TOTAL
                                      PIC 9(5).


Clone Instance
2
Line Count
43
Source Line
378
Source File
CCCC6.COB

      *
      *
       01  PROGRAM-ACCUMULATORS                   VALUE ZEROS.
           03  COLLEGE-TOTALS.
               05  TOTAL-COLLEGE-RECORDS-READ
                                       PIC 9(6).
               05  TOTAL-COLLEGE-RECORDS-WRITTEN
                                       PIC 9(6).
               05  TOTAL-COLLEGE-RECORDS-REJECT
                                       PIC 9(6).
           03  COLLEGE-TOTAL-ENTRY
                       REDEFINES COLLEGE-TOTALS
                       OCCURS 3 TIMES
                       INDEXED BY COLLEGE-TOTAL-INDEX.
               05  COLLEGE-TOTAL       PIC 9(6).
           03  COLLEGE-ELEMENT-TOTALS.
               05  COLLEGE-ELEMENT-TOTALS-ROWS
                           OCCURS  9 TIMES
                           INDEXED BY COLLEGE-ELEMENT-ROW-INDEX.
                   07  COLLEGE-ELEMENT-TOTALS-COLUMNS
                               OCCURS 4 TIMES
                               INDEXED BY COLLEGE-ELEMENT-COLUMN-INDEX.
                       09  COLLEGE-ELEMENT-TOTAL
                                       PIC 9(5).
           03  DISTRICT-TOTALS.
               05  TOTAL-DISTRICT-RECORDS-READ
                                       PIC 9(6).
               05  TOTAL-DISTRICT-RECORDS-WRITTEN
                                       PIC 9(6).
               05  TOTAL-DISTRICT-RECORDS-REJECT
                                       PIC 9(6).
           03  DISTRICT-TOTAL-ENTRY
                       REDEFINES DISTRICT-TOTALS
                       OCCURS 3 TIMES
                       INDEXED BY DISTRICT-TOTAL-INDEX.
               05  DISTRICT-TOTAL      PIC 9(6).
           03  DISTRICT-ELEMENT-TOTALS.
               05  DISTRICT-ELEMENT-TOTALS-ROWS
                           OCCURS  9 TIMES
                           INDEXED BY DISTRICT-ELEMENT-ROW-INDEX.
                   07  DISTRICT-ELEMNT-TOTALS-COLUMNS
                             OCCURS 4 TIMES
                             INDEXED BY DISTRICT-ELEMENT-COLUMN-INDEX.
                       09  DISTRICT-ELEMENT-TOTAL
                                       PIC 9(5).


Clone AbstractionParameter Count: 6Parameter Bindings

      *
      *
       01  PROGRAM-ACCUMULATORS
           VALUE ZEROS.
           03 [[#24b36020]].
             05 TOTAL-COLLEGE-RECORDS-READ
                PIC 9(6).
             05 TOTAL-COLLEGE-RECORDS-WRITTEN
                PIC 9(6).
             05 TOTAL-COLLEGE-RECORDS-REJECT
                PIC 9(6).
           03 [[#24b35ea0]]
             REDEFINES [[#24b36020]]
             OCCURS 3 TIMES
               INDEXED
               BY
                  [[#24b35d00]].
             05 COLLEGE-TOTAL
                PIC 9(6).
           03 COLLEGE-ELEMENT-TOTALS.
              05 COLLEGE-ELEMENT-TOTALS-ROWS
                 OCCURS 9 TIMES
                   INDEXED
                   BY
                     COLLEGE-ELEMENT-ROW-INDEX.
                 07 COLLEGE-ELEMENT-TOTALS-COLUMNS
                    OCCURS 4 TIMES
                      INDEXED
                      BY
                        COLLEGE-ELEMENT-COLUMN-INDEX.
                    09 COLLEGE-ELEMENT-TOTAL
                       PIC 9(5).
           03 [[#24b35be0]].
             05 TOTAL-DISTRICT-RECORDS-READ
                PIC 9(6).
             05 TOTAL-DISTRICT-RECORDS-WRITTEN
                PIC 9(6).
             05 TOTAL-DISTRICT-RECORDS-REJECT
                PIC 9(6).
           03 [[#24b359a0]]
             REDEFINES [[#24b35be0]]
             OCCURS 3 TIMES
               INDEXED
               BY
                  [[#24b35880]].
             05 DISTRICT-TOTAL
                PIC 9(6).
           03 DISTRICT-ELEMENT-TOTALS.
              05 DISTRICT-ELEMENT-TOTALS-ROWS
                 OCCURS 9 TIMES
                   INDEXED
                   BY
                     DISTRICT-ELEMENT-ROW-INDEX.
                 07 DISTRICT-ELEMNT-TOTALS-COLUMNS
                    OCCURS 4 TIMES
                      INDEXED
                      BY
                        DISTRICT-ELEMENT-COLUMN-INDEX.
                    09 DISTRICT-ELEMENT-TOTAL
                       PIC 9(5).
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b36020]]
       TOTAL-COLLEGE-ENTRIES 
12[[#24b36020]]
       COLLEGE-TOTALS 
21[[#24b35ea0]]
       TOTAL-COLLEGE-ENTRY 
22[[#24b35ea0]]
       COLLEGE-TOTAL-ENTRY 
31[[#24b35d00]]
       TOTAL-COLLEGE-INDEX 
32[[#24b35d00]]
       COLLEGE-TOTAL-INDEX 
41[[#24b35be0]]
       TOTAL-DISTRICT-ENTRIES 
42[[#24b35be0]]
       DISTRICT-TOTALS 
51[[#24b359a0]]
       TOTAL-DISTRICT-ENTRY 
52[[#24b359a0]]
       DISTRICT-TOTAL-ENTRY 
61[[#24b35880]]
       TOTAL-DISTRICT-INDEX 
62[[#24b35880]]
       DISTRICT-TOTAL-INDEX