anchor.diff:  						[accept], MatchReq, '_'), []),
   	3 = length(Events).
   
  -acct_query() ->
  +acct_query_radius() ->
      [{userdata, [{doc, "Get matching accounting log events"}]}].
   
  -acct_query(_Config) ->
  +acct_query_radius(_Config) ->
   	Server = {{0,0,0,0}, 1812},
   	Username = ocs:generate_identity(),
   	ClientAddress = {10,0,0,1},
  
positive.code: 	ok = ocs_log:acct_log(diameter, Server, stop, Record, undefined, undefined),
  	ok = fill_acct(rand:uniform(2000), diameter),
  	End = erlang:system_time(?MILLISECOND),
  	MatchSpec = [{#'3gpp_ro_CCR'{'Session-Id' = '$1'}, [{'==', '$1', Sid}], ['$_']}],
  	Fget = fun(_F, {eof, Events}, Acc) ->
  				lists:flatten(lists:reverse([Events | Acc]));
  			(F, {Cont, Events}, Acc) ->
  
negative.code: 						[stop], MatchReq), []),
  	3 = length(Events).
  
  acct_query_diameter() ->
     [{userdata, [{doc, "Get matching accounting log events for diameter"}]}].
  
  acct_query_diameter(_Config) ->
  	Server = {{0,0,0,0}, 1812},
  	ok = fill_acct(1000, diameter),
  	LogInfo = disk_log:info(ocs_acct),
  