anchor.diff:          t2 := LAYER_TABLE;
           Result := aTablePrefix+t1+' t1 JOIN '+aTablePrefix+t2+' t2 ON t1.OBJECT_ID=t2.OBJECT_ID';
           aShapePrefix := 't1.';
  +        aObjectIDPrefix := aShapePrefix;
         end
         else
         begin
  
positive.code: var
    join: string;
    ShapePrefix: string;
  begin
    join := BuildJoin(aTablePrefix, ShapePrefix);
    case LAYER_TYPE mod 100 of
      2:
        begin
  
negative.code:             TEXTURE_EXPR+','+
              ShapePrefix+'SHAPE '+
            'FROM '+join+' '+
            'WHERE '+ObjectIDPrefix+'OBJECT_ID=:OBJECT_ID';
          if JOINCONDITION<>''
          then Result := Result+' AND '+PreJoin+JOINCONDITION;
        end;
      21:
        begin
  