 TYPE
    fdt$event_menu = record
      event_label: fdt$event_label,
      event_name: ost$name,
      event_trigger: fdt$event_trigger,
    recend;

*copyc fdt$event_label
*copyc fdt$event_trigger
*copyc ost$name
