TYPE
  iit$vt_input_header = packed record
    fill_0: 0 .. 07(16),
    message_type: iit$vt_message_types,
  recend;

*copyc iit$vt_message_types
