renhao
2023-09-21 1aa9f2bb83dd9e4b7517f1cbf06b0db53979bb31
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
Quintiq file version 2.0
#parent: pnlActions/btnOk
Response OnClick () id:Response_pnlActions_btnOk_OnClick
{
  #keys: '[131094.0.2062043328]'
  DefinitionID: 'Responsedef_WebButton_OnClick'
  Precondition:
  [*
    return Form.ValuesOK();
  *]
  QuillAction
  {
    Body:
    [*
      parent   := dhParent.Data();
      continue := ckbAllOccurrences.Checked()
               or Form.WarnWhenNotOverlapping();
      
      if( continue )
      {
        Form.CreateUpdateSubscriptions();
        Form.Close();
      
        // If the dialog was opened from another dialog (LibCal_dlgSubscribeToEvent),
        // then also close the other dialog.
        if( not isnull( parent ) )
        {
          parent.Close();
        }
      }
    *]
    GroupServerCalls: false
  }
}