CloneSet152


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
17240.955paragraph
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1174915
CCCC15.COB
2174953
CCCC15.COB
Clone Instance
1
Line Count
17
Source Line
4915
Source File
CCCC15.COB

      *
      *
       2311E-VALIDATE-START-TIME.
           IF SESSION-START-TIME
                   IN SESSION-INPUT-DATA-RECORD
               IS EQUAL TO '9999'
               ADD 1
                 TO     SESSION-COUNT (11  2).
           IF (SESSION-START-TIME
                   IN SESSION-INPUT-DATA-RECORD
                   IS EQUAL TO '9999')
                AND    (MEETING-DAY-ENTRY
                           IN SESSION-INPUT-DATA-RECORD (8)
                        IS EQUAL TO '1'
                          OR MEETING-DAY-ENTRY
                                 IN SESSION-INPUT-DATA-RECORD (9)
                              IS EQUAL TO '1')
               NEXT SENTENCE
           ELSE
               PERFORM 2311EA-VALIDATE-START-TIME.


Clone Instance
2
Line Count
17
Source Line
4953
Source File
CCCC15.COB

      *
      *
       2311E-VALIDATE-END-TIME.
           IF SESSION-END-TIME
                   IN SESSION-INPUT-DATA-RECORD
               IS EQUAL TO '9999'
               ADD 1
                 TO     SESSION-COUNT (12  2).
           IF (SESSION-END-TIME
                   IN SESSION-INPUT-DATA-RECORD
                   IS EQUAL TO '9999')
                AND    (MEETING-DAY-ENTRY
                           IN SESSION-INPUT-DATA-RECORD (8)
                        IS EQUAL TO '1'
                          OR MEETING-DAY-ENTRY
                                 IN SESSION-INPUT-DATA-RECORD (9)
                              IS EQUAL TO '1')
               NEXT SENTENCE
           ELSE
               PERFORM 2311EA-VALIDATE-END-TIME.


Clone AbstractionParameter Count: 4Parameter Bindings

        [[#24bbc9e0]].
           IF [[#24bbc960]]
               IN SESSION-INPUT-DATA-RECORD IS EQUAL TO '9999'
             ADD 1
               TO SESSION-COUNT ( [[#24bbc8e0]]
                                 2).
           IF ( [[#24bbc960]]
                 IN SESSION-INPUT-DATA-RECORD IS EQUAL TO '9999')
                AND (MEETING-DAY-ENTRY
                       IN SESSION-INPUT-DATA-RECORD (8) IS EQUAL TO '1'
                       OR MEETING-DAY-ENTRY
                            IN SESSION-INPUT-DATA-RECORD (9) IS EQUAL TO
                                                                     '1'
                    )
             NEXT SENTENCE
           ELSE
             PERFORM [[#24bbc840]].
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24bbc9e0]]
      *
      *
       2311E-VALIDATE-START-TIME 
12[[#24bbc9e0]]
      *
      *
       2311E-VALIDATE-END-TIME 
21[[#24bbc960]]
       SESSION-START-TIME 
22[[#24bbc960]]
       SESSION-END-TIME 
31[[#24bbc8e0]]
       11 
32[[#24bbc8e0]]
       12 
41[[#24bbc840]]
       2311EA-VALIDATE-START-TIME 
42[[#24bbc840]]
       2311EA-VALIDATE-END-TIME