yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
Quintiq file version 2.0
#parent: #root
Method GenerateNodes (NamedValueTree nvt, NamedValue nv, structured[NamedValue] set) id:Method_DialogSettingsEngine_GenerateNodes
{
  #keys: '[139164.3.1812416689]'
  Body:
  [*
    handle_metadata := nvt.GetHandle( LibSE_SettingsContainer::Handle_Metadata() );
    handle_exclude  := nvt.GetHandle( LibSE_SettingsContainer::Handle_Exclude() );
    metadata := guard( nv.Child( handle_metadata ), null( NamedValue ) );
    exclude  := guard( metadata.Child( handle_exclude ), null( NamedValue ) );
    
    if( isnull( exclude ) )
    {
      set.Add( nv );
      
      if( nv.Children().Size() = 0
          or ( nv.Children().Size() = 1 and not isnull( metadata ) ) )
      {
        setting := this.ReadValue( nvt, nv );
        
        path := selectvalues( set, Elements, node, true, node.Name() ).ToString( '.' );
        setting.Name( path );
        
        traverse( set, Elements, node )
        {
          setting.SettingNode( relnew,
                               Name := node.Name(),
                               SequenceNr := setting.SettingNode( relsize ) );
        }
        
        if( not isnull( metadata ) )
        {
          handle_description := nvt.GetHandle( LibSE_SettingsContainer::Handle_Description() );
          description := metadata.Child( handle_description );
          if( not isnull( description ) )
          {
            setting.Description( description.GetValueAsString() );
          }
        
          handle_definedby := nvt.GetHandle( LibSE_SettingsContainer::Handle_DefinedBy() );
          definedby := metadata.Child( handle_definedby );
          if( not isnull( definedby ) )
          {
            setting.DefinedBy( definedby.GetValueAsString() );
            setting.OriginalDefinedBy( definedby.GetValueAsString() );
          }
        }
        this.PropagateSettingAttributes( setting );
      }
      else
      {
        traverse( nv.Children(), Elements, child )
        {
          this.GenerateNodes( nvt, child, set );
        }
      }
      
      set.Remove( nv );
    }
  *]
}