

  CONST
    fmc$max_file_editions = 64,
    fmc$max_label_size = 0ffff(16),
    fmc$max_section_size = 2048;


  TYPE
    fmt$static_bam_label_header = record
      name: fmt$label_name,
      size: fmt$label_section_size,
      version: fmt$label_version,
    recend;

  TYPE
    fmt$dynamic_bam_label_header = record
      name: fmt$label_name,
      size: fmt$label_section_size,
      version: fmt$label_version,
    recend;

  TYPE
    fmt$job_label_header = record
      name: fmt$label_name,
      size: fmt$label_section_size,
      version: fmt$label_version,
    recend;

  TYPE
    fmt$label_name = ost$name,
    fmt$label_version = 1 .. fmc$max_file_editions,
    fmt$label_section_size = 0 .. fmc$max_section_size;

?? PUSH (LISTEXT := ON) ??
*copyc OST$NAME
?? POP ??
