anchor.diff:        end;
         TLog.NewLog(ltinfo,CT_LogSender,'My blockchain is not equal... received: '+TPCOperationsComp.OperationBlockToText(client_op)+' My: '+TPCOperationsComp.OperationBlockToText(my_op));
         if Not FindLastSameBlockByOperationsBlock(0,client_op.block,client_op) then begin
  -        TLog.NewLog(ltinfo,CT_LogSender,'No found base block to start process... Receiving ALL');
  -        If (Connection.FRemoteOperationBlock.protocol_version>=CT_PROTOCOL_2) then begin
  -          DownloadSafeBox(False);
  -        end else begin
  -          GetNewBank(-1);
  -        end;
  +        Connection.DisconnectInvalidClient(false,'No found any base block to start process...');
  +        Exit;
         end else begin
           // Move operations to orphan folder... (temporal... waiting for a confirmation)
           if (TNode.Node.Bank.Storage.FirstBlock<client_op.block) then begin
  
positive.code:     repeat
        BlocksList := TList.Create;
        try
          If Not Do_GetOperationsBlock(Nil,min,max,5000,true,BlocksList) then exit;
          if (BlocksList.Count=0) then begin
            Connection.DisconnectInvalidClient(false,'No received info for blocks from '+inttostr(min)+' to '+inttostr(max));
            exit;
  
negative.code:         end else begin
            // Restore a part from disk
            Bank.DiskRestoreFromOperations(start_block-1);
            Bank.Storage.SaveBank(True);
            if (Bank.BlocksCount<start_block) then begin
              TLog.NewLog(lterror,CT_LogSender,Format('No blockchain found start block %d, current %d',[start_block-1,Bank.BlocksCount]));
              start_block := Bank.BlocksCount;
  