1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| Quintiq file version 2.0
| #parent: #root
| Method SetQuantity (
| InventoryPlanArchiveColumn column,
| Real planqty,
| Real actualaty
| )
| {
| TextBody:
| [*
| // 甄兰鸽 Jun-24-2024 (created)
| cell := selectobject( this, Cell, cell, cell.Column() = column );
| if( isnull( cell ) ){
| cell := this.Cell( relnew, PlanQuantity := 0, ActualQuantity := 0 );
|
| column.Cell( relinsert, cell );
| }
| cell.PlanQuantity( cell.PlanQuantity() + planqty );
| cell.ActualQuantity( cell.ActualQuantity() + actualaty );
| *]
| }
|
|
