CloneSet72


Clone Mass	Clones in CloneSet	Parameter Count	Clone Similarity	Syntax Category [Sequence Length]
34	2	0	1.000	sentence_list[27]

Clone Abstraction

Parameter Bindings

Clone Instance (Click to see clone)	Line Count	Source Line	Source File
1	34	4035	CCCC3.COB
2	34	6225	CCCC7.COB

Clone Instance
1

Line Count
34

Source Line
4035

Source File

CCCC3.COB

           MOVE DISTRICT-INT-CNT (1) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '01' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (2) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '02' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (3) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '03' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (4) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '04' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (5) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '05' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (6) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '06' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (7) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '07' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.

Clone Instance
2

Line Count
34

Source Line
6225

Source File

CCCC7.COB

           MOVE DISTRICT-INT-CNT (1) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '01' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (2) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '02' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (3) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '03' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (4) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '04' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (5) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '05' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (6) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '06' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (7) TO
                  INTEGRITY-ERROR-COUNT.
           MOVE '07' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.

Clone Abstraction

Parameter Count: 0

Parameter Bindings

           MOVE DISTRICT-INT-CNT (1) TO INTEGRITY-ERROR-COUNT.
           MOVE '01' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (2) TO INTEGRITY-ERROR-COUNT.
           MOVE '02' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (3) TO INTEGRITY-ERROR-COUNT.
           MOVE '03' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (4) TO INTEGRITY-ERROR-COUNT.
           MOVE '04' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (5) TO INTEGRITY-ERROR-COUNT.
           MOVE '05' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (6) TO INTEGRITY-ERROR-COUNT.
           MOVE '06' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.
           MOVE REPORT-SUM2 TO TOTALS-ID2.
           MOVE DISTRICT-INT-CNT (7) TO INTEGRITY-ERROR-COUNT.
           MOVE '07' TO INTEGRITY-ERROR-CODE.
           WRITE REPORT-TOTALS-RECORD2.

CloneAbstraction

Parameter Bindings
Parameter Index	Clone Instance	Parameter Name	Value
None