From 33b2bc7f3deb9a6a1ad34acd2e2624bbf2f65c1b Mon Sep 17 00:00:00 2001
From: admin <admin@admin.com>
Date: 星期四, 05 九月 2024 13:48:06 +0800
Subject: [PATCH] 存档Curve非空判断
---
_Main/BL/Type_Archive/StaticMethod_Archive.qbl | 10 ++++++----
1 files changed, 6 insertions(+), 4 deletions(-)
diff --git a/_Main/BL/Type_Archive/StaticMethod_Archive.qbl b/_Main/BL/Type_Archive/StaticMethod_Archive.qbl
index cd06c34..048216a 100644
--- a/_Main/BL/Type_Archive/StaticMethod_Archive.qbl
+++ b/_Main/BL/Type_Archive/StaticMethod_Archive.qbl
@@ -56,11 +56,13 @@
}
// 瀛樻。Curve
- ac := select( archive, ArchiveCurve, tempAC, true );
- if ( not isnull( ac ) ) {
- ac.Delete();
+ if ( curveFileName <> "" and curveBinaryValue.Size() > 0 ) {
+ ac := select( archive, ArchiveCurve, tempAC, true );
+ if ( not isnull( ac ) ) {
+ ac.Delete();
+ }
+ archive.ArchiveCurve( relnew, Name := "濮嬬粓鍙瓨涓�鐗�.xlsx", FilePath := curveFileName, SourceFileBinaryValue := curveBinaryValue );
}
- archive.ArchiveCurve( relnew, Name := "濮嬬粓鍙瓨涓�鐗�.xlsx", FilePath := curveFileName, SourceFileBinaryValue := curveBinaryValue );
}
*]
}
--
Gitblit v1.9.3