anchor.diff:      fCount: Integer;
     private
       function LockedAddValue(const aValue: string; const aDataType: TFieldType; const aCount: Integer): Boolean; override;
  +  public
       function Open: Boolean; override;
       function SQLProperties(aTableAlias: string): string; override;
     end;
  
positive.code:   aJSONProperties: TJSONArray);
  var
    objectPropTable: TUSObjectPropTable;
    jsonProperty, jsonType, jsonValue, jsonName: TJSONValue;
    commitTable: TUSCommitTable;
  begin
    fObjectProperties := aObjectProperties;
  
negative.code: var
    publishEvent: TIMBEventEntry;
    side, counter, objectID: Integer;
    baseQuery, scenarioPrefix, closure, id, idsString, tableName, scenarioName: string;
    valueArray: array of Variant;
    properties, prop: string;
    basicLayer: TUSBasicLayer;
  