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: 				octets ->
  					#'3gpp_ro_Granted-Service-Unit'{'CC-Total-Octets' = [GrantedAmount]}
  			end,
  			{Reply, NewState} = generate_diameter_answer(Request, SId, Subscriber,
  					GrantedUnits, ?'DIAMETER_BASE_RESULT-CODE_SUCCESS', OHost, ORealm,
  					RequestType, RequestNum, State),
  			{reply, Reply, NewState};
  
negative.code: 			{reply, Reply1, NewState0}
  	end.
  
  -spec generate_diameter_answer(Request, SessionId, GrantedUnits,
  		ResultCode, OriginHost, OriginRealm, RequestType, RequestNum,
  		State) -> Result
  			when
  				Request :: #'3gpp_ro_CCR'{},
  				SessionId :: string(),
  				GrantedUnits :: undefined | #'3gpp_ro_Granted-Service-Unit'{},
  				ResultCode :: integer(),
  				OriginHost :: string(),
  