Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml
===================================================================
diff -u -r53285 -r67637
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 53285)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 67637)
@@ -31,6 +31,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVariant">
+<FormalSpec>Variant:DOM.PM.enu.Variant</FormalSpec>
+<ReturnType>DOM.PM.enu.Variant</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="GeefBerekenDatum">
 <ReturnType>%Date</ReturnType>
 <Implementation><![CDATA[	Quit ##super()
Index: DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml
===================================================================
diff -u -r62762 -r67637
--- DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml	(.../DataMMaatwerkProduct.cls.xml)	(revision 62762)
+++ DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml	(.../DataMMaatwerkProduct.cls.xml)	(revision 67637)
@@ -8,16 +8,33 @@
 <Implementation><![CDATA[
 	#dim ID As %String = ..Data15.GeefPiece(14)
 	#dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie= ""
+	#dim PRNr As %Integer = ..GeefPRNr()
+	
 	if (ID '= ""){
 		Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%OpenId(ID)
 	}
 	
-	/// Standaard specificatie invullen, dit enkel omdat oude producten nog geen berekeningsspecificatie conversie hebben
+	If (BerekeningsSpecificatie = "") {		
+		#dim ProductTypeAPI As DOM.PM.ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
+		
+		If (ProductTypeAPI.IsTandemboxProduct(PRNr)) {
+			#dim GADataID As %String =$P(^KPR(PRNr,"G"),"\",13)
+			#dim BestaatGADataProduct As %Boolean = ##class(Prod.GAData.Product).%ExistsId(GADataID)
+			
+			If (BestaatGADataProduct) {
+				#dim Product As Prod.GAData.Product =  ##class(Prod.GAData.Product).%OpenId(GADataID)
+				Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1, Product.GetKLNr(), ##class(DOM.common.VanHoeckePersonality).Instance())
+			}
+		}
+	}
+	
 	If (BerekeningsSpecificatie = "") {
-		#dim KlantID As DOM.VKP.VanHoeckeKlantID = "K||1000"
-		#dim Personality As DOM.common.VanHoeckePersonality = ##class(DOM.common.VanHoeckePersonality).Instance()
-		Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,KlantID,Personality)
+		Set Exception = ##class(TECH.Exceptions.AbstractOmschrijvingException).%New("Geen berekeningspecificatie gevonden voor product '" _ PRNr _ "'")	
+		Set Logger = ##class(vhLib.Logger).%New("DataM.DataMMaatwerkProduct")
+		Do Logger.Error("Geen BerekeningSpecificatie gevonden voor product '" _ PRNr _ "'")
+		Do ##class(TECH.ExceptionHandler).Throw(Exception)
 	}
+	
 	Quit BerekeningsSpecificatie
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml
===================================================================
diff -u -r61655 -r67637
--- vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 61655)
+++ vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 67637)
@@ -90,6 +90,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVariant">
+<FormalSpec>Variant:DOM.PM.enu.Variant</FormalSpec>
+<ReturnType>DOM.PM.enu.Variant</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVariant",Variant)
+]]></Implementation>
+</Method>
+
 <Method name="LogExceptie">
 <FormalSpec>Exceptie:TECH.IException</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("LogExceptie",Exceptie)
Index: DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml
===================================================================
diff -u -r62977 -r67637
--- DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 62977)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabContext.cls.xml	(.../HalffabContext.cls.xml)	(revision 67637)
@@ -83,7 +83,7 @@
 <Implementation><![CDATA[
 	Set ..DateTimeAPI = ##class(DOM.PM.Maatwerk.Calc.IoCContainer).Instance().Resolve("DateTimeAPI")
 	Set ..Familie = Familie
-	Set ..Variant = Variant
+	Set ..Variant = ..GeefVariant(Variant)
 	Set ..BerekeningsSpecificatie = BerekeningsSpecificatie
 	Set ..KlantOrderInstellingen = ##class(DOM.VKP.impl.DataM.KlantOrderInstellingenImpl).%New(BerekeningsSpecificatie.GeefKlantID())
 	Set ..BerekenDatum = ..GeefBerekenDatum()
@@ -143,6 +143,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVariant">
+<FormalSpec>Variant:DOM.PM.enu.Variant</FormalSpec>
+<ReturnType>DOM.PM.enu.Variant</ReturnType>
+<Implementation><![CDATA[
+	If (Variant = ##class(DOM.PM.enu.Variant).TandemboxMengvorm()) {
+		Quit ##class(DOM.PM.enu.Variant).TandemboxAntaro()
+	} Else {
+		Quit Variant
+	}
+]]></Implementation>
+</Method>
+
 <Method name="SelecteerHalffabrikaten">
 <Description>
 RedenVoorSelectie: Optionele reden waarmee een builder kan aangeven waarom hij een bepaalde selectie probeert uit te voeren.</Description>