Index: APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml
===================================================================
diff -u -r71431 -r72785
--- APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml	(.../ProductieSequentieItemService.cls.xml)	(revision 71431)
+++ APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml	(.../ProductieSequentieItemService.cls.xml)	(revision 72785)
@@ -33,11 +33,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="EncowayProductieAansturingService">
+<Type>APPS.Halux.common.impl.Encoway.ProductieAansturingService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="OmleidingNaarDotNetBepaler">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="OmleidingNaarEncowayBepaler">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>MaatwerkService:APPS.PM.Maatwerk.MaatwerkService="",ProductieAansturingIngegevenKenmerkenBepaler:APPS.Halux.common.ProductieAansturingIngegevenKenmerkenBepaler="",DotNetProductieAansturingService:APPS.Halux.common.impl.DotNet.ProductieAansturingService=""</FormalSpec>
 <Private>1</Private>
@@ -48,10 +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
 ]]></Implementation>
@@ -64,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)
+	} ElseIf (..IsHalffabItemsBoomDotNetBasedCalculated(IngegevenKenmerken)) {
 		Set HalffabItemsBoom = ..GeefHalffabItemsBoomDotNetBased(IngegevenKenmerken, ProductieSequentieItem)
 	} Else {
 		Set HalffabItemsBoom = ..GeefHalffabItemsBoomCacheBased(IngegevenKenmerken, ProductieSequentieItem)
@@ -85,6 +100,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefCID">
+<FormalSpec>ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Batch As APPS.Halux.common.Batch = ..BatchService.GeefBatch(ProductieSequentieItem.BatchID)
+	#dim Product As DOM.PM.MaatwerkProduct = ..ProductTypeAPI.GeefMaatwerkProduct(ProductieSequentieItem.ProductID)
+	
+	Quit Product.GeefCID()
+]]></Implementation>
+</Method>
+
+<Method name="IsHalffabItemsBoomEncowayBasedCalculated">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..OmleidingNaarEncowayBepaler.IsMaatwerkCalculatieInEncoway(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr())
+]]></Implementation>
+</Method>
+
 <Method name="IsHalffabItemsBoomDotNetBasedCalculated">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <Private>1</Private>
@@ -119,6 +154,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefHalffabItemsBoomEncowayBased">
+<FormalSpec>CID:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[	Quit ..EncowayProductieAansturingService.GeefHalffabItemsBoomEncowayBased(CID)
+]]></Implementation>
+</Method>
+
 <Method name="GeefBerekeningSpecificatie">
 <FormalSpec>ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
 <Private>1</Private>
Index: APPS/Halux/common/impl/Encoway/ProductieAansturingService.cls.xml
===================================================================
diff -u
--- APPS/Halux/common/impl/Encoway/ProductieAansturingService.cls.xml	(revision 0)
+++ APPS/Halux/common/impl/Encoway/ProductieAansturingService.cls.xml	(revision 72785)
@@ -0,0 +1,52 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.common.impl.Encoway.ProductieAansturingService">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="EncowayMaatwerkService">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.Encoway</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VhConfigHelper">
+<Type>APPS.PM.Maatwerk.impl.VhConfigHelper</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..EncowayMaatwerkService = ##class(WSimpl.PM.Maatwerk.MaatwerkService.Encoway).%New()
+	Set ..VhConfigHelper = ##class(APPS.PM.Maatwerk.impl.VhConfigHelper).%New()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabItemsBoomEncowayBased">
+<FormalSpec>CID:%String</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
+	
+	Try {
+		#dim VhConfig As DOM.PM.Maatwerk.Calc.Common.VhConfig = ..EncowayMaatwerkService.GeefMaatwerkDetails(CID)
+		Do ..VhConfigHelper.ZetVhConfig(VhConfig)
+		Set HalffabItemsBoom = ..VhConfigHelper.GeefHalffabItemsBoom()
+	} Catch {
+		#dim InnerException As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Set Exception = ##class(TECH.Exceptions.GeneralErrorException).%New("Probleem met teruggeven van de HalffabItemsBoomEnowayBased")
+		Do Exception.VoegToeInnerExceptie(InnerException)
+		Do ##class(TECH.ExceptionHandler).Throw(Exception)
+	}
+	
+	Quit HalffabItemsBoom
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml
===================================================================
diff -u -r55392 -r72785
--- vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 55392)
+++ vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 72785)
@@ -20,9 +20,9 @@
 </Method>
 
 <Method name="BerekenHalffabItemsBoom">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing=""</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing="",CID:%String=""</FormalSpec>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("BerekenHalffabItemsBoom",IngegevenKenmerken,BerekeningsSpecificatie,MaatwerkAanpassing)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("BerekenHalffabItemsBoom",IngegevenKenmerken,BerekeningsSpecificatie,MaatwerkAanpassing,CID)
 ]]></Implementation>
 </Method>
 
Index: APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml
===================================================================
diff -u -r72784 -r72785
--- APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 72784)
+++ APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 72785)
@@ -33,19 +33,31 @@
 <Private>1</Private>
 </Property>
 
+<Property name="EncowayProductieAansturingService">
+<Type>APPS.Halux.common.impl.Encoway.ProductieAansturingService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="OmleidingNaarDotNetBepaler">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="OmleidingNaarEncowayBepaler">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..DotNetProductieAansturingService = ##class(APPS.Halux.common.impl.DotNet.ProductieAansturingService).%New()
+	Set ..EncowayProductieAansturingService = ##class(APPS.Halux.common.impl.Encoway.ProductieAansturingService).%New()
 	Set ..OmleidingNaarDotNetBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler).%New()
+	Set ..OmleidingNaarEncowayBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler).%New()
 
 	set ..IngegevenKenmerkenAPI = ##class(DOM.PM.impl.IngegevenKenmerkenAPIimpl).%New()
 	Set ..Logger = ##class(vhLib.Logger).%New("")
@@ -62,21 +74,21 @@
 <Description>
 2019-07-18 PV+PRA: Aangezien enerzijds het berekenen van boom relatief lang duurt, en anderzijds de boom finaal mag en moet zijn bij aanvang van productie, 
  lijkt het zinvol (maar verder functioneel en technisch te analyseren) om op termijn de boom gewoon te persisteren op bepaalde fases (configureren, order maken, productie starten).</Description>
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing=""</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing="",CID:%String=""</FormalSpec>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
 <Implementation><![CDATA[
 	#Dim Boom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom;
 	
 	If $IsObject(MaatwerkAanpassing) {
-		Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing)
+		Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, CID)
 		Do ..LogBoom("Met MaatwerkAanpassing", IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, Boom)
 	} ElseIf %CachingHalfFabBomenActief {
 		#Dim CacheKey = ..BerekenCacheKey(IngegevenKenmerken, BerekeningsSpecificatie, )
 		If %HalffabItemsBoomCache.IsDefined(CacheKey)  {
 			Set Boom = %HalffabItemsBoomCache.GetAt(CacheKey)
 			Do ..LogBoom("Gevonden in de cache", IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, Boom, CacheKey)
 		} Else {
-			Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing)
+			Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, CID)
 			If %HalffabItemsBoomCache.Count() < ..CacheGrootte {
 			 	Do %HalffabItemsBoomCache.SetAt(Boom, CacheKey)
 				Do ..LogBoom("Toegevoegd aan cache (nr "_%HalffabItemsBoomCache.Count()_")", 
@@ -86,7 +98,7 @@
 			}
 		}
 	} Else {
-		Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing)
+		Set Boom = ..BerekenBoom(IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, CID)
 		Do ..LogBoom("Cache niet actief", IngegevenKenmerken, BerekeningsSpecificatie, MaatwerkAanpassing, Boom)
 	}
 	
@@ -120,16 +132,17 @@
 </Method>
 
 <Method name="BerekenBoom">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing,CID:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
 <Implementation><![CDATA[
 	#dim Familie As DOM.PM.enu.Familie = IngegevenKenmerken.GeefFamilie()
 	#dim Variant As DOM.PM.enu.Variant = IngegevenKenmerken.GeefVariant()
 	
 	Set HalffabContext = ##class(DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New(Familie,Variant,BerekeningsSpecificatie)
-	
-	If (..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr())) {
+	If (..OmleidingNaarEncowayBepaler.IsMaatwerkCalculatieInEncoway(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVariant())) {
+		Set HalffabContext.HalffabItemsBoom = ..EncowayProductieAansturingService.GeefHalffabItemsBoomEncowayBased(CID)
+	} ElseIf (..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr())) {
 		#dim KlantId As DOM.VKP.VanHoeckeKlantID = BerekeningsSpecificatie.GeefKlantID()
 		#dim Aantal As %Integer = BerekeningsSpecificatie.GeefHoeveelheid()
 		Set HalffabContext.HalffabItemsBoom = ..DotNetProductieAansturingService.GeefHalffabItemsBoomDotNetBased(IngegevenKenmerken, KlantId, Aantal, BerekeningsSpecificatie.BerekeningWijze)
Index: APPS/Halux/common/impl/ProductieAansturingService.cls.xml
===================================================================
diff -u -r71431 -r72785
--- APPS/Halux/common/impl/ProductieAansturingService.cls.xml	(.../ProductieAansturingService.cls.xml)	(revision 71431)
+++ APPS/Halux/common/impl/ProductieAansturingService.cls.xml	(.../ProductieAansturingService.cls.xml)	(revision 72785)
@@ -33,11 +33,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="EncowayProductieAansturingService">
+<Type>APPS.Halux.common.impl.Encoway.ProductieAansturingService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="OmleidingNaarDotNetBepaler">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="OmleidingNaarEncowayBepaler">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>BatchService:APPS.Halux.common.BatchService,BerekeningService:APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken="",IngegevenKenmerkenBepaler:APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler="",ProductAPI:DOM.PM.ProductAPI="",LadeInfoApi:DOM.PM.Maatwerk.LadeInfoAPI="",DotNetProductieAansturingService:APPS.Halux.common.impl.DotNet.ProductieAansturingService=""</FormalSpec>
 <Private>1</Private>
@@ -51,7 +61,9 @@
 	Set ..LadeInfoApi = $$$Inject(LadeInfoApi, ##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
 	Set ..BerekeningService = $$$Inject(BerekeningService, ##class(APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken).%New())
 	Set ..DotNetProductieAansturingService = $$$Inject(DotNetProductieAansturingService, ##class(APPS.Halux.common.impl.DotNet.ProductieAansturingService).%New())
+	Set ..EncowayProductieAansturingService = ##class(APPS.Halux.common.impl.Encoway.ProductieAansturingService).%New()
 	Set ..OmleidingNaarDotNetBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler).%New()
+	Set ..OmleidingNaarEncowayBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarEncowayBepaler).%New()
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -67,7 +79,10 @@
 	#dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = Product.GeefBerekeningsSpecificatie()
 	Do BerekeningsSpecificatie.ZetBerekeningWijze(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
 	
-	If ..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr()) {
+	If ..OmleidingNaarEncowayBepaler.IsMaatwerkCalculatieInEncoway(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr()) {
+		#dim CID As %String = Product.GeefCID()
+		Set HalffabItemsBoom = ..EncowayProductieAansturingService.GeefHalffabItemsBoomEncowayBased(CID)
+	} ElseIf ..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr()) {
 		#dim KlantId As DOM.VKP.VanHoeckeKlantID = BerekeningsSpecificatie.GeefKlantID()
 		#dim Aantal As %Integer = BerekeningsSpecificatie.GeefHoeveelheid()
 		#dim BerekeningWijze As DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze = BerekeningsSpecificatie.GeefBerekeningWijze()