CloneSet51


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
26340.981record_or_data_item_entry_list[2]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
126636
CCCC1.COB
226502
CCCC12.COB
326497
CCCC8.COB
Clone Instance
1
Line Count
26
Source Line
636
Source File
CCCC1.COB

      *
      *
       01  EDIT-ERROR-DETAIL-LINE                 VALUE SPACE.
           03  FILLER                  PIC X.
           03  DETAIL-LITERAL-AREA     PIC X(23).
           03  DETAIL-COLUMNS
                       OCCURS 6 TIMES
                       INDEXED BY DETAIL-COLUMN-INDEX.
               05  VALIDATION-FLAG     PIC X.
               05  FILLER              PIC X.
               05  DATA-ELEMENT        PIC X(12).
               05  FILLER              PIC X(4).
      *
      *
       01  ELEMENT-TOTAL-DETAIL-LINE              VALUE SPACE.
           03  FILLER                  PIC X.
           03  FILLER                  PIC X(16).
           03  ELEMENT-LITERAL-AREA    PIC X(26).
           03  FILLER                  PIC X(5).
           03  ELEMENT-COLUMNS
                       OCCURS 4 TIMES
                       INDEXED BY ELEMENT-COLUMN-INDEX.
               05  ELEMENT-TOTAL       PIC ZZ,ZZ9.
               05  ELEMENT-TOTAL-REDEFINES
                       REDEFINES ELEMENT-TOTAL.
                   07  FILLER          PIC X(3).
                   07  ELEMENT-N-A     PIC X(3).
               05  FILLER              PIC X(15).


Clone Instance
2
Line Count
26
Source Line
502
Source File
CCCC12.COB

      *
      *
       01  EDIT-ERROR-DETAIL-LINE                 VALUE SPACE.
           03  FILLER                  PIC X.
           03  DETAIL-LITERAL-AREA     PIC X(26).
           03  DETAIL-COLUMNS
                       OCCURS 7 TIMES
                       INDEXED BY DETAIL-COLUMN-INDEX.
               05  VALIDATION-FLAG     PIC X.
               05  FILLER              PIC X.
               05  DATA-ELEMENT        PIC X(10).
               05  FILLER              PIC X(3).
      *
      *
       01  ELEMENT-TOTAL-DETAIL-LINE              VALUE SPACE.
           03  FILLER                  PIC X.
           03  FILLER                  PIC X(16).
           03  ELEMENT-LITERAL-AREA    PIC X(26).
           03  FILLER                  PIC X(5).
           03  ELEMENT-COLUMNS
                       OCCURS 4 TIMES
                       INDEXED BY ELEMENT-COLUMN-INDEX.
               05  ELEMENT-TOTAL       PIC ZZ,ZZ9.
               05  ELEMENT-TOTAL-REDEFINES
                       REDEFINES ELEMENT-TOTAL.
                   07  FILLER          PIC X(3).
                   07  ELEMENT-N-A     PIC X(3).
               05  FILLER              PIC X(15).


Clone Instance
3
Line Count
26
Source Line
497
Source File
CCCC8.COB

      *
      *
       01  EDIT-ERROR-DETAIL-LINE                 VALUE SPACE.
           03  FILLER                  PIC X.
           03  DETAIL-LITERAL-AREA     PIC X(26).
           03  DETAIL-COLUMNS
                       OCCURS 7 TIMES
                       INDEXED BY DETAIL-COLUMN-INDEX.
               05  VALIDATION-FLAG     PIC X.
               05  FILLER              PIC X.
               05  DATA-ELEMENT        PIC X(10).
               05  FILLER              PIC X(3).
      *
      *
       01  ELEMENT-TOTAL-DETAIL-LINE              VALUE SPACE.
           03  FILLER                  PIC X.
           03  FILLER                  PIC X(16).
           03  ELEMENT-LITERAL-AREA    PIC X(26).
           03  FILLER                  PIC X(5).
           03  ELEMENT-COLUMNS
                       OCCURS 4 TIMES
                       INDEXED BY ELEMENT-COLUMN-INDEX.
               05  ELEMENT-TOTAL       PIC ZZ,ZZ9.
               05  ELEMENT-TOTAL-REDEFINES
                       REDEFINES ELEMENT-TOTAL.
                   07  FILLER          PIC X(3).
                   07  ELEMENT-N-A     PIC X(3).
               05  FILLER              PIC X(15).


Clone AbstractionParameter Count: 4Parameter Bindings

      *
      *
       01  EDIT-ERROR-DETAIL-LINE
           VALUE SPACE.
           03 FILLER
              PIC X.
           03 DETAIL-LITERAL-AREA
              PIC [[#24b124e0]].
           03 DETAIL-COLUMNS
              OCCURS [[#24b12440]]TIMES
                INDEXED
                BY
                  DETAIL-COLUMN-INDEX.
              05 VALIDATION-FLAG
                 PIC X.
              05 FILLER
                 PIC X.
              05 DATA-ELEMENT
                 PIC [[#24b12400]].
              05 FILLER
                 PIC [[#24b12340]].
      *
      *
       01  ELEMENT-TOTAL-DETAIL-LINE
           VALUE SPACE.
           03 FILLER
              PIC X.
           03 FILLER
              PIC X(16).
           03 ELEMENT-LITERAL-AREA
              PIC X(26).
           03 FILLER
              PIC X(5).
           03 ELEMENT-COLUMNS
              OCCURS 4 TIMES
                INDEXED
                BY
                  ELEMENT-COLUMN-INDEX.
              05 ELEMENT-TOTAL
                 PIC ZZ,ZZ9.
              05 ELEMENT-TOTAL-REDEFINES
                 REDEFINES ELEMENT-TOTAL.
                 07 FILLER
                    PIC X(3).
                 07 ELEMENT-N-A
                    PIC X(3).
              05 FILLER
                 PIC X(15).
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b124e0]]
       X(23) 
12[[#24b124e0]]
       X(26) 
13[[#24b124e0]]
       X(26) 
21[[#24b12440]]
       6 
22[[#24b12440]]
       7 
23[[#24b12440]]
       7 
31[[#24b12400]]
       X(12) 
32[[#24b12400]]
       X(10) 
33[[#24b12400]]
       X(10) 
41[[#24b12340]]
       X(4) 
42[[#24b12340]]
       X(3) 
43[[#24b12340]]
       X(3)