anchor.diff:  	[{userdata, [{doc, "On ECUR endRating response send CCA-U"}]}].
   
   receive_final_ecur_class_b(_Config) ->
  -	P1 = price(usage, messages, 1, rand:uniform(1000000)),
  -	OfferId = add_offer([P1], 11),
  -	ProdRef = add_product(OfferId),
  -	MSISDN = list_to_binary(ocs:generate_identity()),
  -	IMSI = list_to_binary(ocs:generate_identity()),
  -	Subscriber = {MSISDN, IMSI},
  -	Password = ocs:generate_identity(),
  -	{ok, #service{}} = ocs:add_service(MSISDN, Password, ProdRef, []),
  -	B1 = bucket(messages, 5),
  -	_BId = add_bucket(ProdRef, B1),
  +	MSISDN = list_to_binary(ocs:generate_identity()),
  +	IMSI = list_to_binary(ocs:generate_identity()),
  +	Subscriber = {MSISDN, IMSI},
   	Ref = erlang:ref_to_list(make_ref()),
   	SId = diameter:session_id(Ref),
   	RequestNum0 = 0,
  
positive.code: 	Answer0 = diameter_scur_start(SId, Subscriber, RequestNum0, RequestedServiceUnits),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer0,
  	RequestNum1 = RequestNum0 + 1,
  	InputOctets2 =  rand:uniform(Balance div 2),
  	OutputOctets2 = rand:uniform(200),
  	UsedServiceUnits = {InputOctets2, OutputOctets2},
  	Answer1 = diameter_scur_interim(SId, Subscriber, RequestNum1, UsedServiceUnits, 0),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer1,
  	RequestNum2 = RequestNum1 + 1,
  	Grant2 = rand:uniform(Balance div 2),
  	Answer2 = diameter_scur_stop(SId, Subscriber, RequestNum2, Grant2),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer2.
  
  
negative.code: 	[{userdata, [{doc, "On SCUR endRatingresponse send CCA-T"}]}].
  
  receive_final_scur_class_b(_Config) ->
  	MSISDN = list_to_binary(ocs:generate_identity()),
  	IMSI = list_to_binary(ocs:generate_identity()),
  	Subscriber = {MSISDN, IMSI},
  	Ref = erlang:ref_to_list(make_ref()),
  	SId = diameter:session_id(Ref),
  	RequestNum0 = 0,
  