Index: AXimpl/PM/SchaduwPrijs/CalculateAll.cls.xml
===================================================================
diff -u -r71135 -r71249
--- AXimpl/PM/SchaduwPrijs/CalculateAll.cls.xml	(.../CalculateAll.cls.xml)	(revision 71135)
+++ AXimpl/PM/SchaduwPrijs/CalculateAll.cls.xml	(.../CalculateAll.cls.xml)	(revision 71249)
@@ -149,7 +149,7 @@
 						#dim KostItem As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem
 						
 						#dim MaatwerkDetails As APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson = DotNetMaatwerkService.GeefMaatwerkDetails(IngegevenKenmerken, Klnr, 1, ProductData)
-						Set HalffabItemsBoom = MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails)
+						Set HalffabItemsBoom = MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails, IngegevenKenmerken)
 						Set KostItem = MaatwerkDetailsConvertor.GeefKostItems(MaatwerkDetails)
 						
 						Set BouwsteenCreator = ##class(DOM.PM.impl.DataM.DataMBouwsteenCreator).%New()
@@ -178,7 +178,7 @@
 	
 	Set StartTijd=$H
 	
-	Set ..itProduct=##class(AXProductIterator).%New(1)
+	Set ..itProduct=##class(AXProductIterator).%New(3) // Streefdatum = 1/04/2022
 	Do ..VerwerkLijstTAOR()
 	
 	lock -SchaduwPrijsCalculateTAOR:0 
@@ -205,7 +205,7 @@
 	Do ..VerwerkLijstTAOR()
 	
 	Write:..Debug !," ***** MAATWERK (CachePerVariant) *****"
-	Set ..itProduct=##class(AXProductIterator).%New(7) // Streefdatum = 1/12/2022
+	Set ..itProduct=##class(AXProductIterator).%New(8) // Streefdatum = 1/12/2022
 	Do ..VerwerkLijstTAOR()
 	
 	lock -SchaduwPrijsCalculateTAOR:0 
@@ -248,7 +248,7 @@
 				If ($$$Not(PRNr = "") && (ProductTypeAPI.IsTAORboxProduct(PRNr))) {
 					Set IsNotLosseComponenten = $$$Not(ProductTypeAPI.IsTaxLosseComponentenProduct(PRNr))
 					
-					If IsNotLosseComponenten {
+					If (IsNotLosseComponenten) {
 						// LosseComponenten kunnen met oudere creatiedatum voorkomen. Om te weten wat het KleinstePRNr is, nodig voor querry in zTryout.THB.BOMBOL.TAOR.VergelijkCacheDotnet, 
 						// moet je ze in deze If tijdelijk uitsluiten. Tenzij ^THBTaorPriceDiff gebruikt wordt, dan is dit irrelevant.
 						Set IsTaor = $$$True
@@ -276,7 +276,7 @@
 							#dim KostItem As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem
 						
 							#dim MaatwerkDetails As APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson = DotNetMaatwerkService.GeefMaatwerkDetails(IngegevenKenmerken, Klnr, 0, ProductData,,##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).PrijsBerekening())
-							Set HalffabItemsBoom = MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails)
+							Set HalffabItemsBoom = MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails, IngegevenKenmerken)
 							;Do $System.OBJ.Dump(HalffabItemsBoom)
 							Set KostItem = MaatwerkDetailsConvertor.GeefKostItems(MaatwerkDetails)