Index: APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml
===================================================================
diff -u -r63062 -r63063
--- APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml	(.../ProductieSequentieItemService.cls.xml)	(revision 63062)
+++ APPS/Halux/common/impl/ProductieSequentieItemService.cls.xml	(.../ProductieSequentieItemService.cls.xml)	(revision 63063)
@@ -28,15 +28,27 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DotNetMaatwerkService">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.GeefMaatwerkDetails</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MaatwerkDetailsConvertor">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>MaatwerkService:APPS.PM.Maatwerk.MaatwerkService="",ProductieAansturingIngegevenKenmerkenBepaler:APPS.Halux.common.ProductieAansturingIngegevenKenmerkenBepaler=""</FormalSpec>
+<FormalSpec>MaatwerkService:APPS.PM.Maatwerk.MaatwerkService="",ProductieAansturingIngegevenKenmerkenBepaler:APPS.Halux.common.ProductieAansturingIngegevenKenmerkenBepaler="",DotNetMaatwerkService:WSimpl.PM.Maatwerk.MaatwerkService.DotNet.GeefMaatwerkDetails="",MaatwerkDetailsConvertor:WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..MaatwerkService = $$$Inject(MaatwerkService, ##class(APPS.PM.Maatwerk.MaatwerkService).%New())
 	Set ..ProductieAansturingIngegevenKenmerkenBepaler = $$$Inject(ProductieAansturingIngegevenKenmerkenBepaler, ##class(APPS.Halux.common.impl.ProductieAansturingIngegevenKenmerkenBepaler).%New())
+	Set ..DotNetMaatwerkService = $$$Inject(DotNetMaatwerkService, ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.GeefMaatwerkDetails).%New())
+	Set ..MaatwerkDetailsConvertor = $$$Inject(MaatwerkDetailsConvertor, ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter).%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()
@@ -49,15 +61,16 @@
 <FormalSpec>ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
 <Implementation><![CDATA[
-	#dim Product As DOM.PM.MaatwerkProduct = ..ProductTypeAPI.GeefMaatwerkProduct(ProductieSequentieItem.ProductID)
-	
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..GeefIngegevenKenmerken(ProductieSequentieItem)
-
-	#dim MaatwerkAanpassing As DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing = ..GeefMaatwerkAanpassing(Product)
 	
-	#dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ..GeefBerekeningSpecificatie(ProductieSequentieItem)
+	If (..IsHalffabItemsBoomDotNetBasedCalculated(IngegevenKenmerken)) {
+		Set HalffabItemsBoom = ..GeefHalffabItemsBoomDotNetBased(IngegevenKenmerken, ProductieSequentieItem)
+	} Else {
+		Set HalffabItemsBoom = ..GeefHalffabItemsBoomCacheBased(IngegevenKenmerken, ProductieSequentieItem)
+	}
 	
-	Quit ..BerekeningService.BerekenHalffabItemsBoom(IngegevenKenmerken,BerekeningsSpecificatie,MaatwerkAanpassing)
+	Quit HalffabItemsBoom
 ]]></Implementation>
 </Method>
 
@@ -72,17 +85,40 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefMaatwerkAanpassing">
-<FormalSpec>Product:DOM.PM.MaatwerkProduct</FormalSpec>
+<Method name="IsHalffabItemsBoomDotNetBasedCalculated">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <Private>1</Private>
-<ReturnType>DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing</ReturnType>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Merivobox())
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabItemsBoomCacheBased">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
 <Implementation><![CDATA[
-	#dim Aanpassing As DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing = ""
-	Set:..MaatwerkService.BestaatMaatwerkAanpassingOpProduct(Product.GeefID()) Aanpassing = ..MaatwerkService.GeefMaatwerkAanpassingVanProduct(Product.GeefID())
-	Quit Aanpassing
+	#dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ..GeefBerekeningSpecificatie(ProductieSequentieItem)
+	#dim Product As DOM.PM.MaatwerkProduct = ..ProductTypeAPI.GeefMaatwerkProduct(ProductieSequentieItem.ProductID)
+	#dim MaatwerkAanpassing As DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing = ..GeefMaatwerkAanpassing(Product)
+	
+	Quit ..BerekeningService.BerekenHalffabItemsBoom(IngegevenKenmerken,BerekeningsSpecificatie,MaatwerkAanpassing)
 ]]></Implementation>
 </Method>
 
+<Method name="GeefHalffabItemsBoomDotNetBased">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[
+	#dim KlantId As DOM.VKP.VanHoeckeKlantID = ProductieSequentieItem.PartijID
+	#dim Aantal As %Integer = ProductieSequentieItem.TotaalAantal
+	#dim MaatwerkDetails As APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson = ..DotNetMaatwerkService.GeefMaatwerkDetails(IngegevenKenmerken, KlantId, Aantal)
+	
+	Quit ..MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails)
+]]></Implementation>
+</Method>
+
 <Method name="GeefBerekeningSpecificatie">
 <FormalSpec>ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
 <Private>1</Private>
@@ -93,6 +129,17 @@
 	Quit BerekeningSpecificatie
 ]]></Implementation>
 </Method>
+
+<Method name="GeefMaatwerkAanpassing">
+<FormalSpec>Product:DOM.PM.MaatwerkProduct</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing</ReturnType>
+<Implementation><![CDATA[
+	#dim Aanpassing As DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing = ""
+	Set:..MaatwerkService.BestaatMaatwerkAanpassingOpProduct(Product.GeefID()) Aanpassing = ..MaatwerkService.GeefMaatwerkAanpassingVanProduct(Product.GeefID())
+	Quit Aanpassing
+]]></Implementation>
+</Method>
 </Class>