anchor.diff:  begin
     list := LockPCOperationsStorage;
     try
  -    strings.Add(Format('%s Operations:%d Added:%d Deleted:%d',[ClassName,list.Count,FIntTotalAdded,FIntTotalDeleted]));
  +    strings.Add(Format('%s Operations:%d NewAdded:%d Added:%d Deleted:%d',[ClassName,list.Count,FIntTotalNewOps,FIntTotalAdded,FIntTotalDeleted]));
       strings.Add(Format('MaxLocks:%d MaxLocksCount:%d',[FMaxLocksValue,FMaxLocksCount]));
       for i:=0 to list.Count-1 do begin
         P := PPCOperationTStorage(list[i]);
  
positive.code: constructor TPCOperationsStorage.Create;
  begin
    FPCOperationsStorageList := TPCThreadList.Create(ClassName);
    FIntTotalAdded := 0;
    FIntTotalDeleted := 0;
    FMaxLocksCount := 0;
  
negative.code:   // propagating operations to connected nodes, will only use one instance
    TPCOperationsStorage = Class
    private
      FIntTotalNewOps : Integer;
      FIntTotalAdded : Integer;
      FIntTotalDeleted : Integer;
      FMaxLocksCount : Integer;
  