anchor.diff:  	CallingParty = proplists:get_value(calling_party_addr, Params),
   	CallingPartyEnc = encode_sccp_addr(CallingParty),
   	CallingPartyLen = byte_size(CallingPartyEnc),
  -	UserData = proplists:get_value(user_data, Params),
  +	UserData = binarify(proplists:get_value(user_data, Params)),
   	UserDataLen = byte_size(UserData),
   	% variable part
   	CalledPartyPtr = 3,
  
positive.code: 	<<?SCCP_MSGT_UDTS:8, ReturnCause:8, CalledPartyPtr:8, CallingPartyPtr:8, DataPtr:8, Remain/binary>>;
  encode_sccp_msgt(?SCCP_MSGT_ED, Params) ->
  	DstLocalRef = proplists:get_value(dst_local_ref, Params),
  	UserData = proplists:get_value(user_data, Params),
  	UserDataLen = byte_size(UserData),
  	DataPtr = 1,
  	<<?SCCP_MSGT_ED:8, DstLocalRef:24/big, DataPtr:8, UserDataLen:8, UserData/binary>>;
  
negative.code: 
  -compile({parse_transform, exprecs}).
  -export_records([global_title, sccp_addr, sccp_msg]).
  
  binarify(In) when is_binary(In) ->
  	In;
  binarify(In) when is_list(In) ->
  	list_to_binary(In).
  
  parse_point_code(BinPC, PCind) when is_binary(BinPC) ->
  	case PCind of
  