CloneSet93


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
13	5	1	0.986	paragraph

Clone Abstraction

Parameter Bindings


CCCC10.COB
CCCC12.COB
CCCC15.COB
CCCC3.COB
CCCC7.COB

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	13	6223	CCCC10.COB
2	13	3924	CCCC12.COB
3	13	6407	CCCC15.COB
4	13	3548	CCCC3.COB
5	13	5724	CCCC7.COB

Clone Instance
1

Line Count
13

Source Line
6223

Source File

CCCC10.COB

      *
      *
       8500-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

Clone Instance
2

Line Count
13

Source Line
3924

Source File

CCCC12.COB

      *
      *
       8500-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

Clone Instance
3

Line Count
13

Source Line
6407

Source File

CCCC15.COB

      *
      *
       8500-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

Clone Instance
4

Line Count
13

Source Line
3548

Source File

CCCC3.COB

       8500-REPORT-HEADINGS.
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

Clone Instance
5

Line Count
13

Source Line
5724

Source File

CCCC7.COB

       8500-REPORT-HEADINGS.
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
               PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
               PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

Clone Abstraction

Parameter Count: 1

Parameter Bindings

        [[#24b66540]].
           MOVE SPACES TO PRINT-RECORD.
           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.
           IF NARROW-PAPER-REQUIRED
             PERFORM 2HDR-NARROW-PAPER-ROUTINE
           ELSE
             PERFORM 3HDR-WIDE-PAPER-ROUTINE.
           PERFORM 7HDR-USER-SUPPLIED-HEADINGS.

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#24b66540]]`	* * 8500-PRINT-HEADERS
1	2	`[[#24b66540]]`	8500-REPORT-HEADINGS
1	3	`[[#24b66540]]`	8500-REPORT-HEADINGS
1	4	`[[#24b66540]]`	* * 8500-PRINT-HEADERS
1	5	`[[#24b66540]]`	* * 8500-PRINT-HEADERS