*copyc cst$class_name
  TYPE
    cst$menu_class = ^ARRAY [1 .. * {csc$max_classes}] of cst$class_name;
