Lai,Risheng
2023-11-02 30c02e0c981b16be0918483543f4b812956c45d4
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
Quintiq file version 2.0
#parent: ListFulfillmentRestriction
Response OnClick () id:Response_ListFulfillmentRestriction_MenuCreate_OnClick
{
  #keys: '[135040.0.186419311]'
  CanBindMultiple: false
  DefinitionID => /ListFulfillmentRestriction/Responsedef_ListFulfillmentRestriction_WebMenu_OnClick
  Initiator: 'MenuCreate'
  Precondition:
  [*
    ssegments   := ifexpr( DataHolderSelectedSalesSegmentFrmSalesSegment.Data().Size() >0, 
                           DataHolderSelectedSalesSegmentFrmSalesSegment.Data(), 
                           DataHolderSalesSegment.Data() );
    
    products    := DataHolderProduct.Data();
    
    return MacroPlan::HasMacroPlan( MacroPlan, feedback )
           and FulfillmentRestriction::CanCreate( MacroPlan, feedback )
           and FulfillmentRestriction::CanCreateWeb( feedback, ssegments, products );
  *]
  UserRequiresReadWrite: true
  QuillAction
  {
    Body:
    [*
      // New fulfillment restriction
      ssegments   := ifexpr( DataHolderSelectedSalesSegmentFrmSalesSegment.Data().Size() >0, 
                             DataHolderSelectedSalesSegmentFrmSalesSegment.Data(), 
                             DataHolderSalesSegment.Data() );
      products := DataHolderProduct.Data();
      
      dlg := construct( DialogCreateEditFulfillmentRestriction );
      dlg.New( ssegments, products );  //create new fulfillment restriction with the selected SalesSegments + children
    *]
    GroupServerCalls: false
  }
}