1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method Write (const LibOpt_Task task, String message) const 
 |  { 
 |    Description: 'Write a message on the `LibOpt_Channel`.' 
 |    TextBody: 
 |    [* 
 |      id := this.Channel().GetAlgorithmStoreID( task, true ); 
 |      this.WriteToAlgorithm( id, message ); 
 |       
 |      notify := selectset( this, Channel.ChannelNotify.Link, link, true ); 
 |      while( not isnull( task ) ) 
 |      { 
 |        if( notify.Find( task.Link() ) >= 0 ) 
 |        { 
 |          id := this.Channel().GetAlgorithmStoreID( task, false ); 
 |          this.WriteToAlgorithm( id, message ); 
 |        } 
 |        task := task.Parent(); 
 |      } 
 |    *] 
 |  } 
 |  
  |