陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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
44
45
46
Quintiq file version 2.0
#parent: #root
StaticMethod Create (
  Product_MP owner,
  StockingPoint_MP stockingpoint,
  Boolean hasunitofmeasure,
  String unitofmeasurename,
  Boolean isnegativeinventoryallowed,
  Boolean isexcluded,
  Boolean isexlcudedfrombalancing,
  Boolean issafetystockkept,
  Real inputlotsize,
  Boolean isexcludeshelflife,
  Boolean isfromdb
) as PISPSpecification
{
  Description: 'Creates an instance of PISPSpecification.'
  TextBody:
  [*
    // edz1 Jun-10-2016 (created)
    
    pisp := select( owner, 
                    ProductInStockingPoint_MP,
                    p,
                    p.StockingPoint_MP()= stockingpoint ); 
    
    
    pispspec := owner.PISPSpecification( relnew,
                                         StockingPoint_MP := stockingpoint,
                                         ProductInStockingPoint_MP := pisp,
                                         ProductID := owner.ID(),
                                         StockingPointID := stockingpoint.ID() );
                                         
    pispspec.Update( hasunitofmeasure,
                     unitofmeasurename,
                     isnegativeinventoryallowed,
                     isexcluded,
                     isexlcudedfrombalancing,
                     issafetystockkept,
                     inputlotsize,
                     isexcludeshelflife,
                     isfromdb );
    
    return pispspec;
  *]
}