陈清红
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
22
23
24
25
26
27
28
29
30
31
32
Quintiq file version 2.0
#parent: #root
StaticMethod FindCreate (
  SCK_Manager owner,
  String name,
  Boolean can_manual_delete,
  String view_to_open,
  String view_to_open_web,
  String functionality_name,
  Boolean needs_view_to_open
) as SCK_Group
{
  Description: 'Retrieves the group with name [name] or a newly created one if no such group existed yet.'
  TextBody:
  [*
    group := select( owner, Group, group, group.Name() = name );
    
    if ( isnull( group ) )
    {
      group := owner.Group( relnew
                          , Name := name
                          , CanManualDelete := can_manual_delete );
    }
    
    group.ViewNameToOpen( view_to_open ); 
    group.NeedsViewToOpen( needs_view_to_open );
    group.ViewNameToOpenWeb( view_to_open_web );
    group.FunctionalityName( functionality_name );
    
    return group;
  *]
}