
  TYPE
    avt$numeric_display_format = record
      field_size: ost$string_size,
      case kind : avt$numeric_display_fmt_kind of
      = avc$integer_format =
        radix: 2 .. 16,
        display_radix: boolean,
      = avc$floating_point_format =
        ,
      = avc$fixed_point_format =
        fraction_size: ost$string_size,
      = avc$report_style_format =
        value: string (31),
      casend,
    recend;

*copyc avt$numeric_display_fmt_kind
*copyc ost$string
