1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  DeclarativeOwningNMRelation CalcAllSuperTypes 
 |  { 
 |    #keys: '1[138112.0.821080152]' 
 |    Expression: 
 |    [* 
 |      supertypestrings := this.TypeHierarchy().Tokenize( ',' ); 
 |      supertypes := selectset( this, Root.ClassTypes, classtype, 
 |                               exists( supertypestrings, Elements, supertypestring, 
 |                                       supertypestring = classtype.Name() ) ); 
 |      return &supertypes; 
 |    *] 
 |    HelperRelation: SuperType 
 |    InstantiationType: Lib3DS_ClassTypeOnClassType 
 |    Relation: AllSuperTypes 
 |  } 
 |  
  |