Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method ReadAll (const LibOpt_Task task) const as owning Strings 
 | 
{ 
 | 
  Description: 'Read all 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() ) ); 
 | 
    result := construct( Strings ); 
 | 
    for( i := 0; i < count; i++ ) 
 | 
    { 
 | 
      result.Add( algorithm.RetrieveString( LibOpt_Channel::Algorithm_Index( i ) ) ); 
 | 
    } 
 | 
     
 | 
    AlgorithmStore::Store( id, & algorithm ); 
 | 
     
 | 
    return & result; 
 | 
  *] 
 | 
} 
 |