Quintiq file version 2.0
|
#parent: #root
|
StaticMethod Create (
|
InventorySpecification owner,
|
ServiceLevelBase servicelevel
|
) as InventorySpecificationInServiceLevel
|
{
|
Description: 'Creates the inventoryspecificationinservicelevel instance that links the input inventory specification to the input servicelevel'
|
TextBody:
|
[*
|
// Martijn Oct-18-2016 (created)
|
invspecproductid := owner.ProductID();
|
invspecstockingpointid := owner.StockingPointID();
|
invspecstart := owner.Start();
|
servicelvelid := servicelevel.ID();
|
// Check whether there already is a invspecinsl linking the input servicelevel to the input inventoryspecification
|
invspecinsl := InventorySpecificationInServiceLevel::FindInventorySpecificationInServiceLevelTypeIndex( invspecproductid,
|
invspecstockingpointid,
|
invspecstart,
|
servicelvelid );
|
|
// If it does not yet exist, create it
|
if( isnull( invspecinsl ) )
|
{
|
invspecinsl := owner.InventorySpecificationInServiceLevel( relnew,
|
InventorySpecificationProductID := invspecproductid,
|
InventorySpecificationStockingPointID := invspecstockingpointid,
|
InventorySpecificationStart := invspecstart,
|
ServiceLevelID := servicelvelid );
|
|
invspecinsl.ServiceLevelBase( relset, servicelevel );
|
}
|
|
return invspecinsl;
|
*]
|
}
|
