Index: DOM/PM/impl/ProductAPI.cls.xml
===================================================================
diff -u -r68048 -r68589
--- DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 68048)
+++ DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 68589)
@@ -288,6 +288,13 @@
 		Set BouwsteenCreator = ##class(DOM.PM.impl.DataM.DataMBouwsteenCreator).%New()
 		Do BouwsteenCreator.Init(ProductID, ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
 	}
+	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Meubel()) && (ProductSpecificatie.GeefVariant() = ##class(DOM.PM.enu.LadeVariant).Revego())
+	{
+		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMRVGLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem, ProductData)
+		Set ProductID = ProductCreator.GeefPRNr()
+		Set BouwsteenCreator = ##class(DOM.PM.impl.DataM.DataMBouwsteenCreator).%New()
+		Do BouwsteenCreator.Init(ProductID, ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
+	}
 	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).AluKader())
 	{
 		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMAluKaderCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)