Update StaticMethod_DoASync#253.qbl

yanweiyuan3

2023-10-27 d1d15b61dfcf7fd0f800b32359f082cf580ed556

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
Quintiq file version 2.0
#parent: TabPageGeneral/DataHolderProduct
Response OnCreated () id:Response_TabPageGeneral_DataHolderProduct_OnCreated
{
  #keys: '[106810.1.80242690]'
  Body:
  [*
    // Extract the parent product by filtering out the descendents of the selected products in order to prevent circularity
    data := Dialog.Data().WrappedInstance();
    isNew := isnull( data );
    products := null( Product_MPs, owning );
    
    if( isNew
        or data.IsLeaf() ) // Is leaf
    {
      products := selectset( MacroPlan, Product_MP, p, true );
      currentScope := DataHolderEditingProduct.Data();
      
      products := products.Difference( currentScope );
    }
    else if( not data.HasParent() ) // Is root level
    {
      products := selectset( MacroPlan, RootProduct, p, p <> data );
    }
    else // Has Parent and Child
    {
      allProducts := selectset( MacroPlan, Product_MP, p, p <> data );
      myChildren := selectset( data, AllChildren.AsChildren, c, true );
    
      products := allProducts.Difference( myChildren );
    }
    
    this.Data( products.Copy() );
  *]
  DefinitionID: 'Responsedef_GUIComponent_OnCreated'
  Precondition:
  [*
    return not isnull( MacroPlan );
  *]
}