 TYPE
    fdt$number_events = 0 .. fdc$maximum_events;

*copyc fdc$maximum_events
