计划下发界面区分工厂

lazhen

2024-11-14 7c445b476a69ee8083a0e5733565e13dc8c0d109

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Quintiq file version 2.0
#parent: #root
MethodOverride SetAvailable (
  String usergroups
)
{
  Description: 'Indicate if a folder can have all its scenario set to available'
  TextBody:
  [*
    ugs := GlobalParameters_MP::GetUserGroups( usergroups );
    traverse( this, Children, c, c.CreatedBy() = GlobalParameters_MP::GetUserName() or exists( c, ScenarioAuthorization, sa, exists( ugs, Elements, ug, sa.Name() = ug.Name() ) ) )
    {
      c.SetAvailable( usergroups );
    }
  *]
}