1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| Quintiq file version 2.0
| #parent: #root
| MethodOverride ScopeElements (
| Type type,
| const LibOpt_Group group
| ) declarative remote as owning LibOpt_ScopeElements
| {
| TextBody:
| [*
| sss := null( LibOpt_ScopeShareds, owning );
| ssoss := selectset( this, ScopeSharedOnScope, ssos, ssos.Group() = group );
| if( type.Specializations( relsize ) = 0 )
| {
| type_name := type.Name();
| sss := selectset( ssoss, Elements.ScopeShared, ss, ss.Type() = type_name );
| }
| else
| {
| typenames := LibOpt_Scope::GetTypeNames( type );
| sss := selectset( ssoss, Elements.ScopeShared, ss, typenames.Find( ss.Type() ) >= 0 );
| }
| return selectset( sss, Elements.ScopeElement, se, true );
| *]
| }
|
|
