anchor.diff:                          begin
                             cds := TCodeDisplays.Create;
                             try
  -                            if passesImports(imports, cs.systemUri(nil), cs.code(c), 0) then
  +                            if passesImports(valueSets, cs.systemUri(nil), cs.code(c), 0) then
                               begin
                                 listDisplays(cds, cs, c);
                                 processCode(doDelete, limitCount, list, map, cs.systemUri(nil), cs.version(nil), cs.code(c), cds, cs.definition(c), expansion, nil);
  
positive.code:       end;
      end;
    finally
      imports.Free;
    end;
  end;
  
  
negative.code:     end;
    end;
  begin
    valueSets := TFslList<TFHIRImportedValueSet>.create;
    try
      FFactory.checkNoModifiers(cset,'ValueSetExpander.processCodes', 'set');
  
      if cset.systemUri = '' then
      begin
        for s in cset.valueSets do
          valueSets.add(TFHIRImportedValueSet.create(expandValueset(s, filter.filter, dependencies, notClosed)));
        if doDelete then
          excludeValueSet(list, map, valueSets[0].valueSet, expansion, valueSets, 1)
        else
          importValueSet(list, map, valueSets[0].valueSet, expansion, valueSets, 1);
      end
      else
      begin
  