| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
 | | Quintiq file version 2.0 |  | #parent: #root |  | StaticMethod CreateLaneleg ( |  |   Lane lane, |  |   String laneid, |  |   String originstockingpointid, |  |   String destinationstockingpointid, |  |   String name, |  |   Boolean hasprocessingtime, |  |   Duration processingtime |  | ) as LaneLeg |  | { |  |   Description: 'Create Laneleg' |  |   TextBody: |  |   [* |  |     // Administrator Jul-12-2023 (created) |  |     //Set default value |  |     isenabled := true; |  |     datestart := Date::Construct(1900, 1, 1) ; |  |     dateend := Date::Construct(9999, 12, 31); |  |     preferencebonus := 0.0; |  |     co2emission :=0.0; |  |     hasstandardleadtime := false; |  |     standardleadtime := Duration::Zero(); |  |     isfromdb := true; |  |      |  |     //create new stockingpoint |  |     originstockingpoint := StockingPoint_MP::FindStockingPointTypeIndex( originstockingpointid ); |  |     lane.AddStockingPoint( originstockingpoint, true, isfromdb ); |  |     Transaction::Transaction().Propagate(); |  |      |  |     destinationstockingpoint := StockingPoint_MP::FindStockingPointTypeIndex( destinationstockingpointid ); |  |     lane.AddStockingPoint( destinationstockingpoint, false, isfromdb ); |  |      |  |     Transaction::Transaction().Propagate(); |  |      |  |     result := LaneLeg::FindLaneLegTypeIndex( laneid, originstockingpointid, destinationstockingpointid ); |  |      |  |     if( isnull( result ) ) |  |     { |  |       result := LaneLeg::Create( lane, originstockingpointid, destinationstockingpointid, isenabled, datestart, dateend, name, hasprocessingtime, processingtime, hasstandardleadtime, standardleadtime, preferencebonus, co2emission, isfromdb ); |  |       } |  |     else |  |     { |  |       // Update |  |       result.Update(originstockingpointid, destinationstockingpointid, isenabled, datestart, dateend, name, hasprocessingtime, processingtime, hasstandardleadtime, standardleadtime, preferencebonus, co2emission, isfromdb );  |  |       }; |  |      |  |     return result; |  |   *] |  | } | 
 |