From 5d16fa127ab2005b56ddb9c8d8c2ff1ff0f5826d Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期二, 22 十月 2024 17:47:43 +0800
Subject: [PATCH] 发动机物流成本报表导入报错处理

---
 _Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl |   11 ++++++++++-
 1 files changed, 10 insertions(+), 1 deletions(-)

diff --git a/_Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl b/_Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl
index 8ed89f7..c3051ae 100644
--- a/_Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl
+++ b/_Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl
@@ -45,7 +45,8 @@
                                       , DLRentOutOfCost              := cell.DLRentOutOfCost()
                                       , WerkToDLRentTransCost        := cell.WerkToDLRentTransCost()
                                       , DLRentStorCost               := cell.DLRentStorCost()
-                                      , CoefficientValue             := cell.CoefficientValue() );
+                                      , CoefficientValue             := cell.CoefficientValue()
+                                      , AllCost                      := cell.EstimateTotalCost() * [Real]cell.CoefficientValue() );
           column.Cell( relinsert, showcell );
           //鏄剧ず骞村崟鍏冩牸
           yearcell.CCRentInCost( cell.CCRentInCost() + yearcell.CCRentInCost() );
@@ -78,6 +79,14 @@
           sumcell.WerkToDLRentTransCost( cell.WerkToDLRentTransCost() + sumcell.WerkToDLRentTransCost() );
           sumcell.DLRentStorCost( cell.DLRentStorCost() + sumcell.DLRentStorCost() );
         }
+        yearcell.AllCost( yearcell.EstimateTotalCost() * [Real]yearcell.CoefficientValue() );
+      }
+    }
+    
+    traverse( sumrow, Cell, cell ){
+      cell.AllCost( cell.EstimateTotalCost() * [Real]cell.CoefficientValue() );
+      if( exists( cell.Column(), Cell, acell, acell.IsUpdate() ) ){
+        cell.IsUpdate( true );
       }
     }
     info( '-------------------------g------------end---------------------------------' );

--
Gitblit v1.9.3