From 15162ab40eea1e4c760faa1b352b935d74d3c032 Mon Sep 17 00:00:00 2001
From: renhao <renhui.hao@capgemini.com>
Date: 星期二, 19 九月 2023 20:54:29 +0800
Subject: [PATCH] 运输路线的UnitID

---
 _Main/BL/Type_Lane/StaticMethod_CreateLaneFromJson.qbl |   18 +++++++++++++++++-
 _Main/BL/Type_MacroPlan/Method_ApiLanesData.qbl        |    2 +-
 2 files changed, 18 insertions(+), 2 deletions(-)

diff --git a/_Main/BL/Type_Lane/StaticMethod_CreateLaneFromJson.qbl b/_Main/BL/Type_Lane/StaticMethod_CreateLaneFromJson.qbl
index 6d55643..0c19698 100644
--- a/_Main/BL/Type_Lane/StaticMethod_CreateLaneFromJson.qbl
+++ b/_Main/BL/Type_Lane/StaticMethod_CreateLaneFromJson.qbl
@@ -1,7 +1,8 @@
 Quintiq file version 2.0
 #parent: #root
 StaticMethod CreateLaneFromJson (
-  JSON datarow
+  JSON datarow,
+  MacroPlan macroplan
 ) as Lane
 {
   Description: 'Read the json data and use it to create lane data'
@@ -14,6 +15,11 @@
     userleadtime := datarow.Get( "userleadtime" );
     processingtime := Duration::Zero();
     
+    unitofmeasurename := "PCS";
+    currencyid := "CNY";
+    startdate := Date::Date( 1900, 1, 1 );
+    enddate := Date::Date( 9999, 12, 31 );
+    capacitytype := "Transport quantity";
     if( userleadtime.IsNull() )
     {
       processingtime := Duration::Zero(); 
@@ -24,6 +30,16 @@
       };
     
     unit := Unit::FindUnitTypeIndex( unitid );
+    if( isnull( unit)){
+      unit :=macroplan.Unit( relnew, 
+                 ID := unitid, 
+                 Name := unitid, 
+                 UnitOfMeasureName := unitofmeasurename, 
+                 CurrencyID := currencyid, 
+                 StartDate := startdate, 
+                 EndDate := enddate, 
+                 CapacityType := capacitytype );
+    }
     
     result := Lane::CreateLane( unit, id, name, processingtime);
     
diff --git a/_Main/BL/Type_MacroPlan/Method_ApiLanesData.qbl b/_Main/BL/Type_MacroPlan/Method_ApiLanesData.qbl
index 0561aae..0020767 100644
--- a/_Main/BL/Type_MacroPlan/Method_ApiLanesData.qbl
+++ b/_Main/BL/Type_MacroPlan/Method_ApiLanesData.qbl
@@ -14,7 +14,7 @@
     for( i:=0; i<data_length; i++ )
     {
       datarow := data.Get( i );
-      a := Lane::CreateLaneFromJson( datarow );
+      a := Lane::CreateLaneFromJson( datarow ,this);
       updates.Add( a );
       }
     origindataset := selectset( this, Unit.Lane, l, true );

--
Gitblit v1.9.3