1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method AssignToRoles ( 
 |    SWF_Roles roles 
 |  ) as owning SWF_UserInRoles 
 |  { 
 |    Description: 'Assigns roles [roles] to this user' 
 |    TextBody: 
 |    [* 
 |      struc := construct( SWF_UserInRoles ); 
 |       
 |      traverse( roles, Elements, e ) 
 |      { 
 |        struc.Add( this.AssignToRole( e ) ); 
 |      } 
 |       
 |      return &struc; 
 |    *] 
 |  } 
 |  
  |