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 
 |  Method GetUserGroups () as String id:Method_ApplicationMacroPlanner_GetUserGroups 
 |  { 
 |    #keys: '[134266.1.2113360458]' 
 |    Body: 
 |    [* 
 |      // Get user group 
 |      currentuser := QuintiqUser::CurrentUser(); 
 |       
 |      ug := selectset( Domain, UserGroupDefinitions.Elements, ug, currentuser.IsMemberOfGroup( ug.Name() ), true ); 
 |      ugs := '' 
 |      traverse( ug, Elements, u ) 
 |      { 
 |        ugs := ugs + ';' + u.Name(); 
 |      } 
 |       
 |       
 |      return ugs; 
 |    *] 
 |  } 
 |  
  |