anchor.diff:  	[{userdata, [{doc, "On received ECUR CCR-I send startRating"}]}].
   
   send_initial_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),
   	RequestNum = 0,
  
positive.code: 	[{userdata, [{doc, "On SCUR updateRating response with no USU send CCA-U"}]}].
  
  receive_interim_no_usu_scur_class_b(_Config) ->
  	P1 = price(usage, octets, rand:uniform(10000000), rand:uniform(1000000)),
  	OfferId = add_offer([P1], 4),
  	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, []),
  	Balance = rand:uniform(1000000000),
  	B1 = bucket(octets, Balance),
  	_BId = add_bucket(ProdRef, B1),
  	Ref = erlang:ref_to_list(make_ref()),
  	SId = diameter:session_id(Ref),
  	RequestNum0 = 0,
  	InputOctets1 = rand:uniform(Balance),
  	OutputOctets1 = rand:uniform(Balance),
  	RequestedServiceUnits1 = {InputOctets1, OutputOctets1},
  	Answer0 = diameter_scur_start(SId, Subscriber, RequestNum0, RequestedServiceUnits1),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer0,
  
negative.code: 	[{userdata, [{doc, "On received ECUR CCR-U send endRating"}]}].
  
  send_final_ecur_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,
  