lazhen
2024-11-06 20bac026b51b5d6572a6107ef09397288bbc6dd8
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
Quintiq file version 2.0
#parent: pnlActions/btnOk
Response OnClick () id:Response_pnlActions_btnOk_OnClick
{
  #keys: '[412672.0.1039310295]'
  DefinitionID: 'Responsedef_WebButton_OnClick'
  GroupServerCalls: true
  QuillAction
  {
    Body:
    [*
      if( cbAllProduct.Checked() ){
        traverse( MacroPlan,Product_MP,product ){
          traverse( product,ProductInStockingPoint_MP,productInStockingPoint ){
            LockPeriod::Create( productInStockingPoint,dsLockDate.Date() );
          }
        }
      }else{
        if( cbAllProductInStockingPoint.Checked() ){
          product := ddlProduct.Data();
          traverse( product,ProductInStockingPoint_MP,productInStockingPoint ){
            LockPeriod::Create( productInStockingPoint,dsLockDate.Date() );
          }
        }else{
          LockPeriod::Create( ddlProductInStockingPoint.Data(),dsLockDate.Date() );
        } 
      }
      Form.Close();
    *]
  }
}