Index: DOM/PM/TBXProduct/impl/TBXSifonladeType1.cls.xml
===================================================================
diff -u -r44146 -r44163
--- DOM/PM/TBXProduct/impl/TBXSifonladeType1.cls.xml	(.../TBXSifonladeType1.cls.xml)	(revision 44146)
+++ DOM/PM/TBXProduct/impl/TBXSifonladeType1.cls.xml	(.../TBXSifonladeType1.cls.xml)	(revision 44163)
@@ -20,14 +20,14 @@
 		Set Radius = 12
 		If (..GeefAantalUitsparingen() = 1)
 		{
-			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXRondeUitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts(),Radius)
+			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXSifonType1Uitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts(),Radius)
 			Do ..Uitsparingen.Insert(RondeUitsparing)
 		}
 		Else
 		{
-			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXRondeUitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts2(),Radius)
+			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXSifonType1Uitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks(),..GeefAfstandTotZijkantRechts2(),Radius)
 			Do ..Uitsparingen.Insert(RondeUitsparing)
-			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXRondeUitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks2(),..GeefAfstandTotZijkantRechts(),Radius)
+			Set RondeUitsparing = ##class(DOM.PM.TBXProduct.impl.TBXSifonType1Uitsparing).%New(..GeefUitsparingDiepte(),..GeefSifonBreedte(),..GeefAfstandTotZijkantLinks2(),..GeefAfstandTotZijkantRechts(),Radius)
 			Do ..Uitsparingen.Insert(RondeUitsparing)
 		}
 	}