anchor.diff:  					{"oneTimeEventType", "IEC"},
   					{"invocationTimeStamp", InvocationTimeStamp},
   					{"invocationSequenceNumber", Sequence},
  -					{"subscriptionId", {array, format_subs_ids(SubscriberIds)}},
  +					{"subscriptionId", {array, charged_parties(SubscriberIds)}},
   					{"serviceRating",
   							{array, lists:flatten(ServiceRating)}}]},
   	Path = get_option(nrf_uri) ++ ?BASE_URI,
  
positive.code: 							{struct, [{"nodeFunctionality", "OCF"}]}},
  					{"invocationTimeStamp", InvocationTimeStamp},
  					{"invocationSequenceNumber", Sequence},
  					{"subscriptionId", {array, format_subs_ids(SubscriberIds)}},
  					{"serviceRating",
  							{array, lists:flatten(ServiceRating)}}]},
  	ContentType = "application/json",
  
negative.code: 			{error, Reason}
  	end.
  
  -spec charged_parties(Subscribers) -> SubscriptionId
  	when
  		Subscribers :: [Subscriber]
  		Subscriber :: {Type, Id},
  		Type :: msisdn | imsi,
  		Id :: binary(),
  		ChargedParties :: [ChargedParty],
  		ChargedParty :: MSISDN | IMSI,
  		MSISDN :: string(),
  		IMSI :: string().
  %% @doc Format subsriber ids for nrf request.
  charged_parties(Subscribers) ->
  	charged_parties(Subscribers, []).
  %% @hidden
  charged_parties([{msisdn, MSISDN} | T], Acc) ->
  	charged_parties(T, ["msisdn-" ++ binary_to_list(MSISDN) | Acc]);
  charged_parties([{imsi, IMSI} | T], Acc) ->
  	charged_parties(T, ["imsi-" ++ binary_to_list(IMSI) | Acc]);
  charged_parties([_ | T], Acc) ->
  	charged_parties(T, Acc);
  charged_parties([], Acc) ->
  	lists:reverse(Acc).
  
  -spec get_destination(ServiceInformation) -> RequestedPartyAddress
  	when
  