anchor.diff:  	{_, Href} = lists:keyfind("href", 1, Usage),
   	RequestUri2 = HostUrl ++ Href,
   	Request2 = {RequestUri2, [Accept, Authentication]},
  -erlang:display({?MODULE, ?LINE, Request2}),
   	{ok, Result2} = httpc:request(get, Request2, [], []),
   	{{"HTTP/1.1", 200, _OK}, Headers2, Body2} = Result2,
   	{_, AcceptValue} = lists:keyfind("content-type", 1, Headers2),
  
positive.code: 				true;
  			({struct, [{"name", "outputOctets"}, {"value", Octets}]}) when is_integer(Octets) ->
  				true;
  			({struct, [{"name", "acctInputGigaWords"}, {"value", Words}]}) when is_integer(Words) ->
  				true;
  			({struct, [{"name", "acctOutputGigaWords"}, {"value", Words}]}) when is_integer(Words) ->
  				true;
  			({struct, [{"name", "acctInputPackets"}, {"value", Packets}]}) when is_integer(Packets) ->
  				true;
  			({struct, [{"name", "acctOutputPackets"}, {"value", Packets}]}) when is_integer(Packets) ->
  				true;
  			({struct, [{"name", "acctInterimInterval"}, {"value", Interval}]}) when is_integer(Interval) ->
  				true;
  			({struct, [{"name", "acctTerminateCause"}, {"value", Cause}]}) when is_list(Cause) ->
  				true
  	end,
  	true = lists:all(F, UsageCharacteristic).
  
  get_ipdr_usage() ->
  	[{userdata, [{doc,"Get a TMF635 IPDR usage"}]}].
  
negative.code: -include("ocs.hrl").
  -include("ocs_eap_codec.hrl").
  -include_lib("common_test/include/ct.hrl").
  
  %% support deprecated_time_unit()
  -define(SECOND, seconds).
  %-define(SECOND, second).
  
  %%---------------------------------------------------------------------
  %%  Test server callback functions
  