Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method OnOK () id:Method_DialogCreateEditEventType_OnOK 
 | 
{ 
 | 
  #keys: '[415136.0.724291168]' 
 | 
  Body: 
 | 
  [* 
 | 
    // onOK for ProductDialog 
 | 
    // When the user clicks ok, 
 | 
    // we either create or edit the data 
 | 
    this.ApplyChanges(); 
 | 
    this.SetAttributeAfterApplyData(); 
 | 
     
 | 
    data := dhDialogData.Data(); 
 | 
     
 | 
    if( isnull( data.WrappedInstance() ) ) // New 
 | 
    { 
 | 
      // When create product, parent relation must be null (as server method has logic to detect parent change using this relation) 
 | 
      data.Parent( relflush ); 
 | 
      data.Commit(); 
 | 
      dhForm.Data().ListEventType().SelectByKey( data.WrappedInstance().Key() ); 
 | 
    } 
 | 
    else 
 | 
    { 
 | 
      LibCal_EventType::Update( dhDialogData.Data().WrappedInstance(), efID.Text(), efName.Text() 
 | 
                                ,guard( selParent.Data(), null(  LibCal_EventType ) ) ); 
 | 
    } 
 | 
     
 | 
    this.Close(); 
 | 
  *] 
 | 
} 
 |