CloneSet173


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
11220.976if_then_statement
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1114928
CCCC10.COB
2114940
CCCC10.COB
Clone Instance
1
Line Count
11
Source Line
4928
Source File
CCCC10.COB

                   MOVE 1 TO REJECT-RECORD-FLAG
                   ADD 1
                     TO     COLLEGE-INT-CNT (1)
                   MOVE INTEGRITY-LITERAL TO
                              VALIDATION-FLAG
                           IN EDIT-ERROR-TABLE-COLUMNS
                           (7 EDIT-ERROR-COLUMN-INDEX)
                   IF AWARDS-COUNT GREATER 0
                       PERFORM 23401-FLAG-INT-ERR-AWARD-AMTS
                           VARYING HOLD-AWARD-INDEX
                             FROM 1
                             BY      1
                             UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT


Clone Instance
2
Line Count
11
Source Line
4940
Source File
CCCC10.COB

               MOVE 1 TO REJECT-RECORD-FLAG
               ADD 1
                 TO     COLLEGE-INT-CNT (2)
               MOVE INTEGRITY-LITERAL TO
                          VALIDATION-FLAG
                       IN EDIT-ERROR-TABLE-COLUMNS
                       (7 EDIT-ERROR-COLUMN-INDEX)
               IF AWARDS-COUNT GREATER 0
                   PERFORM 23402-FLAG-INT-ERR-AWARD-TYPES
                       VARYING HOLD-AWARD-INDEX
                         FROM 1
                         BY      1
                         UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT


Clone AbstractionParameter Count: 2Parameter Bindings

           MOVE 1 TO REJECT-RECORD-FLAG
           ADD 1
             TO COLLEGE-INT-CNT ( [[#24bd5b20]])
           MOVE INTEGRITY-LITERAL TO VALIDATION-FLAG
                                       IN EDIT-ERROR-TABLE-COLUMNS (7
                                                 EDIT-ERROR-COLUMN-INDEX
                                                                   )
           IF AWARDS-COUNT GREATER 0
             PERFORM [[#24bd5a80]]
               VARYING HOLD-AWARD-INDEX
                 FROM 1
                 BY 1
                 UNTIL HOLD-AWARD-INDEX GREATER AWARDS-COUNT
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24bd5b20]]
       1 
12[[#24bd5b20]]
       2 
21[[#24bd5a80]]
       23401-FLAG-INT-ERR-AWARD-AMTS 
22[[#24bd5a80]]
       23402-FLAG-INT-ERR-AWARD-TYPES