CloneSet152


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
17	2	4	0.955	paragraph

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	17	4915	CCCC15.COB
2	17	4953	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 Abstraction

Parameter Count: 4

Parameter 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
1	1	`[[#24bbc9e0]]`	* * 2311E-VALIDATE-START-TIME
1	2	`[[#24bbc9e0]]`	* * 2311E-VALIDATE-END-TIME
2	1	`[[#24bbc960]]`	SESSION-START-TIME
2	2	`[[#24bbc960]]`	SESSION-END-TIME
3	1	`[[#24bbc8e0]]`	11
3	2	`[[#24bbc8e0]]`	12
4	1	`[[#24bbc840]]`	2311EA-VALIDATE-START-TIME
4	2	`[[#24bbc840]]`	2311EA-VALIDATE-END-TIME