From 53dd77cb4acdbe54af218fa7034b1ae8d272cc4d Mon Sep 17 00:00:00 2001
From: Kevin Kok Khah Whey <khahwhey.kok@3ds.com>
Date: 星期一, 25 九月 2023 19:15:31 +0800
Subject: [PATCH] Kevin: 修改了Operation.GetHasValidOperationInputOutput以让系统能够对没有投入料并非供应商生产单元的操作报告红色有效性检查。
---
_Main/BL/Type_Operation/Method_GetHasValidOperationInputOutput.qbl | 38 ++++++++++++++++++++++++++++++++++++++
1 files changed, 38 insertions(+), 0 deletions(-)
diff --git a/_Main/BL/Type_Operation/Method_GetHasValidOperationInputOutput.qbl b/_Main/BL/Type_Operation/Method_GetHasValidOperationInputOutput.qbl
new file mode 100644
index 0000000..09ae8ea
--- /dev/null
+++ b/_Main/BL/Type_Operation/Method_GetHasValidOperationInputOutput.qbl
@@ -0,0 +1,38 @@
+Quintiq file version 2.0
+#parent: #root
+Method GetHasValidOperationInputOutput (
+ output Strings feedback_o,
+ output Strings sanitycheckfeedback_o
+) declarative remote #extension
+{
+ TextBody:
+ [*
+ // desmondt Oct-3-2014 (created)
+ feedback := '';
+ sanitycheckfeedback := ''
+
+ if( ( this.Unit().QuantityToProcess() = GlobalParameters_MP::GetQTProcessIn()
+ or not this.Unit().IsSupplier() ) // Tianma change 20230925: If the unit is not a supplier, raise a data issue if there's no input
+ and this.OperationInput( relsize ) = 0 )
+ {
+ feedback := Translations::MP_Operation_ViolateHasValidOperationInputOutput_NoOperationInput();
+ sanitycheckfeedback_o.Add( SanityCheckCategoryLevel::GetSanityCheckCategoryDataIssue() );
+ }
+ else if( this.Unit().QuantityToProcess() = GlobalParameters_MP::GetQTProcessOut()
+ and this.OperationOutput( relsize ) = 0 )
+ {
+ feedback := Translations::MP_Operation_ViolateHasValidOperationInputOutput_NoOperationOutput();
+ sanitycheckfeedback := SanityCheckCategoryLevel::GetSanityCheckCategoryDataIssue();
+ }
+
+ if( not isnull( feedback_o ) and feedback <> '' )
+ {
+ name := MacroPlan::GetSubstituteName( this.Name() ); // To avoid empty name/name too long
+ feedback_o.Add( SanityCheckMessage::GetFormattedMessage( Translations::MP_Process_Instance( this.DefinitionName(), name ),
+ feedback ) );
+ sanitycheckfeedback_o.Add( sanitycheckfeedback );
+ }
+
+ return feedback = '';
+ *]
+}
--
Gitblit v1.9.3