hongji.li
2023-11-07 1a1ba3ad5ed9e4380185aa1ccad20204a0e5f115
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Quintiq file version 2.0
#parent: #root
Method SetNavigationToRoot () id:Method_ApplicationLibMacroPlanner_SetNavigationToRoot
{
  #keys: '[127238.0.1892234081]'
  Body:
  [*
    // reset to root
    // Select stocking points that does not belong to any unit
    stockingpoints := selectset( MacroPlan, StockingPoint_MP, sp, isnull( sp.Unit() ) and not sp.IsSystem() );
    units := selectset( MacroPlan, RootUnit, unit, true );
    products := selectset( MacroPlan, RootProduct, product, not product.IsSystem() );
    salessegments := selectset( MacroPlan, RootSalesSegment, sales, true );
    periods := selectset( MacroPlan, PeriodSpecification_MP, ps, ps.IsDummyPlanningPeriod() );
    
    DataHolderUnits.Data( units.Copy() )
    DataHolderStockingPoints.Data( &stockingpoints ) // workaround to clear SP dataholder
    DataHolderProducts.Data( products.Copy()) 
    DataHolderSalesSegments.Data( salessegments.Copy() );
    DataHolderShowChildOfUnit.Data( units.Copy() );
    DataHolderPeriodObjects.Data( periods.Copy() );
  *]
}