BUG修复

admin

2024-08-21 399b1733fce10c0afefe36167f499d9e1e31e7b3

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
Quintiq file version 2.0
#parent: #root
Method GetAdditionalPISPIPSInventorySpecification (
  const LibOpt_Scope scope,
  constcontent ProductInStockingPointInPeriodPlannings currentpispips
) const as constcontent owning ProductInStockingPointInPeriodPlannings
{
  TextBody:
  [*
    additionalpispips := construct( ProductInStockingPointInPeriodPlannings, constcontent ); 
    traverse( currentpispips, 
              Elements, 
              firstpispip,
              guard( not scope.Contains( firstpispip.PreviousPlanningPISPIP().PISPIPInOptimizerRun() ), false ) ) 
    {
      pispiptoadd := firstpispip.PreviousPlanningPISPIP(); 
      
      while(  not isnull( pispiptoadd ) 
              and 
              pispiptoadd.End() +  
              Duration::Days( pispiptoadd.GetMaxDays() ) > firstpispip.Start() )
      {
        additionalpispips.Add(  pispiptoadd ); 
        pispiptoadd := pispiptoadd.PreviousPlanningPISPIP(); 
      }
    }  
    return &additionalpispips;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}