anchor.diff:      end
       else
         resp.addExtension('inactive', b);
  +  end;
  +  list := TCodeDisplays.create;
  +  try
  +    Displays(ctxt, list);
  +    for cd in list do
  +    begin
  +      p := resp.addProp('other.display');
  +      p.value := factory.makeString(cd.value);
  +    end;
  +  finally
  +    list.free;
     end;
   end;
   
  
positive.code:   qry : TFDBConnection;
    b : boolean;
    p : TFHIRLookupOpRespPropertyW;
  begin
    if hasProp(props, 'inactive', true) then
    begin
  
negative.code:       try
          res.FCode := code;
          repeat
            if (qry.ColString[2] = 'SY') or (res.FDisplay <> '') then
              res.FOthers.Add(qry.ColString[1].trim)
            else
              res.FDisplay := qry.ColString[1].trim;
  