From ae3b7f21551deb0e163eb5dbd4bea0a70bd54c50 Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期四, 10 十月 2024 17:54:30 +0800
Subject: [PATCH] Merge branch 'dev' of http://47.101.211.7:10101/r/VWED into dev-zlg

---
 _Main/BL/Type_DL_EngineRackCell/StaticMethod_CreateData.qbl |   43 ++++++++++++++++++++++++++++++++++---------
 1 files changed, 34 insertions(+), 9 deletions(-)

diff --git a/_Main/BL/Type_DL_EngineRackCell/StaticMethod_CreateData.qbl b/_Main/BL/Type_DL_EngineRackCell/StaticMethod_CreateData.qbl
index 3c495c1..f46648f 100644
--- a/_Main/BL/Type_DL_EngineRackCell/StaticMethod_CreateData.qbl
+++ b/_Main/BL/Type_DL_EngineRackCell/StaticMethod_CreateData.qbl
@@ -9,11 +9,14 @@
     macroPlan.DL_EngineRackRow( relflush );
     macroPlan.DL_EngineRackColumn( relflush );
     
-    // 鍒涘缓琛孍VO5 MLB, EVO5 MQB, GEN3 MLB, GEN3 MQB
-    macroPlan.DL_EngineRackRow( relnew, Generation := "EVO5", MLB_MQB := "MLB" );
-    macroPlan.DL_EngineRackRow( relnew, Generation := "EVO5", MLB_MQB := "MQB" );
-    macroPlan.DL_EngineRackRow( relnew, Generation := "GEN3", MLB_MQB := "MLB" );
-    macroPlan.DL_EngineRackRow( relnew, Generation := "GEN3", MLB_MQB := "MQB" );
+    // 鍒涘缓琛�
+    genrations := selectuniquevalues( macroPlan, Product_MP, tempPMP, tempPMP.Generation().TrimBoth() <> "", tempPMP.Generation() );
+    mqbmlbs    := selectuniquevalues( macroPlan, Product_MP, tempPMP, tempPMP.MQBMLB().TrimBoth() <> "", tempPMP.MQBMLB() );
+    traverse ( genrations, Elements, g ) {
+      traverse ( mqbmlbs, Elements, m ) {
+        macroPlan.DL_EngineRackRow( relnew, Generation := g, MLB_MQB := m );
+      }
+    }
     
     // 鍒涘缓鍒�
     indexDate := macroPlan.StartOfPlanning().Date().StartOfMonth();
@@ -23,13 +26,35 @@
     }
     
     // 鍒涘缓鍗曞厓鏍�
-    traverse ( macroPlan, DL_EngineRackRow, dlerr ) {
-      traverse ( macroPlan, DL_EngineRackColumn, dlerc ) {
+    traverse ( macroPlan, DL_EngineRackRow, dlerr ) { // 寰幆琛�
+      info( "褰撳墠閬嶅巻鐨勮锛�", dlerr.Generation(), " ", dlerr.MLB_MQB() );
+      traverse ( macroPlan, DL_EngineRackColumn, dlerc ) { // 寰幆鍒�
+        // 鍙戝姩鏈烘垚鏈弬鏁�
+        lce  := select( macroPlan, LogisticsCostEngine, tempLCE, tempLCE.Generation() = dlerr.Generation() and tempLCE.MLB_MQB() = dlerr.MLB_MQB() and tempLCE.Factory() = "澶ц繛宸ュ巶" 
+                        and tempLCE.StartDate() <= dlerc.StartDate() and tempLCE.EndDate() >= dlerc.StartDate().StartOfNextMonth() );
+        
+        // 褰撳墠鏈堟湯鏈�鍚庝竴澶╂棩鏈�                
+        lastDayOfThisMonth := dlerc.StartDate().StartOfNextMonth() - 1; 
+        
         cell := dlerr.DL_EngineRackCell( relnew );
         
-        // 澶栫搴撳叆搴撹垂鐢紙鍙戝姩鏈洪攢閲� / 鍖呰瀹归噺[鍚戜笂鍙栨暣] * 鏂欐灦鍏ュ簱鍗曚环锛�
+        // 绌烘枡鏋舵暟閲忥細澶ц繛鍘傝浜у搧鐨勬枡鏋舵�绘暟閲� - 鍙戝姩鏈哄簱瀛� / 鍖呰瀹归噺锛堝悜涓婂彇鏁达級
+        plannedInventory := sum( macroPlan, Product_MP.ProductInStockingPoint_MP.ProductInStockingPointInPeriod, tempPISPIP,
+                                 tempPISPIP.ProductInStockingPoint_MP().Product_MP().IsLeaf()                                                                and
+                                 exists( tempPISPIP.ProductInStockingPoint_MP().Product_MP(), AllParent.AsParent, tempPMP, tempPMP.ID() = "鍙戝姩鏈�" )         and
+                                 tempPISPIP.ProductInStockingPoint_MP().StockingPointID()                                               = "澶ц繛澶栫搴�"       and
+                                 tempPISPIP.ProductInStockingPoint_MP().Product_MP().Generation()                                       = dlerr.Generation() and
+                                 tempPISPIP.ProductInStockingPoint_MP().Product_MP().MQBMLB()                                           = dlerr.MLB_MQB()    and
+                                 tempPISPIP.Start().Date()                                                                              = lastDayOfThisMonth,
+                                 tempPISPIP.PlannedInventoryLevelEnd() );
+        cell.PackagingCapacity( guard( lce.PackagingCapacity(), 1 ) );
+        cell.PlannedInventory( plannedInventory );
         
-        // 澶栫搴撳嚭搴撹垂鐢紙鍙戝姩鏈轰骇閲� / 鍖呰瀹归噺[鍚戜笂鍙栨暣] * 鏂欐灦鍑哄簱鍗曚环锛�
+        // CC澶栫搴撳叆搴撹垂鐢細鍙戝姩鏈洪攢閲� / 鍖呰瀹归噺锛堝悜涓婂彇鏁达級* 鏂欐灦鍏ュ簱鍗曚环
+        
+        // CC澶栫搴撳嚭搴撹垂鐢細鍙戝姩鏈洪攢閲� / 鍖呰瀹归噺锛堝悜涓婂彇鏁达級* 鏂欐灦鍑哄簱鍗曚环
+        
+        cell.DL_EngineRackColumn( relset, dlerc );
       }
     }
   *]

--
Gitblit v1.9.3