CloneSet29


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
57260.982record_or_data_item_entry_list[6]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
157748
CCCC3.COB
2571013
CCCC7.COB
Clone Instance
1
Line Count
57
Source Line
748
Source File
CCCC3.COB

      *
      *
       01  ELEMENT-COLUMN-LINE-2.
           03  FILLER                  PIC X      VALUE SPACE.
           03  FILLER                  PIC X(47)  VALUE SPACE.
           03  FILLER                  PIC X(6)
                   VALUE 'FIELD'.
           03  FILLER                  PIC X(15)  VALUE SPACE.
           03  FILLER                  PIC X(7)
                   VALUE 'UNKNOWN'.
           03  FILLER                  PIC X(10)  VALUE SPACE.
           03  FILLER                  PIC X(14)
                   VALUE 'REASONABLENESS'.
           03  FILLER                  PIC X(11)  VALUE SPACE.
           03  FILLER                  PIC X(7)
                   VALUE 'GROUP 3'.
      *
      *
       01  ELEMENT-COLUMN-LINE-3.
           03  FILLER                  PIC X      VALUE SPACE.
           03  FILLER                  PIC X(16)  VALUE SPACE.
           03  FILLER                  PIC X(21)
                   VALUE 'DATA ELEMENT     DED#'.
           03  FILLER                  PIC X(8)   VALUE SPACE.
           03  FILLER                  PIC X(10)  VALUE 'EXCEPTIONS'.
           03  FILLER                  PIC X(13)  VALUE SPACE.
           03  FILLER                  PIC X(6)   VALUE 'VALUES'.
           03  FILLER                  PIC X(13)  VALUE SPACE.
           03  FILLER                  PIC X(10)  VALUE 'EXCEPTIONS'.
           03  FILLER                  PIC X(12)  VALUE SPACE.
           03  FILLER                  PIC X(8)   VALUE '(SPACES)'.
      *
      *
       01  REPORT-TITLE-LINE-1.
           03  FILLER                  PIC X(45)  VALUE SPACES.
           03  FILLER                  PIC X(42)
                   VALUE 'EMPLOYEE DEMOGRAPHIC DATA SYNTACTICAL EDIT'.
      *
      *
       01  REPORT-TITLE-LINE-2.
           03  FILLER                  PIC X(50)  VALUE SPACES.
           03  TERM-TITLE              PIC X(19).
           03  FILLER                  PIC XXX    VALUE ' 19'.
           03  CALENDAR-YEAR1          PIC 99.
           03  FILLER                  PIC X(4)   VALUE '   ('.
           03  CALENDAR-YEAR2          PIC 99.
           03  FILLER                  PIC X      VALUE '-'.
           03  TERM-CODE               PIC X.
           03  FILLER                  PIC X      VALUE ')'.
      *
      *
       01  REPORT-TITLE-LINE-3.
           03  FILLER                  PIC X(52)  VALUE SPACES.
           03  DISTRICT-NAME           PIC X(30).
      *
      *
       01  REPORT-TITLE-LINE-3A.
           03  FILLER                  PIC X(60)  VALUE SPACES.
           03  FILLER                  PIC X(13)  VALUE 'DETAIL REPORT'.


Clone Instance
2
Line Count
57
Source Line
1013
Source File
CCCC7.COB

      *
      *
       01  ELEMENT-COLUMN-LINE-2.
           03  FILLER                  PIC X(1)   VALUE SPACE.
           03  FILLER                  PIC X(47)  VALUE SPACE.
           03  FILLER                  PIC X(6)
                   VALUE 'FIELD'.
           03  FILLER                  PIC X(15)  VALUE SPACE.
           03  FILLER                  PIC X(7)
                   VALUE 'UNKNOWN'.
           03  FILLER                  PIC X(10)  VALUE SPACE.
           03  FILLER                  PIC X(14)
                   VALUE 'REASONABLENESS'.
           03  FILLER                  PIC X(11)  VALUE SPACE.
           03  FILLER                  PIC X(7)
                   VALUE 'GROUP 3'.
      *
      *
       01  ELEMENT-COLUMN-LINE-3.
           03  FILLER                  PIC X(1)   VALUE SPACE.
           03  FILLER                  PIC X(16)  VALUE SPACE.
           03  FILLER                  PIC X(21)
                   VALUE 'DATA ELEMENT     DED#'.
           03  FILLER                  PIC X(8)   VALUE SPACE.
           03  FILLER                  PIC X(10)  VALUE 'EXCEPTIONS'.
           03  FILLER                  PIC X(13)  VALUE SPACE.
           03  FILLER                  PIC X(6)   VALUE 'VALUES'.
           03  FILLER                  PIC X(13)  VALUE SPACE.
           03  FILLER                  PIC X(10)  VALUE 'EXCEPTIONS'.
           03  FILLER                  PIC X(12)  VALUE SPACE.
           03  FILLER                  PIC X(8)   VALUE '(SPACES)'.
      *
      *
       01  REPORT-TITLE-LINE-1.
           03  FILLER                  PIC X(49)  VALUE SPACES.
           03  FILLER                  PIC X(35)
                   VALUE 'STUDENT BASIC DATA SYNTACTICAL EDIT'.
      *
      *
       01  REPORT-TITLE-LINE-2.
           03  FILLER                  PIC X(50)  VALUE SPACES.
           03  TERM-TITLE              PIC X(19).
           03  FILLER                  PIC X(3)   VALUE ' 19'.
           03  CALENDAR-YEAR1          PIC 99.
           03  FILLER                  PIC X(4)   VALUE '   ('.
           03  CALENDAR-YEAR2          PIC 99.
           03  FILLER                  PIC X(1)   VALUE '-'.
           03  TERM-CODE               PIC X(1).
           03  FILLER                  PIC X(1)   VALUE ')'.
      *
      *
       01  REPORT-TITLE-LINE-3.
           03  FILLER                  PIC X(52)  VALUE SPACES.
           03  COLLEGE-NAME            PIC X(30).
      *
      *
       01  REPORT-TITLE-LINE-3A.
           03  FILLER                  PIC X(60)  VALUE SPACES.
           03  FILLER                  PIC X(13)  VALUE 'DETAIL REPORT'.


Clone AbstractionParameter Count: 6Parameter Bindings

      *
      *
       01  ELEMENT-COLUMN-LINE-2.
           03 FILLER
              PIC [[#22a408e0]]
              VALUE SPACE.
           03 FILLER
              PIC X(47)
              VALUE SPACE.
           03 FILLER
              PIC X(6)
              VALUE 'FIELD'.
           03 FILLER
              PIC X(15)
              VALUE SPACE.
           03 FILLER
              PIC X(7)
              VALUE 'UNKNOWN'.
           03 FILLER
              PIC X(10)
              VALUE SPACE.
           03 FILLER
              PIC X(14)
              VALUE 'REASONABLENESS'.
           03 FILLER
              PIC X(11)
              VALUE SPACE.
           03 FILLER
              PIC X(7)
              VALUE 'GROUP 3'.
      *
      *
       01  ELEMENT-COLUMN-LINE-3.
           03 FILLER
              PIC [[#22a408e0]]
              VALUE SPACE.
           03 FILLER
              PIC X(16)
              VALUE SPACE.
           03 FILLER
              PIC X(21)
              VALUE 'DATA ELEMENT     DED#'.
           03 FILLER
              PIC X(8)
              VALUE SPACE.
           03 FILLER
              PIC X(10)
              VALUE 'EXCEPTIONS'.
           03 FILLER
              PIC X(13)
              VALUE SPACE.
           03 FILLER
              PIC X(6)
              VALUE 'VALUES'.
           03 FILLER
              PIC X(13)
              VALUE SPACE.
           03 FILLER
              PIC X(10)
              VALUE 'EXCEPTIONS'.
           03 FILLER
              PIC X(12)
              VALUE SPACE.
           03 FILLER
              PIC X(8)
              VALUE '(SPACES)'.
      *
      *
       01  REPORT-TITLE-LINE-1.
           03 FILLER
              PIC [[#22a407a0]]
              VALUE SPACES.
           03 FILLER
              PIC [[#22a40720]]
              VALUE [[#22a407e0]].
      *
      *
       01  REPORT-TITLE-LINE-2.
           03 FILLER
              PIC X(50)
              VALUE SPACES.
           03 TERM-TITLE
              PIC X(19).
           03 FILLER
              PIC [[#22a40920]]
              VALUE ' 19'.
           03 CALENDAR-YEAR1
              PIC 99.
           03 FILLER
              PIC X(4)
              VALUE '   ('.
           03 CALENDAR-YEAR2
              PIC 99.
           03 FILLER
              PIC [[#22a408e0]]
              VALUE '-'.
           03 TERM-CODE
              PIC [[#22a408e0]].
           03 FILLER
              PIC [[#22a408e0]]
              VALUE ')'.
      *
      *
       01  REPORT-TITLE-LINE-3.
           03 FILLER
              PIC X(52)
              VALUE SPACES.
           03 [[#22a40700]]
             PIC X(30).
      *
      *
       01  REPORT-TITLE-LINE-3A.
           03 FILLER
              PIC X(60)
              VALUE SPACES.
           03 FILLER
              PIC X(13)
              VALUE 'DETAIL REPORT'.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#22a408e0]]
       X(1) 
12[[#22a408e0]]
       X 
21[[#22a407a0]]
       X(49) 
22[[#22a407a0]]
       X(45) 
31[[#22a40720]]
       X(35) 
32[[#22a40720]]
       X(42) 
41[[#22a407e0]]
       'STUDENT BASIC DATA SYNTACTICAL EDIT' 
42[[#22a407e0]]
       'EMPLOYEE DEMOGRAPHIC DATA SYNTACTICAL EDIT' 
51[[#22a40920]]
       X(3) 
52[[#22a40920]]
       XXX 
61[[#22a40700]]
       COLLEGE-NAME 
62[[#22a40700]]
       DISTRICT-NAME