anchor.diff:  	[{userdata, [{doc, "DIAMETER SCUR mid-session out of credit"}]}].
   
   diameter_scur_depletion(_Config) ->
  -	P1 = price(usage, octets, 1000000, rand:uniform(1000000)),
  +	UnitSize = 1000000 + rand:uniform(10000),
  +	P1 = price(usage, octets, UnitSize, rand:uniform(1000000)),
   	OfferId = add_offer([P1], 4),
   	ProdRef = add_product(OfferId),
   	ServiceID = ocs:generate_identity(),
   	{ok, #service{}} = ocs:add_service(ServiceID, undefined, ProdRef, []),
  -	Balance = rand:uniform(1000000000),
  +	Balance = 1000000 + rand:uniform(1000000000),
   	B1 = bucket(octets, Balance),
   	_BId = add_bucket(ProdRef, B1),
   	Ref = erlang:ref_to_list(make_ref()),
  
positive.code: 	DiameterAppVar = [{auth, [{Address, DiameterAuthPort, []}]},
  		{acct, [{Address, DiameterAcctPort, []}]}],
  	ok = application:set_env(ocs, diameter, DiameterAppVar),
  	ok = ocs_test_lib:start(),
  	{ok, ProdID} = ocs_test_lib:add_offer(),
  	Host = atom_to_list(?MODULE),
  	Realm = "acct.sigscale.org",
  	Config1 = [{host, Host}, {realm, Realm}, {product_id, ProdID},
  			{radius_auth_address, Address},
  			{radius_auth_port, RadiusAuthPort},
  			{radius_acct_address, Address},
  
negative.code: 			'Multiple-Services-Credit-Control' = [MSCC2]} = Answer0,
  	#'3gpp_ro_Multiple-Services-Credit-Control'{
  			'Granted-Service-Unit' = [GSU]} = MSCC2,
  	#'3gpp_ro_Granted-Service-Unit'{'CC-Time' = [UnitSize]} = GSU,
  	NewRequestNum = RequestNum + 1,
  	Answer1 = diameter_scur_stop(SId, MSISDN, NewRequestNum, UnitSize),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS',
  