CloneSet120


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
16	4	1	0.987	paragraph

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	16	3630	CCCC10.COB
2	16	3771	CCCC15.COB
3	16	3366	CCCC2.COB
4	16	3070	CCCC6.COB

Clone Instance
1

Line Count
16

Source Line
3630

Source File

CCCC10.COB

      *
      *
       1110-VALIDATE-TERM-ID.
           SET TERM-IDENTIFIER-INDEX
             TO                         1.
           SEARCH TERM-IDENTIFIER-ENTRY
                   IN TERM-IDENTIFIER-TABLE
           AT END
               MOVE 1 TO GI03-FLAG
           WHEN TERM-CODE
                   IN TERM-IDENTIFIER-ENTRY
                   (TERM-IDENTIFIER-INDEX)
                   IS EQUAL TO TERM-CODE
                   IN RUNTIME-PARAMETER-AREA
               MOVE TERM-TITLE
                       IN TERM-IDENTIFIER-ENTRY
                       (TERM-IDENTIFIER-INDEX) TO
                          TERM-TITLE
                       IN REPORT-TITLE-LINE-2.

Clone Instance
2

Line Count
16

Source Line
3771

Source File

CCCC15.COB

      *
      *
       1110-VALIDATE-TERM-ID.
           SET TERM-IDENTIFIER-INDEX
             TO                         1.
           SEARCH TERM-IDENTIFIER-ENTRY
                   IN TERM-IDENTIFIER-TABLE
           AT END
               MOVE 1 TO GI03-FLAG
           WHEN TERM-CODE
                   IN TERM-IDENTIFIER-ENTRY
                   (TERM-IDENTIFIER-INDEX)
                   IS EQUAL TO TERM-CODE
                   IN RUNTIME-PARAMETER-AREA
               MOVE TERM-TITLE
                       IN TERM-IDENTIFIER-ENTRY
                       (TERM-IDENTIFIER-INDEX) TO
                      TERM-TITLE
                       IN REPORT-TITLE-LINE-2.

Clone Instance
3

Line Count
16

Source Line
3366

Source File

CCCC2.COB

      *
      *
       1110-VALIDATE-TERM-ID.
           SET TERM-IDENTIFIER-INDEX
             TO                         1.
           SEARCH TERM-IDENTIFIER-ENTRY
                   IN TERM-IDENTIFIER-TABLE
           AT END
               MOVE 1 TO TERM-ID-FLAG
           WHEN TERM-CODE
                   IN TERM-IDENTIFIER-ENTRY
                   (TERM-IDENTIFIER-INDEX)
                   IS EQUAL TO TERM-CODE
                   IN RUNTIME-PARAMETER-AREA
               MOVE TERM-TITLE
                       IN TERM-IDENTIFIER-ENTRY
                       (TERM-IDENTIFIER-INDEX) TO
                          TERM-TITLE
                       IN REPORT-TITLE-LINE-2.

Clone Instance
4

Line Count
16

Source Line
3070

Source File

CCCC6.COB

      *
      *
       1110-VALIDATE-TERM-ID.
           SET TERM-IDENTIFIER-INDEX
             TO                         1.
           SEARCH TERM-IDENTIFIER-ENTRY
                   IN TERM-IDENTIFIER-TABLE
           AT END
               MOVE 1 TO TERM-ID-FLAG
           WHEN TERM-CODE
                   IN TERM-IDENTIFIER-ENTRY
                   (TERM-IDENTIFIER-INDEX)
                   IS EQUAL TO TERM-CODE
                   IN RUNTIME-PARAMETER-AREA
               MOVE TERM-TITLE
                       IN TERM-IDENTIFIER-ENTRY
                       (TERM-IDENTIFIER-INDEX) TO
                          TERM-TITLE
                       IN REPORT-TITLE-LINE-2.

Clone Abstraction

Parameter Count: 1

Parameter Bindings

      *
      *
       1110-VALIDATE-TERM-ID.
           SET TERM-IDENTIFIER-INDEX
             TO 1.
           SEARCH TERM-IDENTIFIER-ENTRY
                    IN TERM-IDENTIFIER-TABLE
             AT END
               MOVE 1 TO [[#24b8ed40]]
             WHEN TERM-CODE
                    IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX) IS
                  EQUAL TO TERM-CODE
                             IN RUNTIME-PARAMETER-AREA
               MOVE TERM-TITLE
                      IN TERM-IDENTIFIER-ENTRY (TERM-IDENTIFIER-INDEX)TO
                                                              TERM-TITLE
                                                                IN
                                                     REPORT-TITLE-LINE-2
           .

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#24b8ed40]]`	TERM-ID-FLAG
1	2	`[[#24b8ed40]]`	GI03-FLAG
1	3	`[[#24b8ed40]]`	GI03-FLAG
1	4	`[[#24b8ed40]]`	TERM-ID-FLAG