 TYPE
    fdt$occurrence = 1 .. fdc$maximum_occurrence;

*copyc fdc$maximum_occurrence
