anchor.diff:  ipdr_wlan1([class | T], radius, TimeStamp, stop, Req, Resp, Rated, IPDR) ->
   	Class = proplists:get_value(?Class, Req),
   	NewIPDR = IPDR#ipdr_wlan{class = Class},
  -	ipdr_wlan1(T, diameter, TimeStamp, stop, Req, Resp, Rated, NewIPDR);
  +	ipdr_wlan1(T, radius, TimeStamp, stop, Req, Resp, Rated, NewIPDR);
   ipdr_wlan1([class | T], diameter, TimeStamp, stop, Req, Resp, Rated, IPDR) ->
   	ipdr_wlan1(T, diameter, TimeStamp, stop, Req, Resp, Rated, IPDR);
   ipdr_wlan1([chargeableUnit| T], diameter, TimeStamp, stop, Req, Resp, Rated, IPDR) ->
  
positive.code: 	Cause = proplists:get_value(?AcctTerminateCause, Req),
  	NewIPDR = IPDR#ipdr_wlan{sessionTerminateCause = Cause},
  	ipdr_wlan1(T, radius, TimeStamp, stop, Req, Resp, Rated, NewIPDR);
  ipdr_wlan1([sessionTerminateCause | T], diameter, TimeStamp, stop, Req, Resp, Rated, IPDR) ->
  	ipdr_wlan1(T, diameter, TimeStamp, stop, Req, Resp, Rated, IPDR);
  ipdr_wlan1([nasIpAddress | T], radius, TimeStamp, stop, Req, Resp, Rated, IPDR) ->
  	case radius_attributes:find(?NasIpAddress, Req) of
  		{ok, Address} ->
  
negative.code: ipdr_ims_voip1([ipdrCreationTime | T], Protocol, TimeStamp, ReqType, Req, Res, Rated, IPDR) ->
  	NewIPDR = IPDR#ipdr_voip{ipdrCreationTime = iso8601(TimeStamp)},
  	ipdr_ims_voip1(T, Protocol, TimeStamp, ReqType, Req, Res, Rated, NewIPDR);
  ipdr_ims_voip1([endTime | T], Protocol, TimeStamp, ReqType,
  		#'3gpp_ro_CCR'{'Event-Timestamp' = [EventTimestamp]} = Req,
  		Res, Rated, IPDR) ->
  	NewIPDR = IPDR#ipdr_voip{endTime = iso8601(EventTimestamp)},
  	ipdr_ims_voip1(T, Protocol, TimeStamp, ReqType, Req, Res, Rated, NewIPDR);
  ipdr_ims_voip1([callCompletionCode | T], Protocol, TimeStamp, ReqType,
  		#'3gpp_ro_CCR'{'Multiple-Services-Credit-Control' = [ServiceCreditControl]} = Req,
  		Res, Rated, IPDR) ->
  