yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
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 MappingActualPISPIPData (
  Strings businessTypes,
  Boolean nuclear
)
{
  TextBody:
  [*
    this.IOActualProductInStockingPointInPeriod( relflush );
    // 先按关键物料,再按businessType筛选产品
    productList := selectset( this, MappingProduct, item, item.KeyProduct() = nuclear );
    if( not isnull( businessTypes ) and businessTypes.Size() > 0 ) {
      productList := selectset( productList, Elements, item, businessTypes.Find( item.BusinessType() ) >= 0 );
    }
    productIdList := selectvalues( productList, Elements, item, item.ID() );
    // 根据产品筛选库存数据
    traverse( this, MappingActualPISPIP, item, productIdList.Find( item.ProductID() ) >= 0 ) {
      this.IOActualProductInStockingPointInPeriod( relnew, 
                                                   ActualInventoryLevelEnd := item.ActualInventoryLevelEnd(), 
                                                   // todo 确认使用当前日期还是数据库日期
                                                   Date := item.Date(), 
                                                   Description := item.Description(), 
                                                   ManufacturedDate := item.ManufacturedDate(), 
                                                   ProductID := item.ProductID(), 
                                                   StockingPointID := item.StockingPointID() );
                                                   
    }
  *]
}