优先级因子菜单

limj

2023-09-28 33be9f1e7cc38511f2bb4329fde8e14cc0cc1f09

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
Quintiq file version 2.0
#parent: #root
Method SetDefaultValues () id:Method_DialogSmartPlan_SetDefaultValues
{
  #keys: '[137862.0.112802895]'
  Body:
  [*
    //Set default values 
    boundvalue := SmartPlanSetting::MiddleOut();
    smartplansetting := MacroPlan.SmartPlanSetting();
    strategy := select( ScenarioManager, Strategy, strategy, strategy.Name() = smartplansetting.Strategy() );
    
    DialogSmartPlan.DropDownListStrategy().Data( strategy );
    
    if( not isnull( smartplansetting ) )
    {
      //DialogSmartPlan.CheckboxSpecifyTotalSupply().Checked( run.HasTotalSupplyUser() );
      DialogSmartPlan.CheckboxOverrideManual().Checked( smartplansetting.OverwriteLockedPlanning() );
      boundvalue := ifexpr( smartplansetting.SmartPlanDirection()= "", SmartPlanSetting::MiddleOut(), smartplansetting.SmartPlanDirection() );
      DialogSmartPlan.RadioButtonGroupSmartPlanDirection().BoundValue( boundvalue );
     
      DialogSmartPlan.CheckboxIsSelectedUnits().Checked( smartplansetting.LimitUnitBySmartPlan() ); 
      if( smartplansetting.LimitUnitBySmartPlan() )
      {
        DataHolderSelectedUnitsForSmartPlan.Data( smartplansetting.UnitForSmartPlan( relget ) );
      }
      if ( boundvalue = SmartPlanSetting::Upstream() )
      {
        DialogSmartPlan.CheckboxOnlyPlanOneStepUpstream().Checked( smartplansetting.OnlyPlanOneStep() );
        
      } 
      else
      {
        // hide and uncheck checkbox if not upstream
        DialogSmartPlan.CheckboxOnlyPlanOneStepUpstream().Checked( false );
        DialogSmartPlan.CheckboxOnlyPlanOneStepUpstream().Visible( false );  
      } 
    
    }
    
    Form.ChangeRadioButtonUpstreamDownstream( boundvalue );
  *]
}