  CONST
    nfc$max_parameter_short_length = 7f(16);

  TYPE
    nft$parameter_value_length = packed record
      long_length: boolean,
      length: 0 .. nfc$max_parameter_short_length,
    recend;

