haorenhui
2023-10-30 6d6cc10d9e8e242661da7fd655dec155a09d676c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Quintiq file version 2.0
#parent: #root
Method GetSubgraph () as owning LibOpt_UIGraphNodes
{
  TextBody:
  [*
    vector := BooleanVector::Construct( this.UIGraph().UIGraphNode( relsize ) );
    vector.Set( this.ID(), true );
    
    result := construct( LibOpt_UIGraphNodes );
    result.Add( this );
    
    for( i := 0; i < result.Size(); i++ )
    {
      traverse( result.Element( i ), Outgoing.Destination, node, not vector.Get( node.ID() ) )
      {
        result.Add( node );
        vector.Set( node.ID(), true );
      }
    }
    
    return & result;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}