Pass list from server to client problem

&AtClient
Procedure Show(Command)

   List = GetList();
     For Each Row In List Do

      Message(Row.Counterparty.Presentation() + ": " + Row.Amount);
  
   EndDo;
   
EndProcedure


&AtServer
Function GetList()

   Query = New Query;   
   
   Query.Text = "SELECT
       |   SUM(MutualSettlementsBalance.AmountBalance) AS Amount,
       |   MutualSettlementsBalance.Counterparty AS Counterparty
       |FROM
       |   AccumulationRegister.MutualSettlements.Balance(&Period, ) AS MutualSettlementsBalance
       |
       |GROUP BY
       |   MutualSettlementsBalance.Counterparty";
             
   Query.SetParameter("Period", Period);
   
   QueryResult = Query.Execute();

   SelectionDetailRecords = QueryResult.Choose();

    List = New ValueList;
  
   While SelectionDetailRecords.Next() Do
      
      List.Add(SelectionDetailRecords);
    
   EndDo;

    Return List;

EndFunction

List = New ValueList;

While SelectionDetailRecords.Next() Do

RecordStructure = New Structure("Amount,Counterparty ");
FillPropertyValues(RecordStructure ,SelectionDetailRecords);
List.Add(RecordStructure );

EndDo;