Index: BL/PR/GA/impl/TandemBoxRecalcBS.cls.xml
===================================================================
diff -u -r29059 -r44213
--- BL/PR/GA/impl/TandemBoxRecalcBS.cls.xml	(.../TandemBoxRecalcBS.cls.xml)	(revision 29059)
+++ BL/PR/GA/impl/TandemBoxRecalcBS.cls.xml	(.../TandemBoxRecalcBS.cls.xml)	(revision 44213)
@@ -298,7 +298,7 @@
 	Set Product=##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(PRNr)
 	If Product.%Extends("DOM.PM.TBXProduct.TBXLadeMetUitsparing") {
 		Set Uitsparing=Product.GeefUitsparingen().GetNext("")
-		If Uitsparing.%Extends("DOM.PM.TBXProduct.TBXRechteUitsparing") {
+		If Uitsparing.%Extends("DOM.PM.TBXProduct.impl.TBXSpoelbakType2Uitsparing") {
 			Set ProductMetASM=(Product.GeefAntislipmat()'=##class(DOM.PM.enu.TBXAntislipmat).Geen())
 			If ProductMetASM {
 				Set BevatTussenmat=1
Index: DOM/PM/TBXProduct/impl/TBXSpoelbakladeImpl.cls.xml
===================================================================
diff -u -r44161 -r44213
--- DOM/PM/TBXProduct/impl/TBXSpoelbakladeImpl.cls.xml	(.../TBXSpoelbakladeImpl.cls.xml)	(revision 44161)
+++ DOM/PM/TBXProduct/impl/TBXSpoelbakladeImpl.cls.xml	(.../TBXSpoelbakladeImpl.cls.xml)	(revision 44213)
@@ -16,7 +16,7 @@
 <Implementation><![CDATA[
 	If (..Uitsparingen.Count() = 0)
 	{
-		Set RechteUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXSifonType2Uitsparing).%New(..GeefUitsparingDiepte(),..GeefSpoelbakBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts(),..GeefSpoelbakZijkantKleur(),..GeefTussenrugMateriaal())
+		Set RechteUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXSpoelbakType2Uitsparing).%New(..GeefUitsparingDiepte(),..GeefSpoelbakBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts(),..GeefSpoelbakZijkantKleur(),..GeefTussenrugMateriaal())
 		Do ..Uitsparingen.Insert(RechteUitsparing)
 	}
 	Quit ..Uitsparingen