Quintiq file version 2.0
#parent: #root
Method NewCurrency (
  internal[GUIComponent] parent
) as Currency_MP id:Method_DialogCreateEditCurrency_NewCurrency
{
  #keys: '[11660.0.354467735]'
  Body:
  [*
    // New currency
    
    data := MacroPlan.Currency_MP( relshadow, ID := "" ); // Temporary set ID to empty, will be defined by user
    
    Dialog.Data( data );
    result := this.DoModal( parent );
    newobj := null( Currency_MP )
    
    if( result > 0 )
    {
      newobj := Currency_MP::Create( data.ID(),
                                     MacroPlan,
                                     data.Name(),
                                     data.Symbol(),
                                     data.IsBase(),
                                     false );
    }
    
    return newobj;
  *]
}