CloneSet94


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
13510.986paragraph
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1136355
CCCC10.COB
2134062
CCCC12.COB
3136531
CCCC15.COB
4133672
CCCC3.COB
5135848
CCCC7.COB
Clone Instance
1
Line Count
13
Source Line
6355
Source File
CCCC10.COB

      *
      *
       8600-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO     REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO
                      HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
               PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.


Clone Instance
2
Line Count
13
Source Line
4062
Source File
CCCC12.COB

      *
      *
       85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO     REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO
                      HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
               PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.


Clone Instance
3
Line Count
13
Source Line
6531
Source File
CCCC15.COB

      *
      *
       8600-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO     REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO
                      HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
               PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.


Clone Instance
4
Line Count
13
Source Line
3672
Source File
CCCC3.COB

      *
      *
       8600-REPORT-HEADINGS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO     REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO
                      HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
               PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.


Clone Instance
5
Line Count
13
Source Line
5848
Source File
CCCC7.COB

      *
      *
       8600-REPORT-HEADINGS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO     REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO
                      HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
               PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.


Clone AbstractionParameter Count: 1Parameter Bindings

        [[#24b67360]].
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE ZEROS TO REPORT-LINE-COUNTER.
           ADD 1
             TO REPORT-PAGE-COUNTER.
           MOVE REPORT-PAGE-COUNTER TO HEADER-PAGE-NUMBER.
           IF FIRST-PAGE
             PERFORM 1HDR-FIRST-PAGE-ROUTINE-2.
           IF NARROW-PAPER-REQUIRED
             PERFORM 2HDR-NARROW-PAPER-ROUTINE-2
           ELSE
             PERFORM 3HDR-WIDE-PAPER-ROUTINE-2.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS-2.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b67360]]
      *
      *
       8600-PRINT-HEADERS 
12[[#24b67360]]
      *
      *
       85002-PRINT-HEADERS 
13[[#24b67360]]
      *
      *
       8600-REPORT-HEADINGS 
14[[#24b67360]]
      *
      *
       8600-REPORT-HEADINGS 
15[[#24b67360]]
      *
      *
       8600-PRINT-HEADERS