From 603028485fee72bab8b4f861eb87a050917f4015 Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期一, 29 七月 2024 14:08:27 +0800
Subject: [PATCH] 你看一下二开界面新增一个事件，删除一条产线的occurances，标准功能里面还是有
---
_Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl | 8 ++++++--
1 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/_Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl b/_Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl
index b90eafb..a9cb34f 100644
--- a/_Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl
+++ b/_Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl
@@ -18,9 +18,13 @@
}
}
if( not isnull( leadingeti ) ){
- eti.Delete();
+ subscription := selectobject( eti, Participation.Event.LeadingParticipation.Subscription, subscription, subscription.Calendar().CalendarID() = eti.Participation().Calendar().CalendarID() );
+ if( subscription.ExplicitTimeInterval( relsize ) = 1 ){
+ subscription.Delete();
+ }else{
+ eti.Delete();
+ }
}
-
}
*]
}
--
Gitblit v1.9.3