
  VAR
    iiv$xt_message_control: [XREF] array [1 .. 2] of
          iit$xt_message_control_block;

*copyc iit$xt_message_control_block
