陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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 ScopeElements (Type type, const constcontent LibOpt_Groups groups) declarative remote as owning LibOpt_ScopeElements
{
  TextBody:
  [*
    result := null( LibOpt_ScopeElements, owning );
    seoss := selectset( this, ScopeElementOnScope, seos, not isnull( seos.Group() ) and groups.Find( seos.Group() ) >= 0 );
    if( type.Specializations( relsize ) = 0 )
    {
      type_name := type.Name();  
      result := selectset( seoss, Elements.ScopeElement, se, se.DefinitionName() = type_name );
    }
    else
    {
      typenames := LibOpt_Scope::GetTypeNames( type );
      result := selectset( seoss, Elements.ScopeElement, se, typenames.Find( se.DefinitionName() ) >= 0 );
    }
    return & result;
  *]
}