package untitled

context CentralHost def:
-- inner most select
computeVolume(c:TupleType(client:Client,accountNumber:Integer)):
 Sequence(TupleType(accountNumber:Integer)) = 
  groupBy_accountNumber
   (transactionsTable->select(t | Date.today-t.date>=period))
      ->select(g | g->collect(t | t.amount)->sum()>=5000)
       ->collect(g | 
        g->collect(t | Tuple{accountNumber:Integer=t.accountNumber}))

endpackage