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;
| *]
| }
|
|