CloneSet109


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
14420.961sentence_list[9]
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
1145042
CCCC11.COB
2145579
CCCC2.COB
3144583
CCCC4.COB
4144213
CCCC8.COB
Clone Instance
1
Line Count
14
Source Line
5042
Source File
CCCC11.COB

           MOVE 5 TO HEADER-CONTROL-FLAG.
           MOVE SUM2-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE DIST-INTEGRITY-ERR-1-TOTAL TO INTEGRITY-TOTAL.
           MOVE INTEGRITY-ERR-1-DESC TO INTEGRITY-DESCRIPTION.
           WRITE PRINT-RECORD-2
             FROM       INTEGRITY-TOTAL-DETAIL-LINE
                   AFTER ADVANCING 2 LINES.
           MOVE SPACES TO PRINT-RECORD-2.


Clone Instance
2
Line Count
14
Source Line
5579
Source File
CCCC2.COB

           MOVE 5 TO HEADER-CONTROL-FLAG.
           MOVE SUM2-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE DIST-INTEGRITY-ERR-1-TOTAL TO INTEGRITY-TOTAL.
           MOVE INTEGRITY-ERR-1-DESC TO INTEGRITY-DESCRIPTION.
           WRITE PRINT-RECORD-2
             FROM       INTEGRITY-TOTAL-DETAIL-LINE
                   AFTER ADVANCING 2 LINES.
           MOVE DIST-INTEGRITY-ERR-2-TOTAL TO INTEGRITY-TOTAL.


Clone Instance
3
Line Count
14
Source Line
4583
Source File
CCCC4.COB

           MOVE 5 TO HEADER-CONTROL-FLAG.
           MOVE SUM2-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE DIST-INTEGRITY-ERR-1-TOTAL TO INTEGRITY-TOTAL.
           MOVE INTEGRITY-ERR-1-DESC TO INTEGRITY-DESCRIPTION.
           WRITE PRINT-RECORD-2
             FROM       INTEGRITY-TOTAL-DETAIL-LINE
                   AFTER ADVANCING 2 LINES.
           MOVE SPACES TO PRINT-RECORD-2.


Clone Instance
4
Line Count
14
Source Line
4213
Source File
CCCC8.COB

           MOVE 5 TO HEADER-CONTROL-FLAG.
           MOVE SUM2-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE SUMMARY-PROGRAM-NAME
                   IN PROGRAM-LITERAL-AND-WORK TO
                      PROGRAM-NAME
                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE DIST-INTEGRITY-ERR-1-TOTAL TO INTEGRITY-TOTAL.
           MOVE INTEGRITY-ERR-1-DESC TO INTEGRITY-DESCRIPTION.
           WRITE PRINT-RECORD-2
             FROM       INTEGRITY-TOTAL-DETAIL-LINE
                   AFTER ADVANCING 2 LINES.
           MOVE SPACES TO PRINT-RECORD-2.


Clone AbstractionParameter Count: 2Parameter Bindings

           MOVE 5 TO HEADER-CONTROL-FLAG.
           MOVE SUM2-PROGRAM-LIT TO REPORT-ID-LIT.
           MOVE SUMMARY-PROGRAM-NAME
                  IN PROGRAM-LITERAL-AND-WORK TO PROGRAM-NAME
                                                   IN HEADER-REPORT-ID.
           PERFORM 85002-PRINT-HEADERS.
           MOVE SPACES TO PRINT-RECORD-2.
           MOVE DIST-INTEGRITY-ERR-1-TOTAL TO INTEGRITY-TOTAL.
           MOVE INTEGRITY-ERR-1-DESC TO INTEGRITY-DESCRIPTION.
           WRITE PRINT-RECORD-2
             FROM INTEGRITY-TOTAL-DETAIL-LINE
             AFTER ADVANCING 2 LINES.
           MOVE [[#24b64600]]TO [[#24b7ec40]].
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b64600]]
           SPACES 
12[[#24b64600]]
           DIST-INTEGRITY-ERR-2-TOTAL 
13[[#24b64600]]
           SPACES 
14[[#24b64600]]
           SPACES 
21[[#24b7ec40]]
       PRINT-RECORD-2 
22[[#24b7ec40]]
       INTEGRITY-TOTAL 
23[[#24b7ec40]]
       PRINT-RECORD-2 
24[[#24b7ec40]]
       PRINT-RECORD-2