CloneSet113


Previous CloneSetNext CloneSetBack to Main Report
Clone
Mass
Clones in
CloneSet
Parameter
Count
Clone
Similarity
Syntax Category
[Sequence Length]
18220.988subsidiary_description_entry_list
Clone AbstractionParameter Bindings
Clone Instance
(Click to see clone)
Line CountSource Line
Source File
118294
CCCC13.COB
218326
CCCC4.COB
Clone Instance
1
Line Count
18
Source Line
294
Source File
CCCC13.COB

           03  HOLD-COLLEGE-ID         PIC X(3).
           03  HOLD-TIME.
               05  HH-MM               PIC 9(4).
               05  FILLER              PIC 9(4).
           03  PRT-PAGE-MAXIMUM        PIC 9(6)   VALUE ZERO.
           03  PRT-CNTL-INVALID-LITERAL
                                       PIC X(36)
                       VALUE '  PRINT CONTROL MISSING OR INVALID'.
           03  TERM-ID-INVALID-LITERAL PIC X(30)
                       VALUE '  TERM CODE MISSING OR INVALID'.
           03  DISTRICT-ID-INVALID-LITERAL
                                       PIC X(32)
                       VALUE '  DISTRICT ID MISSING OR INVALID'.
           03  COLLEGE-INVALID-LITERAL
                                       PIC X(31)
                       VALUE '  COLLEGE ID MISSING OR INVALID'.
           03  ORIGINAL-INDEX-VALUE    USAGE IS INDEX.
           03  NOT-APPLICABLE-LITERAL  PIC X(3)   VALUE 'N/A'.


Clone Instance
2
Line Count
18
Source Line
326
Source File
CCCC4.COB

           03  HOLD-DISTRICT-NAME      PIC X(30).
           03  HOLD-TIME.
               05  HH-MM               PIC 9(4).
               05  FILLER              PIC 9(4).
           03  PRT-PAGE-MAXIMUM        PIC 9(6)   VALUE ZERO.
           03  PRT-CNTL-INVALID-LITERAL
                                       PIC X(36)
                       VALUE '  PRINT CONTROL MISSING OR INVALID'.
           03  TERM-ID-INVALID-LITERAL PIC X(30)
                       VALUE '  TERM CODE MISSING OR INVALID'.
           03  DISTRICT-ID-INVALID-LITERAL
                                       PIC X(32)
                       VALUE '  DISTRICT ID MISSING OR INVALID'.
           03  COLLEGE-INVALID-LITERAL
                                       PIC X(31)
                       VALUE '  COLLEGE ID MISSING OR INVALID'.
           03  ORIGINAL-INDEX-VALUE    USAGE IS INDEX.
           03  NOT-APPLICABLE-LITERAL  PIC X(3)   VALUE 'N/A'.


Clone AbstractionParameter Count: 2Parameter Bindings

       03   [[#24b859e0]]
           PIC [[#24b85840]].
       03  HOLD-TIME.
           05 HH-MM
              PIC 9(4).
           05 FILLER
              PIC 9(4).
       03  PRT-PAGE-MAXIMUM
           PIC 9(6)
           VALUE ZERO.
       03  PRT-CNTL-INVALID-LITERAL
           PIC X(36)
           VALUE '  PRINT CONTROL MISSING OR INVALID'.
       03  TERM-ID-INVALID-LITERAL
           PIC X(30)
           VALUE '  TERM CODE MISSING OR INVALID'.
       03  DISTRICT-ID-INVALID-LITERAL
           PIC X(32)
           VALUE '  DISTRICT ID MISSING OR INVALID'.
       03  COLLEGE-INVALID-LITERAL
           PIC X(31)
           VALUE '  COLLEGE ID MISSING OR INVALID'.
       03  ORIGINAL-INDEX-VALUE
           USAGE IS INDEX.
       03  NOT-APPLICABLE-LITERAL
           PIC X(3)
           VALUE 'N/A'.
 

CloneAbstraction
Parameter Bindings
Parameter
Index
Clone
Instance
Parameter
Name
Value
11[[#24b859e0]]
       HOLD-COLLEGE-ID 
12[[#24b859e0]]
       HOLD-DISTRICT-NAME 
21[[#24b85840]]
       X(3) 
22[[#24b85840]]
       X(30)