| | |
|---|
| | | RowNr := rowNr, |
|---|
| | | SourceStockpoingPointID := TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | TargetStockpoingPointID := TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | ProductID := pit.Product_MP().ID() ); |
|---|
| | | ProductID := pit.Product_MP().ID(), |
|---|
| | | Category := pit.Product_MP().ParentID() ); |
|---|
| | | } |
|---|
| | | |
|---|
| | | // 找列 |
|---|
| | |
|---|
| | | minDateTPC := macroPlan.TransferPlanColumn( relnew, |
|---|
| | | ColumnDate := Date::MinDate() ); |
|---|
| | | traverse ( macroPlan, TransferPlanRow, tpr ) { |
|---|
| | | productCell := minDateTPC.TransferPlanCell( relnew, Value := tpr.ProductID() ); |
|---|
| | | productCell := minDateTPC.TransferPlanCell( relnew, Value := tpr.Category() + "_" + tpr.ProductID() ); |
|---|
| | | productCell.TransferPlanRow( relset, tpr ); |
|---|
| | | } |
|---|
| | | |
|---|
