anchor.diff:  				Request :: #'3gpp_ro_CCR'{},
   				SessionId :: string(),
   				Subscriber :: string() | binary(),
  -				GrantedUnits :: #'3gpp_ro_Granted-Service-Unit'{},
  +				GrantedUnits :: undefined | #'3gpp_ro_Granted-Service-Unit'{},
   				ResultCode :: integer(),
   				OriginHost :: string(),
   				OriginRealm :: string(),
  
positive.code: 					{origin_host, OHost}]),
  			start_disconnect(SL, State),
  			{Reply, NewState} = generate_diameter_answer(Request, SId, Subscriber,
  					0, ?'IETF_RESULT-CODE_CREDIT_LIMIT_REACHED', OHost,
  					ORealm, ?RO_APPLICATION_ID, RequestType, RequestNum, State),
  			{reply, Reply, NewState};
  		{error, subscriber_not_found} ->
  
negative.code: 				Reply :: #'3gpp_ro_CCA'{}.
  %% @doc Send CCA to DIAMETER client indicating a successful operation.
  %% @hidden
  generate_diameter_answer(Request, SId, _Subscriber, undefined, ResultCode, OHost,
  		ORealm, AuthAppId, RequestType, RequestNum, #state{address = Address,
  		port = Port} = State) ->
  	Reply = #'3gpp_ro_CCA'{'Session-Id' = SId, 'Result-Code' = ResultCode,
  			'Origin-Host' = OHost, 'Origin-Realm' = ORealm,
  			'Auth-Application-Id' = AuthAppId, 'CC-Request-Type' = RequestType,
  			'CC-Request-Number' = RequestNum},
  	Server = {Address, Port},
  	ok = ocs_log:acct_log(diameter, Server,
  			accounting_event_type(RequestType), Request, Reply),
  	{Reply, State};
  generate_diameter_answer(Request, SId, _Subscriber, GrantedUnits, ResultCode, OHost,
  		ORealm, AuthAppId, RequestType, RequestNum, #state{address = Address,
  		port = Port} = State) ->
  