Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method CreatePostponement ( 
 | 
  MacroPlan macroplan 
 | 
) 
 | 
{ 
 | 
  TextBody: 
 | 
  [* 
 | 
    salessegmentname := 'Carrefour Austria';  
 | 
    salessegment := select( macroplan, SalesSegment_MP, s, true, s.Name() = salessegmentname );  
 | 
    if ( isnull( salessegment.PostponementSpecification() ) )  
 | 
    { 
 | 
      PostponementSpecification::Create( salessegment, 'Month', 3, 'Month', 3, false );  
 | 
    } 
 | 
    sopyear := macroplan.StartOfPlanning().Year();  
 | 
    startdate := Date::Construct( sopyear, 1, 1 );   
 | 
    product := select( macroplan, Product_MP, p, true, p.Name() = 'Lowfat Vanilla 6 pk' );  
 | 
     
 | 
    lsdip := select( salessegment,  
 | 
                     SalesDemandInPeriod.astype( LeafSalesDemandInPeriod ),  
 | 
                     lsdip, 
 | 
                     lsdip.ProductID() = product.ID() 
 | 
                     and lsdip.StartDate() = startdate );  
 | 
     
 | 
    topispip := lsdip.ProductInStockingPointInPeriodPlanning().NextPlanningPISPIP().astype( ProductInStockingPointInPeriodPlanningLeaf );  
 | 
    ismanual := true;  
 | 
     
 | 
    lsdip.Postpone( 100.0, ismanual, topispip); 
 | 
  *] 
 | 
  InterfaceProperties { Accessibility: 'Module' } 
 | 
} 
 |