anchor.diff:  	CallingStationId = string:join(MACtokens, "-"),
   	PeerID = string:to_lower(lists:append(MACtokens)),
   	PeerPassword = ocs:generate_password(),
  -	Amount = 1000000,
  -	Now = erlang:system_time(?MILLISECOND),
  -	TD = Now + 86400000,
  -	Buckets = [#bucket{units = octets,
  -			termination_date = TD, remain_amount = Amount}],
  +	Buckets = [#bucket{units = cents, remain_amount = 3000}],
   	{ok, _} = ocs:add_subscriber(PeerID, PeerPassword, ProdID, [], Buckets, []),
   	Authenticator = radius:authenticator(),
   	SharedSecret = ct:get_config(radius_shared_secret),
  
positive.code: 	CallingStationId = string:join(MACtokens, "-"),
  	PeerID = string:to_lower(lists:append(MACtokens)),
  	PeerPassword = ocs:generate_password(),
  	Amount = 1000000,
  	Now = erlang:system_time(?MILLISECOND),
  	TD = Now + 86400000,
  	Buckets = [#bucket{units = octets,
  			termination_date = TD, remain_amount = Amount}],
  	{ok, _} = ocs:add_subscriber(PeerID, PeerPassword, ProdID, [], Buckets, []),
  	Authenticator = radius:authenticator(),
  	SharedSecret = ct:get_config(radius_shared_secret),
  
negative.code: 	CallingStationId = string:join(MACtokens, "-"),
  	PeerID = string:to_lower(lists:append(MACtokens)),
  	PeerPassword = ocs:generate_password(),
  	Buckets = [#bucket{units = cents, remain_amount = 2290}], % subscription total price
  	{ok, Subscriber} = ocs:add_subscriber(PeerID, PeerPassword, ProdID, [], Buckets, []),
  	Authenticator = radius:authenticator(),
  	SharedSecret = ct:get_config(radius_shared_secret),
  	UserPassword = radius_attributes:hide(SharedSecret, Authenticator, PeerPassword),	
  