yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
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
Quintiq file version 2.0
#parent: #root
Method SetDefaultValue () id:Method_DialogCreateEditAccountCost_SetDefaultValue
{
  #keys: '[124808.1.499813255]'
  Body:
  [*
    // Set default value for start, time unit, length of time, and cost.
    // Only for new account cost
    
    defaultaccount := AccountAssignment::GetDefaultOwner( MacroPlan );
    SelectionAccount.Data( defaultaccount );
    
    data := Dialog.Data();
    account := SelectionAccount.Data();
    
    if( not isnull( account ) and isnull( data.WrappedInstance() ) )
    {
      data.TimeUnit( account.DefaultTimeUnit() );
      data.LengthOfTime( account.DefaultLengthOfTime() );
      data.Start( MacroPlan.Start().Date() );
      Dialog.SetDefaultCost();
    }
  *]
}