Index: APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml
===================================================================
diff -u -r74266 -r75118
--- APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 74266)
+++ APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 75118)
@@ -62,7 +62,7 @@
 		Set Halffabrikaat = HalffabrikatenListIterator.Next()
 		If ($$$Not(Halffabrikaat.Type = "Included")) {
 			Set Rol = HalffabrikatenListIterator.Key()
-			Do ..VoegToeHalffabrikaat(Rol, Halffabrikaat)
+			Do ..VoegToeHalffabrikaat(Rol, Halffabrikaat, ..VhConfigHelper.GeefIngegevenKenmerken().GeefVariant())
 		}		
 	}
 	
@@ -72,7 +72,7 @@
 		Set Halffabrikaat = HalffabrikatenListIterator.Next()
 		If (Halffabrikaat.Type = "Included") {
 			Set Rol = HalffabrikatenListIterator.Key()
-			Do ..VoegToeHalffabrikaat(Rol, Halffabrikaat)
+			Do ..VoegToeHalffabrikaat(Rol, Halffabrikaat, ..VhConfigHelper.GeefIngegevenKenmerken().GeefVariant())
 		}		
 	}
 	
@@ -81,15 +81,16 @@
 </Method>
 
 <Method name="VoegToeHalffabrikaat">
-<FormalSpec>RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat,Variant:%String</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
 	#dim SGHalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem
 	#dim SGSstHalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem
 	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem
 	#dim IsDeelVanSamengesteldHalffabItem As %Boolean = $$$False
 	#dim IsDeelVanSSTVerpakkingSamengesteldHalffabItem As %Boolean = $$$False
 	
-	#dim RolnaamVoorCache As %String = ..RolnaamProcessor.GeefRolnaamVoorCache(RolnaamVoorEncoway)
+	#dim RolnaamVoorCache As %String = ..RolnaamProcessor.GeefRolnaamVoorCache(RolnaamVoorEncoway, Variant)	
 	If ((##class(TECH.StringUtils).Contains(RolnaamVoorCache, ".")) || ..RolnaamProcessor.IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
 		#dim SGRol As %String = ""
 		If (..RolnaamProcessor.IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
@@ -138,7 +139,7 @@
 	} ElseIf (Halffabrikaat.Type = "Processed") {
 		Set HalffabItem = ..GeefBewerktHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	} ElseIf (Halffabrikaat.Type = "Included") {
-		Set HalffabItem = ..GeefIngebrepenHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
+		Set HalffabItem = ..GeefIngebrepenHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat, Variant)
 	} ElseIf (Halffabrikaat.Type = "Maatwerk") {
 		Set HalffabItem = ..GeefMaatwerkHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	} Else {
@@ -225,13 +226,13 @@
 </Method>
 
 <Method name="GeefIngebrepenHalffabItem">
-<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat,Variant:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem</ReturnType>
 <Implementation><![CDATA[
 	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem).%New(..HalffabContext, RolnaamVoorCache)
 	
-	#dim RolnaamParent As %String = ..RolnaamProcessor.GeefRolnaamVoorCache(Halffabrikaat.RoleNameParent)	
+	#dim RolnaamParent As %String = ..RolnaamProcessor.GeefRolnaamVoorCache(Halffabrikaat.RoleNameParent, Variant)	
 	Set:(##class(TECH.StringUtils).Contains(RolnaamParent, ".")) RolnaamParent = ##class(TECH.StringUtils).Replace(RolnaamParent, ".", "->")
 	#dim ReferentieHalffabItem As DOM.PM.Maatwerk.Calc.HF.Halffab = ..HalffabItemsBoom.GeefHalffabItem(RolnaamParent)
 	
@@ -275,10 +276,16 @@
 	Set Halffab.RugHoogte = Halffabrikaat.Characteristics.GetAt("BackHeight")
 	Set Halffab.RugWandMateriaal = Halffabrikaat.Characteristics.GetAt("BackSideMaterial")
 	Set Halffab.VoorwandType = Halffabrikaat.Characteristics.GetAt("FrontType")
+	Set Halffab.LiRe = Halffabrikaat.Characteristics.GetAt("LeRi")
 	
 	Set:(Rol = "BackWood") Halffab.RugWandMateriaal = "Hout"
 	Set:(Rol = "BackSteel") Halffab.RugWandMateriaal = "Staal"
 	
+	If ((Rol = "Mat") || (Rol = "MatX") || (Rol = "MatY") || (Rol = "MatZ")) {
+		Set Halffab.OrigineleMatBreedte = Halffabrikaat.GrossDimensionSemiFinishedProduct
+		Set Halffab.OrigineleMatDiepte = Halffabrikaat.PpsCharacteristics.GetAt("GrossDimensionDepth")
+	}
+	
 	Quit Halffab
 ]]></Implementation>
 </Method>