From 7b99a30e71cebb7faf3472f665e543bf65932758 Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期四, 29 八月 2024 16:09:03 +0800
Subject: [PATCH] 换型设置下载把当前页面内容带上

---
 _Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl b/_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl
index cf221ac..74fc514 100644
--- a/_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl
+++ b/_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl
@@ -8,8 +8,11 @@
   TextBody:
   [*
     // 鐢勫叞楦� Aug-22-2024 (created)
+    traverse( macroplan, ChangeLossSetting, cls ){
+      macroplan.ChangeLossSettingExcel( relnew, Product1 := cls.ProductFirst().ID(), Product2 := cls.ProductSecond().ID(), Unit := cls.Unit().ID(), ChangeLossNr := cls.ChangeLossNr() );
+    }
     value := macroplan.MP_ExportChangeLossSettingsBroker().ExecuteToXLS( isxlsxformat ).AsBinaryValue();
-    
+    macroplan.ChangeLossSettingExcel( relflush );
     return value;
   *]
 }

--
Gitblit v1.9.3