01  CLASS-OUT.
            05  CCNUM-OUT               PIC  X(14).
            05  CCDESC-OUT              PIC  X(40).
            05  CL-OUT                  PIC  X(14).
            05  CLDESC-OUT              PIC  X(38).