CloneSet179


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
16201.000sentence_list[10]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1162094
CCCC3.COB
2163573
CCCC7.COB
Clone Instance
1
Line Count
16
Source Line
2094
Source File
CCCC3.COB

           IF PRINT-FLAG NUMERIC
               MOVE PRINT-FLAG TO
                  PRINT-LIMIT.
           ACCEPT KEY-DATE
             FROM DAY.
           ACCEPT DATE-HOLD
             FROM DATE.
           ACCEPT KEY-TIME
             FROM TIME.
           ACCEPT TIME-HOLD
             FROM TIME.
           MOVE YEAR-2 TO
                  KEY-ELEMENT-1.
           MOVE DAY-2 TO
                  KEY-ELEMENT-2.
           MOVE DAY-3 TO
                  KEY-ELEMENT-3.
           MOVE KEY-TIME-ZONE TO
                  KEY-ELEMENT-4.
           SET EDIT-COLUMN-INDEX
             TO                     1.


Clone Instance
2
Line Count
16
Source Line
3573
Source File
CCCC7.COB

           IF PRINT-FLAG NUMERIC
               MOVE PRINT-FLAG TO
                  PRINT-LIMIT.
           ACCEPT KEY-DATE
             FROM DAY.
           ACCEPT DATE-HOLD
             FROM DATE.
           ACCEPT KEY-TIME
             FROM TIME.
           ACCEPT TIME-HOLD
             FROM TIME.
           MOVE YEAR-2 TO
                  KEY-ELEMENT-1.
           MOVE DAY-2 TO
                  KEY-ELEMENT-2.
           MOVE DAY-3 TO
                  KEY-ELEMENT-3.
           MOVE KEY-TIME-ZONE TO
                  KEY-ELEMENT-4.
           SET EDIT-COLUMN-INDEX
             TO                     1.


Clone AbstractionParameter Count: 0Parameter Bindings

           IF PRINT-FLAG NUMERIC
             MOVE PRINT-FLAG TO PRINT-LIMIT.
           ACCEPT KEY-DATE
             FROM DAY.
           ACCEPT DATE-HOLD
             FROM DATE.
           ACCEPT KEY-TIME
             FROM TIME.
           ACCEPT TIME-HOLD
             FROM TIME.
           MOVE YEAR-2 TO KEY-ELEMENT-1.
           MOVE DAY-2 TO KEY-ELEMENT-2.
           MOVE DAY-3 TO KEY-ELEMENT-3.
           MOVE KEY-TIME-ZONE TO KEY-ELEMENT-4.
           SET EDIT-COLUMN-INDEX
             TO 1.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
None