Index: DOM/PM/Maatwerk/RVG/impl/BouwsteenCreatorLosseComponenten.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/RVG/impl/BouwsteenCreatorLosseComponenten.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/RVG/impl/BouwsteenCreatorLosseComponenten.cls.xml	(revision 69234)
@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.Maatwerk.RVG.impl.BouwsteenCreatorLosseComponenten">
+<Super>DOM.PM.impl.DataM.DataMBouwsteenCreator</Super>
+
+<Method name="MaakProductBouwstenen">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim HalffabItemIt As TECH.Iterator = ..HalffabItemsBoom.GeefHalffabItemsIterator()
+	While (HalffabItemIt.HasNext())
+	{
+		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HalffabItemIt.Next()
+		Set ..AantalKinderen = ..AantalKinderen + 1
+		;Set ^PRBS(..BSNode,..PRNr,"KIND."_##class(TECH.StringUtils).AlignRight(..AantalKinderen,"0",3)) = Product.GeefID()_"\"_Item.Aantal_"\K\\\\\\\\PROD"
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/impl/ProductAPI.cls.xml
===================================================================
diff -u -r68776 -r69234
--- DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 68776)
+++ DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 69234)
@@ -294,9 +294,14 @@
 	}
 	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Meubel()) && (ProductSpecificatie.GeefVariant() = ##class(DOM.PM.enu.LadeVariant).Revego())
 	{
+		#dim RVGIK As DOM.PM.Maatwerk.Calc.Common.impl.RVGKenmerken = ProductSpecificatie.GeefIngegevenKenmerken()
 		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()
+		If (RVGIK.ProductieWijze = ##class(DOM.PM.enu.RVGProductieWijze).LosseComponenten()) {
+			Set BouwsteenCreator = ##class(DOM.PM.Maatwerk.RVG.impl.BouwsteenCreatorLosseComponenten).%New()
+		} Else {
+			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())