Index: DOM/PM/impl/DataM/DataMProductCreator.cls.xml
===================================================================
diff -u -r42037 -r57203
--- DOM/PM/impl/DataM/DataMProductCreator.cls.xml	(.../DataMProductCreator.cls.xml)	(revision 42037)
+++ DOM/PM/impl/DataM/DataMProductCreator.cls.xml	(.../DataMProductCreator.cls.xml)	(revision 57203)
@@ -65,7 +65,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ProductSpecificatie:DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,KostItem:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem</FormalSpec>
+<FormalSpec>ProductSpecificatie:DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,KostItem:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem,ProductData:DOM.PM.dto.ProductData=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -75,6 +75,8 @@
 	Set ..BerekeningsSpecificatie = BerekeningsSpecificatie
 	Set ..HalffabItemsBoom = HalffabItemsBoom
 	Set ..KostItem = KostItem
+	Set ..PRNr = ProductData.PRNr
+	Set ..DossierNummer = ProductData.DossierNummer
 
 	// Bepaal het generisch PRNr, dit nummer wordt gebruikt om uit KPR een template op te halen
 	#dim GenerischPRNr As %String = ..GeefGenerischPRNr()
@@ -253,7 +255,14 @@
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
-	#dim PRNr As %String = $$NEXTID^PRODUKT(1)
+	#dim PRNr As %String
+	
+	If (..PRNr = "") {
+		Set PRNr = $$NEXTID^PRODUKT(1)
+	} Else {
+		Set PRNr = ..PRNr
+	}
+	
  	#dim IdentNr As %String = $$IDENTNR^PRODUKT(PRNr,"9")
  	Do ..ZetWaarde(2,25,IdentNr)
  	#dim i As %Integer
Index: DOM/PM/dto/ProductData.cls.xml
===================================================================
diff -u
--- DOM/PM/dto/ProductData.cls.xml	(revision 0)
+++ DOM/PM/dto/ProductData.cls.xml	(revision 57203)
@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.dto.ProductData">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="PRNr">
+<Type>%Integer</Type>
+</Property>
+
+<Property name="DossierNummer">
+<Type>%String</Type>
+</Property>
+</Class>
+
+
+</Export>