 TYPE
    fdt$error_message_length = 0 .. fdc$maximum_error_length;

*copyc fdc$maximum_error_length
