anchor.diff:  		receive_interim_scur, send_final_scur, receive_final_scur,
   		receive_interim_no_usu_scur, receive_initial_empty_rsu_scur,
   		post_initial_scur, post_update_scur, post_final_scur, send_iec,
  -		receive_iec, send_initial_ecur, receive_initial_ecur].
  +		receive_iec, send_initial_ecur, receive_initial_ecur,
  +		send_final_ecur, receive_final_ecur].
   
   %%---------------------------------------------------------------------
   %%  Test cases
  
positive.code: 	Ref = erlang:ref_to_list(make_ref()),
  	SId = diameter:session_id(Ref),
  	RequestNum = 0,
  	RequestType = ?'3GPP_CC-REQUEST-TYPE_INITIAL_REQUEST',
  	Answer0 = diameter_ecur_start(Subscriber, SId, RequestNum),
  	#'3gpp_ro_CCA'{'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_SUCCESS',
  			'Auth-Application-Id' = ?RO_APPLICATION_ID,
  			'CC-Request-Type' = RequestType,
  			'CC-Request-Number' = RequestNum,
  			'Multiple-Services-Credit-Control' = [MultiServices_CC]} = Answer0,
  	#'3gpp_ro_Multiple-Services-Credit-Control'{
  			'Granted-Service-Unit' = [UsedUnits]} = MultiServices_CC,
  	#'3gpp_ro_Granted-Service-Unit'{'CC-Service-Specific-Units' = [1]} = UsedUnits.
  
  %%---------------------------------------------------------------------
  %%  Internal functions
  
negative.code: 	IMSI1 = #'3gpp_ro_Subscription-Id'{
  			'Subscription-Id-Type' = ?'3GPP_SUBSCRIPTION-ID-TYPE_END_USER_IMSI',
  			'Subscription-Id-Data' = IMSI},
  	UsedUnits = #'3gpp_ro_Used-Service-Unit'
  			{'CC-Service-Specific-Units' = [2]},
  	MultiServices_CC = #'3gpp_ro_Multiple-Services-Credit-Control'{
  			'Used-Service-Unit' = [UsedUnits], 'Service-Identifier' = [1],
  			'Rating-Group' = [2]},
  	ServiceInformation = #'3gpp_ro_Service-Information'{
  			'SMS-Information' = [#'3gpp_ro_SMS-Information'{
  