Index: EXTERN/PM/Maatwerk/MaatwerkService.cls.xml
===================================================================
diff -u -r64428 -r64429
--- EXTERN/PM/Maatwerk/MaatwerkService.cls.xml	(.../MaatwerkService.cls.xml)	(revision 64428)
+++ EXTERN/PM/Maatwerk/MaatwerkService.cls.xml	(.../MaatwerkService.cls.xml)	(revision 64429)
@@ -180,22 +180,34 @@
 	
 	If $$$Not(OorspronkelijkProductID = "") {
 		#dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMaatwerkProduct(OorspronkelijkProductID)
-		set IngegevenKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken().%ConstructClone(1)
+		Set IngegevenKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken().%ConstructClone(1)
 	} Else {
-	 	set IngegevenKenmerken = $CLASSMETHOD(KlasseNaam, "%New")
+	 	Set IngegevenKenmerken = $CLASSMETHOD(KlasseNaam, "%New")
 	}
 	
+	#dim GekoppeldeIK As array Of DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = IngegevenKenmerken.GekoppeldeIngegevenKenmerken
+	
 	#dim i As %Integer
 	For i = 1:1:KenmerkNamen.Count() {
 		If ((KenmerkNamen.GetAt(i) = "MatKleur")) {
-			Set $PROPERTY(IngegevenKenmerken.GekoppeldeIngegevenKenmerken.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX()), "Kleur") = KenmerkWaarden.GetAt(i)
+			Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX()), "Kleur") = KenmerkWaarden.GetAt(i)
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatY())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatY()), "Kleur") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatM())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatM()), "Kleur") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ1())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ1()), "Kleur") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ2())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ2()), "Kleur") = KenmerkWaarden.GetAt(i)}
 		} ElseIf ((KenmerkNamen.GetAt(i) = "MatMateriaal")) {		
-			Set $PROPERTY(IngegevenKenmerken.GekoppeldeIngegevenKenmerken.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX()), "Materiaal") = KenmerkWaarden.GetAt(i)
+			Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX()), "Materiaal") = KenmerkWaarden.GetAt(i)
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatY())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatY()), "Materiaal") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatM())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatM()), "Materiaal") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ1())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ1()), "Materiaal") = KenmerkWaarden.GetAt(i)} 
+			If $IsObject(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ2())) {Set $PROPERTY(GekoppeldeIK.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatZ2()), "Materiaal") = KenmerkWaarden.GetAt(i)}
 		} Else {		
 			Set $PROPERTY(IngegevenKenmerken, KenmerkNamen.GetAt(i)) = KenmerkWaarden.GetAt(i)
 		}
 	}
 	
+	Set IngegevenKenmerken.GekoppeldeIngegevenKenmerken = GekoppeldeIK
+	
 	#dim Msg As %String = ""
 	#dim Status As %Status = IngegevenKenmerken.%ValidateObject()
 	If $$$ISERR(Status) {