yypsybs
2023-10-10 550ebcf02217f8a0c6fe9001fcfa8e42e9cd6b83
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
35
36
37
38
39
40
41
42
43
44
Quintiq file version 2.0
#parent: Button
Response OnClick () id:Response_FormAlgorithmRuns_Button_OnClick
{
  #keys: '[110880.3.1380316150]'
  Body:
  [*
    // Generate configurable columns for account KPIs for exporting
    
    columns := ColumnTitlesLevels.DataSetLevel().Columns();
    column := null( DataSetConfigurableColumn );
    
    traverse( MacroPlan.GetOptimizerAccounts(), Elements, account )
    {
      columnname := account.Name();
    
      c := select( columns, Columns.astype( DataSetConfigurableColumn ), c,
                   c.Name() = columnname );
    
      if( not isnull( c ) )
      {
        column := c;
      }
      else
      {
        c2 := DataSetConfigurableColumn::Create( columns );
        c2.Name( columnname );
        column := columns.StoreColumn( &c2 ).astype( DataSetConfigurableColumn );
      }
      // Set Quill code for configurable column
      if( not isnull( column ) )
      {
        column.SetText( "VALUE( select( object, OptimizerAccountKPIResult, result, result.AccountName() = '" + columnname + "' ).TotalGoalValue() )" );
      }
    }
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_GUIButtonBase_OnClick'
  Precondition:
  [*
    return MacroPlan::HasMacroPlan( MacroPlan, feedback );
  *]
  UserRequiresReadWrite: true
}