anchor.diff:  	sua_to_sccp_params(Class, Type, Payload).
   sua_to_sccp_params(Class, Type, Payload) ->
   	sua_to_sccp_params(Class, Type, Payload, []).
  -sua_to_sccp_params(Class, Type, [], List) ->
  +sua_to_sccp_params(_Class, _Type, [], List) ->
   	List;
   sua_to_sccp_params(Class, Type, [{ParTag, {_Len, ParVal}}|Remain], List) ->
   	NewPars = sua_to_sccp_param(Class, Type, ParTag, ParVal),
  
positive.code: 	sccp_to_sua_params(Type, Params).
  sccp_to_sua_params(Type, Params) when is_list(Params) ->
  	sccp_to_sua_params(Type, Params, []).
  sccp_to_sua_params(Type, [], List) ->
  	List;
  sccp_to_sua_params(Type, [{ParTag, ParVal}|Tail], List) ->
  	NewPars = sccp_to_sua_param(Type, ParTag, ParVal),
  	sccp_to_sua_params(Type, Tail, List ++ NewPars).
  
  sccp_to_sua_param(_, protocol_class, Class) ->
  	[{?SUA_IEI_PROTO_CLASS, <<0:24, 0:1, 0:5, Class:2>>}];
  sccp_to_sua_param(_, calling_party_addr, Addr) ->
  	AddrSua = sccp_to_sua_addr(Addr),
  	[{?SUA_IEI_SRC_ADDR, AddrSua}];
  sccp_to_sua_param(_, called_party_addr, Addr) ->
  	AddrSua = sccp_to_sua_addr(Addr),
  	[{?SUA_IEI_DEST_ADDR, AddrSua}];
  sccp_to_sua_param(_, ?SCCP_PNC_SEQUENCING, Par) ->
  	[{?SUA_IEI_SEQ_CTRL, Par}];
  sccp_to_sua_param(_, ?SCCP_PNC_HOP_COUNTER, Hop) ->
  	[{?SUA_IEI_S7_HOP_CTR, <<0:24, Hop:8>>}];
  sccp_to_sua_param(_, ?SCCP_PNC_IMPORTANCE, Imp) ->
  
negative.code: 	#sccp_msg{msg_type = ?SCCP_MSGT_UDTS,
  		parameters = Params}.
  
  sccp_to_sua(#sccp_msg{msg_type = Type, parameters = Params}) ->
  	sccp_to_sua(Type, Params).
  sccp_to_sua(Type, Params) when	Type == ?SCCP_MSGT_UDT;
  				Type == ?SCCP_MSGT_XUDT;
  