anchor.diff:  end;
   
   function TOpMultiOperation.toString: String;
  -var i : Integer;
  -  ssenders,sreceivers,schanges : String;
  -begin
  -  ssenders := '';
  -  for i:=low(FData.txSenders) to High(FData.txSenders) do begin
  -    ssenders := ssenders + Format('%d:(%s;%s;%d)',[i+1,TAccountComp.AccountNumberToAccountTxtNumber(FData.txSenders[i].Account),
  -        TAccountComp.FormatMoney(FData.txSenders[i].Amount),FData.txSenders[i].N_Operation]);
  -  end;
  -  sreceivers:='';
  -  for i:=low(FData.txReceivers) to High(FData.txReceivers) do begin
  -    sreceivers := sreceivers + Format('%d:(%s;%s)',[i+1,TAccountComp.AccountNumberToAccountTxtNumber(FData.txReceivers[i].Account),
  -        TAccountComp.FormatMoney(FData.txReceivers[i].Amount)]);
  -  end;
  -  schanges := '';
  -  for i:=low(FData.changesInfo) to High(FData.changesInfo) do begin
  -    schanges := schanges + Format('%d:(%s;%d)',[i+1,TAccountComp.AccountNumberToAccountTxtNumber(FData.changesInfo[i].Account),
  -        FData.changesInfo[i].N_Operation]);
  -  end;
  -  Result := Format('Multioperation senders %s receivers %s changes %s Amount:%s Fees:%s',
  -    [ssenders,sreceivers,schanges,
  +begin
  +  Result := Format('Multioperation senders:%d receivers:%d changes:%d Amount:%s Fees:%s',
  +    [length(FData.txSenders),length(FData.txReceivers),length(FData.changesInfo),
        TAccountComp.FormatMoney(FTotalAmount),
        TAccountComp.FormatMoney(FTotalFee)]);
   end;
  
positive.code:     end;
    end;
    // Execute!
    If Not AccountTransaction.TransferAmounts(AccountPreviousUpdatedBlock,
      senders,senders_n_operation,senders_amount,
      receivers,receivers_amount,errors) then Begin
      TLog.NewLog(ltError,ClassName,'FATAL ERROR DEV 20180312-1 '+errors); // This must never happen!
      Raise Exception.Create('FATAL ERROR DEV 20180312-1 '+errors); // This must never happen!
      Exit;
    end;
    for i:=Low(FData.changesInfo) to High(FData.changesInfo) do begin
      chi := FData.changesInfo[i];
  
negative.code:       end;
      end;
      Result := AddTx(txsenders,txreceivers,False); // Important: Set in same order!
      Result := Result And AddChangeInfos(changes,False); // Important: Set in same order!
    Except
      On E:Exception do begin
        TLog.NewLog(lterror,Self.ClassName,'('+E.ClassName+'):'+E.Message);
  