1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| Quintiq file version 2.0
| #parent: #root
| MethodOverride ScopeElementsConst (Type type, const constcontent LibOpt_Groups groups) const declarative remote as constcontent owning LibOpt_ScopeElements
| {
| TextBody:
| [*
| sss := null( LibOpt_ScopeShareds, owning, constcontent );
| ssoss := selectset( this, ScopeSharedOnScope, ssos, not isnull( ssos.Group() ) and groups.Find( ssos.Group() ) >= 0 );
| 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 );
| *]
| }
|
|
