*copyc csc$max_line_number
  TYPE
    cst$lines_used = 0 .. csc$max_line_number;
