anchor.diff:      Result := Self.Bank.BlocksCount = TNetData.NetData.MaxRemoteOperationBlock.block;
   end;
   
  +{ TOrderedAccountKeysListHelper }
  +
  +function TOrderedAccountKeysListHelper.GetBalance(IncludePending : boolean = false) : TBalanceSummary;
  +var
  +  i : Integer;
  +  LAccs : TArray<TAccount>;
  +begin
  +  Result := CT_BalanceSummary_Nil;
  +  LAccs := Self.GetAccounts;
  +  for i := Low(LAccs) to High(LAccs) do begin
  +    Inc(Result.TotalPASA);
  +    Inc(Result.TotalPASC, LAccs[i].Balance);
  +  end;
  +end;
  +
  +function TOrderedAccountKeysListHelper.GetAccounts(IncludePending : boolean = false) : TArray<TAccount>;
  +var
  +  i, j : integer;
  +  LAccs : TList<TAccount>;
  +  LAcc : TAccount;
  +  LList : TOrderedCardinalList;
  +  Disposables : TDisposables;
  +begin
  +  LAccs := Disposables.AddObject( TList<TAccount>.Create ) as TList<TAccount>;
  +  for i := 0 to Self.Count - 1 do begin
  +    LList := Self.AccountKeyList[i];
  +    for j := 0 to LList.Count - 1 do begin
  +      if IncludePending then
  +        LAcc := TNode.Node.Operations.SafeBoxTransaction.Account(j)
  +      else
  +        LAcc :=  TNode.Node.Bank.SafeBox.Account(LList.Get(j));
  +      LAccs.Add(LAcc);
  +    end;
  +  end;
  +  Result := LAccs.ToArray;
  +end;
  +
  +function TOrderedAccountKeysListHelper.GetAccountNumbers : TArray<Cardinal>;
  +var
  +  i, j : integer;
  +  LAccs : TList<Cardinal>;
  +  LList : TOrderedCardinalList;
  +  Disposables : TDisposables;
  +begin
  +  LAccs := Disposables.AddObject( TList<Cardinal>.Create ) as TList<Cardinal>;
  +  for i := 0 to Self.Count - 1 do begin
  +    LList := Self.AccountKeyList[i];
  +    for j := 0 to LList.Count - 1 do
  +      LAccs.Add(j);
  +  end;
  +  Result := LAccs.ToArray;
  +end;
  +
   { TSafeBoxHelper }
   
   function TSafeBoxHelper.GetModifiedAccounts(const AAccounts: array of TAccount): TArray<TAccount>;
  
positive.code:     class procedure ExecuteEnlistAccountForSale(); static;
    end;
  
    { TSafeBoxHelper }
  
    TSafeBoxHelper = class helper for TPCSafeBox
    private
      function GetKeysSummaryInternal(UseFilter: boolean; const AFilterKeys: array of TAccountKey; FetchAccounts: boolean = False): TUserSummary;
    public
      function GetModifiedAccounts(const AAccounts: array of TAccount): TArray<TAccount>;
      function GetKeySummary(const AKey: TAccountKey; FetchAccounts: boolean = False): TKeySummary;
      function GetUserSummary(const AKeys: array of TAccountKey; FetchAccounts: boolean = False): TUserSummary;
      function GetSummaryAllKeys: TUserSummary;
    end;
  
    { TNodeHelper }
  
negative.code:   Result := LChanged.ToArray;
  end;
  
  function TSafeBoxHelper.GetBalance(const AKey: TAccountKey; IncludePending: boolean = False): TBalanceSummary;
  begin
    Result := GetBalance([AKey], IncludePending);
  end;
  
  function TSafeBoxHelper.GetBalance(const AKeys: array of TAccountKey; IncludePending: boolean = False): TBalanceSummary;
  begin
    Result := GetBalanceInternal(AKeys, IncludePending);
  end;
  
  function TSafeBoxHelper.GetBalanceInternal(const AKeys: array of TAccountKey; IncludePending: boolean = False): TBalanceSummary;
  var
    i: integer;
    LAcc: TAccount;
    LAccs: THashSet<TAccount>;
    LKeys: THashSet<TAccountKey>;
    GC: TDisposables;
  begin
    // Setup local collections
    LAccs := GC.AddObject(THashSet<TAccount>.Create(TAccountEqualityComparer.Create)) as THashSet<TAccount>;
    LKeys := GC.AddObject(THashSet<TAccountKey>.Create(TAccountKeyEqualityComparer.Create)) as THashSet<TAccountKey>;
  
    // Gather all keys into hashset
    for i := Low(AKeys) to High(AKeys) do
      LKeys.Add(AKeys[i]);
  
    // Gather all referenced accounts
    for i := 0 to Self.AccountsCount - 1 do
    begin
      LAcc := Self.Account(i);
      if LKeys.Contains(LAcc.accountInfo.accountKey) then
        LAccs.Add(LAcc);
    end;
  
    // Build the results
    Result := CT_BalanceSummary_Nil;
    for LAcc in LAccs do begin
      Inc(Result.TotalPASA);
      Inc(Result.TotalPASC, LAcc.Balance);
    end;
  end;
  
  { TAccountComparer }
  