anchor.diff:  					seconds ->
   						#'3gpp_ro_Granted-Service-Unit'{'CC-Time' = [GrantedAmount]};
   					octets ->
  -						#'3gpp_ro_Granted-Service-Unit'{'CC-Total-Octets' = [GrantedAmount]}
  +						#'3gpp_ro_Granted-Service-Unit'{'CC-Total-Octets' = [GrantedAmount]};
  +					messages ->
  +						#'3gpp_ro_Granted-Service-Unit'{'CC-Service-Specific-Units' = [GrantedAmount]}
   				end,
   				Reply = generate_diameter_answer(SId,
   						GrantedUnits, ?'DIAMETER_BASE_RESULT-CODE_SUCCESS', OHost, ORealm,
  
positive.code: 					'CC-Input-Octets' = [CCInputOctets]} when is_integer(CCInputOctets),
  					is_integer(CCOutputOctets) ->
  				{octets, CCInputOctets + CCOutputOctets};
  			[] ->
  				throw(used_amount_not_available)
  		end,
  
negative.code: 				'CC-Input-Octets' = [CCInputOctets]} when is_integer(CCInputOctets),
  				is_integer(CCOutputOctets) ->
  			{octets, CCOutputOctets + CCOutputOctets};
  		#'3gpp_ro_Requested-Service-Unit'{'CC-Service-Specific-Units' = [CCSpecUnits]} when
  				is_integer(CCSpecUnits) ->
  			{messages, CCSpecUnits};
  		_ ->
  			throw(unsupported_request_units)
  	end,
  