anchor.diff:  	 init/0,
   	 create/0,
   	 create/1,
  -	 insert_phone/5,
  +	 remove_expired_phones/0,
  +	 get_sipuser_location_binding/2,
  +	 get_sipuser_locations/1,
   	 get_phone/1,
   	 list_phones/0,
   	 get_user/1,
   	 insert_user/4,
   	 list_users/0,
  -	 insert_purge_phone/5,
  -	 insert_purge_class_phone/5,
  +	 insert_purge_phone/7,
   	 purge_class_phone/2,
   	 expired_phones/0,
   	 delete_record/1,
  
positive.code: %% Descrip.: Removes all entrys matching a number (SIP user), class
  %%           and address from the location database.
  %% Returns : The result of the Mnesia transaction
  %%--------------------------------------------------------------------
  delete_phone(SipUser, Class, Address) when is_record(Address, sipurl) ->
      AddressStr = sipurl:print(Address),
  
negative.code: %% Descrip.: Removes all entrys matching a number (SIP user),
  %%           and class from the location database.
  %% Returns : The result of the mnesia:transaction()
  %% XXX only used in admin_www.erl
  %%--------------------------------------------------------------------
  purge_class_phone(Number, Class) ->
      Fun = fun() ->
  