anchor.diff:  			'Subscription-Id' = [SubscriptionId],
   			'Multiple-Services-Credit-Control' = [MSCC1],
   			'Service-Information' = [ServiceInformation]},
  -erlang:display({?MODULE, ?LINE, CCR1}),
   	{ok, Answer1} = diameter:call(?MODULE, cc_app_test, CCR1, []),
   	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS',
   			'Auth-Application-Id' = ?RO_APPLICATION_ID,
  
positive.code: 	{ok, Answer1} = diameter:call(?MODULE, cc_app_test, CCR1, []),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer1,
  	RequestNum2 = RequestNum1 + 1,
  	USUTotalOctets = 1,
  	UsedUnits2 = #'3gpp_ro_Used-Service-Unit' {
  			'CC-Total-Octets' = [USUTotalOctets]},
  	MSCC2 = #'3gpp_ro_Multiple-Services-Credit-Control'{
  
negative.code: 			'Service-Information' = [ServiceInformation]},
  	{ok, Answer3} = diameter:call(?MODULE, cc_app_test, CCR2, []),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS'} = Answer3,
  	[#bucket{remain_amount = Balance}] = ocs:get_buckets(ProdRef).
  
  diameter_scur_roaming_voice_ims() ->
  	[{userdata, [{doc, "DIAMETER SCUR "}]}].
  