Quintiq file version 2.0
|
#parent: #root
|
Method CreatePISPAccount
|
{
|
Description: 'Create PISP account for this inentory value and cost.'
|
TextBody:
|
[*
|
// Adhi May-5-2016 (created)
|
inventorysupply := this.InventorySupply();
|
stockingpoint := inventorysupply.StockingPoint_MP();
|
|
if( isnull( stockingpoint ))
|
{
|
stockingpoint := StockingPoint_MP::FindStockingPointTypeIndex( inventorysupply.StockingPointID() );
|
}
|
|
account := select( this.MacroPlan(), Account_MP, acc,
|
acc.Name() = this.AccountName() );
|
|
if( not isnull( account ) )
|
{
|
PISPAccount::Assign( account,
|
inventorysupply.Product_MP(),
|
stockingpoint,
|
this.CostDriver() );
|
}
|
|
this.UpdateForeignKey( inventorysupply.ID() );
|
*]
|
}
|