anchor.diff:  		'PS-Information' = [#'3gpp_ro_PS-Information'{
   		'3GPP-SGSN-MCC-MNC' = [MccMnc]}]}]) ->
   	MccMnc;
  +service_network([#'3gpp_ro_Service-Information'{
  +		'IMS-Information' = [#'3gpp_ro_IMS-Information'{
  +		'Access-Network-Information' = [ANI]}]}]) ->
  +	{MCC, MNC, _ } = access_info(string:tokens(binary_to_list(ANI), ",")),
  +	MCC ++ MNC;
   service_network(_) ->
   	undefined.
  +
  +%% @hidden
  +access_info([H | T]) ->
  +	case access_info1(string:tokens(H, ";")) of
  +		ID when length(ID) > 0 ->
  +			ocs_diameter:plmn(ID);
  +		[] ->
  +			access_info(T)
  +	end.
  +%% @hidden
  +access_info1(["utran-cell-id-3gpp=" ++ CID | _]) ->
  +	CID;
  +access_info1(["cgi-3gpp=" ++ CGI | _]) ->
  +	CGI;
  +access_info1(["cgi-3gpp2=" ++ CGI | _]) ->
  +	CGI;
  +access_info1(["ci-3gpp2-femto=" ++ CGI | _]) ->
  +	CGI;
  +access_info1(["extension-access-info=" ++ CGI | _]) ->
  +	CGI;
  +access_info1([_ | T]) ->
  +   access_info1(T);
  +access_info1([]) ->
  +	[].
   
   -spec get_mscc(MSCC) -> Result
   	when
  
positive.code: 		Peer :: peer() | false,
  		Result :: Selection | false.
  %% @doc Invoked as a consequence of a call to diameter:call/4 to select
  %% a destination peer for an outgoing request. 
  pick_peer([Peer | _] = _LocalCandidates, _RemoteCandidates, _ServiceName, _State) ->
  	{ok, Peer}.
  
  
negative.code: 				| {error, Reason ::term()},
  		MSCC :: #'3gpp_ro_Multiple-Services-Credit-Control'{},
  		ResultCode :: pos_integer(),
  		Rated :: [#rated{}].
  %% @doc Rate all the MSCCs.
  %% @hidden
  rate(ServiceType, ServiceNetwork, Subscriber, Timestamp,
  