1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method Count (const LibOpt_Task task) const as Number 
 |  { 
 |    Description: 'Count the amount of messages in the channel.' 
 |    TextBody: 
 |    [* 
 |      id := this.Channel().GetAlgorithmStoreID( task, false ); 
 |      algorithm := this.Channel().GetAlgorithm( id ); 
 |       
 |      count := RealToNumber::ISOConverter().Convert( algorithm.RetrieveReal( LibOpt_Channel::Algorithm_Count() ) ); 
 |       
 |      AlgorithmStore::Store( id, & algorithm ); 
 |       
 |      return count; 
 |    *] 
 |  } 
 |  
  |