Index: APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml
===================================================================
diff -u -r63084 -r72876
--- APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml (.../ProductieSequentieItemService.cls.xml) (revision 63084)
+++ APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml (.../ProductieSequentieItemService.cls.xml) (revision 72876)
@@ -33,6 +33,21 @@
1
+
+APPS.Halux.common.impl.Encoway.ProductieAansturingService
+1
+
+
+
+DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler
+1
+
+
+
+DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler
+1
+
+
MaatwerkService:APPS.PM.Maatwerk.MaatwerkService="",ProductieAansturingIngegevenKenmerkenBepaler:APPS.Halux.common.ProductieAansturingIngegevenKenmerkenBepaler="",DotNetProductieAansturingService:APPS.Halux.common.impl.DotNet.ProductieAansturingService=""
1
@@ -43,9 +58,12 @@
Set ..MaatwerkService = $$$Inject(MaatwerkService, ##class(APPS.PM.Maatwerk.MaatwerkService).%New())
Set ..ProductieAansturingIngegevenKenmerkenBepaler = $$$Inject(ProductieAansturingIngegevenKenmerkenBepaler, ##class(APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler).%New())
Set ..DotNetProductieAansturingService = $$$Inject(DotNetProductieAansturingService, ##class(APPS.Halux.common.impl.DotNet.ProductieAansturingService).%New())
+ Set ..EncowayProductieAansturingService = ##class(APPS.Halux.common.impl.Encoway.ProductieAansturingService).%New()
Set ..ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
Set ..BerekeningService = ##class(APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken).%New()
Set ..BatchService = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService()
+ Set ..OmleidingNaarDotNetBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler).%New()
+ Set ..OmleidingNaarEncowayBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler).%New()
Quit $$$OK
]]>
@@ -58,7 +76,10 @@
#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..GeefIngegevenKenmerken(ProductieSequentieItem)
- If (..IsHalffabItemsBoomDotNetBasedCalculated(IngegevenKenmerken)) {
+ If (..IsHalffabItemsBoomEncowayBasedCalculated(IngegevenKenmerken)) {
+ #dim CID As %String = ..GeefCID(ProductieSequentieItem)
+ Set HalffabItemsBoom = ..GeefHalffabItemsBoomEncowayBased(CID, IngegevenKenmerken)
+ } ElseIf (..IsHalffabItemsBoomDotNetBasedCalculated(IngegevenKenmerken)) {
Set HalffabItemsBoom = ..GeefHalffabItemsBoomDotNetBased(IngegevenKenmerken, ProductieSequentieItem)
} Else {
Set HalffabItemsBoom = ..GeefHalffabItemsBoomCacheBased(IngegevenKenmerken, ProductieSequentieItem)
@@ -79,11 +100,31 @@
]]>
+
+ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem
+1
+%String
+
+
+
+
+IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+1
+%Boolean
+
+
+
IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
1
%Boolean
-
@@ -107,11 +148,20 @@
+
+CID:%String,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+1
+DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
+
+
+
ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem
1