CloneSet174


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
18	2	2	0.963	sentence_list[6]

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	18	4441	CCCC15.COB
2	18	6820	CCCC15.COB

Clone Instance
1

Line Count
18

Source Line
4441

Source File

CCCC15.COB

           MOVE ASSIGN-ERROR-LITERAL-AREA
                (ASSIGN-ERROR-LITERAL-INDEX) TO
                  ELEMENT-LITERAL.
           MOVE ASSIGN-COUNT (ASSIGN-COUNT-ROW-INDEX  1) TO
                  ELEMENT-VALIDITY.
           MOVE NOT-APP-LITERAL TO
                  ELEMENT-INTEGRITY-RED.
           MOVE NOT-APP-LITERAL TO
                  ELEMENT-REASON-RED.
      *    IF ASSIGN-COUNT-ROW-INDEX < 7
           IF ASSIGN-COUNT-ROW-INDEX LESS 40
               MOVE NOT-APP-LITERAL TO
                          ELEMENT-GRP3-RED.
      *    ELSE
      *        MOVE ASSIGN-COUNT (ASSIGN-COUNT-ROW-INDEX, 4)
      *                TO GRP3-COUNT.
           WRITE PRINT-RECORD-2
             FROM                    TOTAL-ELEMENT-LINE
                   AFTER ADVANCING 1 LINE.

Clone Instance
2

Line Count
18

Source Line
6820

Source File

CCCC15.COB

           MOVE ASSIGN-ERROR-LITERAL-AREA
                (ASSIGN-ERROR-LITERAL-INDEX) TO
                  ELEMENT-LITERAL.
           MOVE DISTRICT-ASSIGN (DISTRICT-ASSIGN-ROW-INDEX  1) TO
                  ELEMENT-VALIDITY.
           MOVE NOT-APP-LITERAL TO
                  ELEMENT-INTEGRITY-RED.
           MOVE NOT-APP-LITERAL TO
                  ELEMENT-REASON-RED.
      *    IF DISTRICT-ASSIGN-ROW-INDEX < 7
           IF DISTRICT-ASSIGN-ROW-INDEX LESS 40
               MOVE NOT-APP-LITERAL TO
                          ELEMENT-GRP3-RED.
      *    ELSE
      *        MOVE DISTRICT-ASSIGN (DISTRICT-ASSIGN-ROW-INDEX, 4)
      *                TO ELEMENT-GRP3.
           WRITE PRINT-RECORD-2
             FROM                    TOTAL-ELEMENT-LINE
                   AFTER ADVANCING 1 LINE.

Clone Abstraction

Parameter Count: 2

Parameter Bindings

           MOVE ASSIGN-ERROR-LITERAL-AREA (ASSIGN-ERROR-LITERAL-INDEX)TO
                                                         ELEMENT-LITERAL
           .
           MOVE [[#24bd1f00]]( [[#24bd6c80]]
                              1) TO ELEMENT-VALIDITY.
           MOVE NOT-APP-LITERAL TO ELEMENT-INTEGRITY-RED.
           MOVE NOT-APP-LITERAL TO ELEMENT-REASON-RED.
      *    IF DISTRICT-ASSIGN-ROW-INDEX < 7
      *    IF ASSIGN-COUNT-ROW-INDEX < 7
           IF [[#24bd6c80]]LESS 40
             MOVE NOT-APP-LITERAL TO ELEMENT-GRP3-RED.
      *    ELSE
      *        MOVE DISTRICT-ASSIGN (DISTRICT-ASSIGN-ROW-INDEX, 4)
      *                TO ELEMENT-GRP3.
      *        MOVE ASSIGN-COUNT (ASSIGN-COUNT-ROW-INDEX, 4)
      *                TO GRP3-COUNT.
           WRITE PRINT-RECORD-2
             FROM TOTAL-ELEMENT-LINE
             AFTER ADVANCING 1 LINE.

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#24bd1f00]]`	DISTRICT-ASSIGN
1	2	`[[#24bd1f00]]`	ASSIGN-COUNT
2	1	`[[#24bd6c80]]`	DISTRICT-ASSIGN-ROW-INDEX
2	2	`[[#24bd6c80]]`	ASSIGN-COUNT-ROW-INDEX