From 8afe90b633046db39042aada36b88193062f8cff Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期四, 09 一月 2025 15:52:35 +0800
Subject: [PATCH] 机加管线报表库存计算参数入场离场数量计算
---
_Main/UI/MacroPlannerWebApp/Component_FormCalendarUnavailableEvent/Method_InitializeSubscribers.def | 8 ++++++++
1 files changed, 8 insertions(+), 0 deletions(-)
diff --git a/_Main/UI/MacroPlannerWebApp/Component_FormCalendarUnavailableEvent/Method_InitializeSubscribers.def b/_Main/UI/MacroPlannerWebApp/Component_FormCalendarUnavailableEvent/Method_InitializeSubscribers.def
index e05da75..77ef126 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_FormCalendarUnavailableEvent/Method_InitializeSubscribers.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_FormCalendarUnavailableEvent/Method_InitializeSubscribers.def
@@ -5,7 +5,9 @@
#keys: '[415136.0.666291565]'
Body:
[*
+
owner_i := LibCal_GlobalState.dhGlobalCalendarRegistry().Data().CommonCalendar();
+
category_i := selectobject( owner_i,CalendarRegistry.EventCategory, category, category.Name() = 'Unavaliable' );
sEvent := owner_i.Event( relshadow,
@@ -24,6 +26,9 @@
calendar := sLeadPart.Calendar();
potentialSubscribers := calendar.GetPotentialSubscribers();
+ period := MacroPlan.LibCal_SubscriberEventSearch( relnew, Start := Date::MinDate(), End := Date::MaxDate() );
+
+ dhDate.Data( period );
// Remove the calendar of the initiator (cannot subscribe to self).
initiator := sEvent.Calendar();
if( potentialSubscribers.Find( initiator ) >= 0 )
@@ -32,5 +37,8 @@
}
dhPotentialSubscribers.Data( &potentialSubscribers );
+
+ lstSubscribers.CheckAll();
+ ListCalendarEventTypes.CheckAll();
*]
}
--
Gitblit v1.9.3