  TYPE
    fdt$invalid_data_character = record
      filler: string (29),
      case defined: boolean of
      = TRUE =
        character: string (1),
      = FALSE =
        ,
      casend,
    recend;

