anchor.diff:  					octets ->
   						#'3gpp_ro_Granted-Service-Unit'{'CC-Total-Octets' = [GrantedAmount]}
   				end,
  -				{Reply, NewState} = generate_diameter_answer(Request, SId, Subscriber,
  +				{Reply, NewState} = generate_diameter_answer(Request, SId,
   						GrantedUnits, ?'DIAMETER_BASE_RESULT-CODE_SUCCESS', OHost, ORealm,
   						RequestType, RequestNum, State),
   				{reply, Reply, NewState};
  
positive.code: 			{reply, Reply1, NewState0}
  	end.
  
  -spec generate_diameter_answer(Request, SessionId, Subscriber, GrantedUnits,
  		ResultCode, OriginHost, OriginRealm, RequestType, RequestNum,
  		State) -> Result
  			when
  				Request :: #'3gpp_ro_CCR'{},
  				SessionId :: string(),
  				Subscriber :: string() | binary(),
  				GrantedUnits :: undefined | #'3gpp_ro_Granted-Service-Unit'{},
  				ResultCode :: integer(),
  				OriginHost :: string(),
  
negative.code: 	ok = ocs_log:acct_log(diameter, Server,
  			accounting_event_type(RequestType), Request, Reply),
  	{Reply, State};
  generate_diameter_answer(Request, SId, GrantedUnits, ResultCode, OHost,
  		ORealm, RequestType, RequestNum, #state{address = Address,
  		port = Port} = State) ->
  	MultiServices_CC = #'3gpp_ro_Multiple-Services-Credit-Control'{
  