1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method GetOtherSystemsWithCommonChannel (String channelName_i) declarative as owning LibDEF_Systems 
 |  { 
 |    Description: 'Get all other Systems with common channel, except this.' 
 |    TextBody: 
 |    [* 
 |      // Jacky CHAN May-9-2016 (created) 
 |      otherSystems := selectset( this, DataBroker.System, system, 
 |                                 system <> this, 
 |                                 exists( system, ChannelMeta, channelMeta, 
 |                                         channelMeta.Name() = channelName_i ) ); 
 |       
 |      return &otherSystems; 
 |    *] 
 |  } 
 |  
  |