 TYPE
    fdt$number_comments = 0 .. fdc$maximum_comments;

*copyc fdc$maximum_comments
