Index: DOM/PM/impl/DataM/DataMProductAPI.cls.xml
===================================================================
diff -u -r1507 -r1516
--- DOM/PM/impl/DataM/DataMProductAPI.cls.xml	(.../DataMProductAPI.cls.xml)	(revision 1507)
+++ DOM/PM/impl/DataM/DataMProductAPI.cls.xml	(.../DataMProductAPI.cls.xml)	(revision 1516)
@@ -124,12 +124,17 @@
 <ReturnType>DOM.PM.Product</ReturnType>
 <Implementation><![CDATA[
 	Set ProductCreator = ""
-	If (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
+	If (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade()) && (ProductSpecificatie.GeefVariant() '=  ##class(DOM.PM.enu.LadeVariant).TAOO())
 	{
-		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
+		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMTBXLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
 		Set PRNr = ProductCreator.GeefPRNr()
 		Set KenmerkenCreator = ##class(DOM.PM.impl.DataM.DataMLadeKenmerkenCreator).%New(PRNr,ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom)
 	}
+	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade()) && (ProductSpecificatie.GeefVariant() =  ##class(DOM.PM.enu.LadeVariant).TAOO())
+	{
+		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMTAOOLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
+		Set PRNr = ProductCreator.GeefPRNr()
+	}
 	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).AluKader())
 	{
 		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMAluKaderCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)