CloneSet136


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

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	21	4124	CCCC9.COB
2	21	4147	CCCC9.COB

Clone Instance
1

Line Count
21

Source Line
4124

Source File

CCCC9.COB

      ******************************************************************
      *   END OF TEMPORARY REASONABLENESS CHECK                        *
      ******************************************************************
       2463-EOPS-TERM-REASON.
           IF EOPS-TERM-OF-ACCEPTANCE
              IN STUDENT-EOPS-RECORD
              IS EQUAL TO 'YYY'
           NEXT SENTENCE
           ELSE
           SUBTRACT 30
             FROM           TERM-ID IN STUDENT-EOPS-RECORD
             GIVING   HOLD-CALC-TERM
           IF E-TERM-OF-ACCEPTANCE
               IN STUDENT-EOPS-RECORD
               IS LESS THAN HOLD-CALC-TERM
                OR GREATER THAN TERM-ID
                   IN STUDENT-EOPS-RECORD
            ADD 1
              TO     COLLEGE-ELEMENT-TOTAL
                IN COLLEGE-ELEMENT-TOTALS-COLUMNS
                (7 3)
             MOVE 1 TO REASONABLE-FLAG
             MOVE REASONABLE-LITERAL TO
                    VALIDATION-FLAG
                 IN EDIT-ERROR-TABLE-COLUMNS
                 (7 EDIT-ERROR-COLUMN-INDEX).

Clone Instance
2

Line Count
21

Source Line
4147

Source File

CCCC9.COB

      *
      *
       2464-CARE-TERM-REASON.
           IF CARE-TERM-OF-ACCEPTANCE
              IN STUDENT-EOPS-RECORD
              IS EQUAL TO 'YYY'
           NEXT SENTENCE
           ELSE
           SUBTRACT 30
             FROM           TERM-ID IN STUDENT-EOPS-RECORD
             GIVING   HOLD-CALC-TERM
           IF C-TERM-OF-ACCEPTANCE
               IN STUDENT-EOPS-RECORD
               IS LESS THAN HOLD-CALC-TERM
                OR GREATER THAN TERM-ID
                   IN STUDENT-EOPS-RECORD
            ADD 1
              TO     COLLEGE-ELEMENT-TOTAL
                IN COLLEGE-ELEMENT-TOTALS-COLUMNS
                (11 3)
            MOVE 1 TO REASONABLE-FLAG
            MOVE REASONABLE-LITERAL TO
                   VALIDATION-FLAG
                IN EDIT-ERROR-TABLE-COLUMNS
                (11 EDIT-ERROR-COLUMN-INDEX).

Clone Abstraction

Parameter Count: 4

Parameter Bindings

        [[#24ba6180]].
           IF [[#24ba60e0]]
               IN STUDENT-EOPS-RECORD IS EQUAL TO 'YYY'
             NEXT SENTENCE
           ELSE
             SUBTRACT 30
               FROM TERM-ID
                      IN STUDENT-EOPS-RECORD
               GIVING HOLD-CALC-TERM
             IF [[#24ba6060]]
                 IN STUDENT-EOPS-RECORD IS LESS THAN HOLD-CALC-TERM
                 OR GREATER THAN TERM-ID
                                   IN STUDENT-EOPS-RECORD
               ADD 1
                 TO COLLEGE-ELEMENT-TOTAL
                      IN COLLEGE-ELEMENT-TOTALS-COLUMNS ( [[#24ba5f60]]
                                                         3)
               MOVE 1 TO REASONABLE-FLAG
               MOVE REASONABLE-LITERAL TO VALIDATION-FLAG
                                            IN EDIT-ERROR-TABLE-COLUMNS(
                                                           [[#24ba5f60]]
                                                 EDIT-ERROR-COLUMN-INDEX
                                                                       )
           .

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
1	1	`[[#24ba6180]]`	* * 2464-CARE-TERM-REASON
1	2	`[[#24ba6180]]`	****************************************************************** * END OF TEMPORARY REASONABLENESS CHECK * ****************************************************************** 2463-EOPS-TERM-REASON
2	1	`[[#24ba60e0]]`	CARE-TERM-OF-ACCEPTANCE
2	2	`[[#24ba60e0]]`	EOPS-TERM-OF-ACCEPTANCE
3	1	`[[#24ba6060]]`	C-TERM-OF-ACCEPTANCE
3	2	`[[#24ba6060]]`	E-TERM-OF-ACCEPTANCE
4	1	`[[#24ba5f60]]`	11
4	2	`[[#24ba5f60]]`	7