修复一些bug，添加包装计划的存档方法

xiaoding721

2024-10-23 4981fae2e6147b7977422e377d71839a3d2769f0

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Quintiq file version 2.0
#parent: #root
Method Copy (
  Lane newlane
)
{
  Description: 'Copy stocking point in lane'
  TextBody:
  [*
    laneid := newlane.ID();
    originid := ifexpr( this.OriginLaneID() <> '', laneid, '' );
    destid := ifexpr( this.DestinationLaneID() <> '', laneid, '' );
    
    StockingPointInLane::Create( this.StockingPoint_MP(), originid, destid );
  *]
}