anchor.diff:  replace_mod1([], Acc) ->
   	{modules, lists:reverse(Acc)}.
   
  +%% @hidden
  +add_offer(Prices, Spec) when is_integer(Spec) ->
  +	add_offer(Prices, integer_to_list(Spec));
  +add_offer(Prices, Spec) ->
  +	Offer = #offer{name = ocs:generate_identity(),
  +	price = Prices, specification = Spec},
  +	{ok, #offer{name = OfferId}} = ocs:add_offer(Offer),
  +	OfferId.
  +
  +%% @hidden
  +add_bucket(ProdRef, Units, RA) ->
  +	Bucket = #bucket{units = Units, remain_amount = RA,
  +			start_date = erlang:system_time(?MILLISECOND),
  +			end_date = erlang:system_time(?MILLISECOND) + 2592000000},
  +	{ok, _, #bucket{id = BId}} = ocs:add_bucket(ProdRef, Bucket),
  +	BId.
  +
  
positive.code: 	add_product_sms, update_product_realizing_service, delete_product,
  	ignore_delete_product, query_product, filter_product,
  	post_hub_balance, delete_hub_balance, notify_create_bucket,
  	notify_delete_bucket,
  	post_hub_product, delete_hub_product, notify_create_product,
  	post_hub_service, delete_hub_service, notify_create_service,
  	post_hub_user, delete_hub_user, post_hub_catalog, delete_hub_catalog,
  
negative.code: 	application:start(inets),
  	Config;
  init_per_testcase(TestCase, Config) when TestCase == notify_create_bucket;
  		TestCase == notify_delete_bucket; TestCase == notify_accumulated_balance;
  		TestCase == notify_create_product; TestCase == notify_create_service;
  		TestCase == notify_product_charge ->
  	true = register(TestCase, self()),
  