anchor.diff:  
   procedure TCountryCodeServices.Close(ctxt: TCodeSystemProviderFilterPreparationContext);
   begin
  -  raise ETerminologyTodo.create('TCountryCodeServices.Close');
  +  // nothing
   end;
   
   
  
positive.code: 
  function TCountryCodeServices.filterLocate(ctxt : TCodeSystemProviderFilterContext; code : String; var message : String) : TCodeSystemProviderContext;
  begin
    raise ETerminologyTodo.create('TCountryCodeServices.filterLocate');
  end;
  
  function TCountryCodeServices.FilterMore(ctxt : TCodeSystemProviderFilterContext) : boolean;
  
negative.code: function TCountryCodeServices.prepare(prep : TCodeSystemProviderFilterPreparationContext) : boolean;
  begin
    // nothing
    result := false;
  end;
  
  function TCountryCodeServices.searchFilter(filter : TSearchFilterText; prep : TCodeSystemProviderFilterPreparationContext; sort : boolean) : TCodeSystemProviderFilterContext;
  