1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Quintiq file version 2.0
| #parent: #root
| Method GetCommonChannelNames (LibDEF_System otherSystem_i) as owning Strings
| {
| Description: "Get the names of the ChannelMeta that 'this' System has in common with 'otherSystem_i'."
| TextBody:
| [*
| // Jacky CHAN May-23-2016 (created)
| names := construct( Strings );
|
| traverse( this, ChannelMeta, thisChannel,
| exists( otherSystem_i, ChannelMeta, theirChannel,
| theirChannel.Name() = thisChannel.Name() ) )
| {
| names.Add( thisChannel.Name() );
| }
|
| return &names;
| *]
| }
|
|
