Index: APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml
===================================================================
diff -u -r73005 -r73445
--- APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 73005)
+++ APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 73445)
@@ -61,18 +61,19 @@
 </Method>
 
 <Method name="VoegToeHalffabrikaat">
-<FormalSpec>Rol:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
 <Implementation><![CDATA[
 	#dim SGHalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem
 	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem
 	#dim IsDeelVanSamengesteldHalffabItem As %Boolean = $$$False
 	
-	If ((##class(TECH.StringUtils).Contains(Rol, ".")) || ..IsResultaatVanGekoppeldKenmerk(Rol)) {
+	#dim RolnaamVoorCache As %String = ..GeefRolnaamVoorCache(RolnaamVoorEncoway)
+	If ((##class(TECH.StringUtils).Contains(RolnaamVoorCache, ".")) || ..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
 		#dim SGRol As %String = ""
-		If (..IsResultaatVanGekoppeldKenmerk(Rol)) {
-			Set SGRol = ..GeefRolnaamVanGekoppeldKenmerk(Rol)
+		If (..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
+			Set SGRol = ..GeefRolnaamVanGekoppeldKenmerk(RolnaamVoorCache)
 		} Else {
-			Set SGRol = $Piece(Rol, ".", 1)
+			Set SGRol = $Piece(RolnaamVoorCache, ".", 1)
 		}
 		
 		Set IsDeelVanSamengesteldHalffabItem = $$$True
@@ -84,21 +85,21 @@
 			Set SGHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(SGRol)
 		}
 		
-		If (..IsResultaatVanGekoppeldKenmerk(Rol)) {
-			Set Rol = $Piece(Rol, ".", 1)
+		If (..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
+			Set RolnaamVoorCache = $Piece(RolnaamVoorCache, ".", 1)
 		} Else {
-			Set Rol = $Piece(Rol, ".", 2)
+			Set RolnaamVoorCache = $Piece(RolnaamVoorCache, ".", 2)
 		}
 	}
 	
 	If (Halffabrikaat.Type = "Standaard") {
-		Set HalffabItem = ..GeefStandaardHalffabItem(Rol, Halffabrikaat)
+		Set HalffabItem = ..GeefStandaardHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	} ElseIf (Halffabrikaat.Type = "Bewerkt") {
-		Set HalffabItem = ..GeefBewerktHalffabItem(Rol, Halffabrikaat)
+		Set HalffabItem = ..GeefBewerktHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	} ElseIf (Halffabrikaat.Type = "Inbegrepen") {
-		Set HalffabItem = ..GeefIngebrepenHalffabItem(Rol, Halffabrikaat)
+		Set HalffabItem = ..GeefIngebrepenHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	} ElseIf (Halffabrikaat.Type = "Maatwerk") {
-		Set HalffabItem = ..GeefMaatwerkHalffabItem(Rol, Halffabrikaat)
+		Set HalffabItem = ..GeefMaatwerkHalffabItem(RolnaamVoorCache, RolnaamVoorEncoway, Halffabrikaat)
 	}
 	
 	If (IsDeelVanSamengesteldHalffabItem) {
@@ -124,12 +125,12 @@
 </Method>
 
 <Method name="GeefStandaardHalffabItem">
-<FormalSpec>Rol:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem</ReturnType>
 <Implementation><![CDATA[
-	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, Rol)
-	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New(..HalffabContext, ..GeefRolnaamVoorCache(Rol), Halffab)
+	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, RolnaamVoorEncoway)
+	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New(..HalffabContext, RolnaamVoorCache, Halffab)
 	
 	Set HalffabItem.Aantal 							= +(Halffabrikaat.Aantal)		
 	Set HalffabItem.OpnemenInEindproduct 			= Halffabrikaat.OpnemenInEindproduct
@@ -142,12 +143,12 @@
 </Method>
 
 <Method name="GeefBewerktHalffabItem">
-<FormalSpec>Rol:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem</ReturnType>
 <Implementation><![CDATA[
-	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, Rol)
-	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New(..HalffabContext, ..GeefRolnaamVoorCache(Rol), Halffab)
+	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, RolnaamVoorEncoway)
+	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New(..HalffabContext, RolnaamVoorCache, Halffab)
 	
 	Set HalffabItem.Aantal 							= +(Halffabrikaat.Aantal)
 	Set HalffabItem.AfmetingAangerekendPerStuk		= +(Halffabrikaat.AfmetingAangerekendPerStuk)
@@ -171,12 +172,12 @@
 </Method>
 
 <Method name="GeefIngebrepenHalffabItem">
-<FormalSpec>Rol:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem</ReturnType>
 <Implementation><![CDATA[
-	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, Rol)
-	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem).%New(..HalffabContext, ..GeefRolnaamVoorCache(Rol), Halffab)
+	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(Halffabrikaat, RolnaamVoorEncoway)
+	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem).%New(..HalffabContext, RolnaamVoorCache, Halffab)
 	
 	Set HalffabItem.Aantal 							= +(Halffabrikaat.Aantal) //TO DO PVR: Moet aantal op 0?? Encoway stuurt niet 0 mee		
 	Set HalffabItem.OpnemenInEindproduct 			= Halffabrikaat.OpnemenInEindproduct
@@ -189,7 +190,7 @@
 </Method>
 
 <Method name="GeefMaatwerkHalffabItem">
-<FormalSpec>Rol:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
+<FormalSpec>RolnaamVoorCache:%String,RolnaamVoorEncoway:%String,Halffabrikaat:APPS.PM.Maatwerk.dto.VhConfig.Halffabrikaat</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.MaatwerkProductHalffabItem</ReturnType>
 <Implementation><![CDATA[	Do ##class(TECH.ExceptionHandler).Throw("MaatwerkHFItem is nog niet geïmplementeerd.")
@@ -227,7 +228,7 @@
 <Implementation><![CDATA[
 	#dim RolnaamVoorCache As %String = EncowayRolnaam
 	
-	Set:((EncowayRolnaam = "RugHout") || (EncowayRolnaam = "RugStaal")) RolnaamVoorCache = "Rug"
+	Set:((EncowayRolnaam = "RugHout") || (EncowayRolnaam = "RugStaal")) RolnaamVoorCache = "Rug.X"
 	Set:(EncowayRolnaam = "AfdekkapRugwandHouder") RolnaamVoorCache = "AfdekkapRugWandHouder"
 	Set:(EncowayRolnaam = "RugwandHouderSchroef") RolnaamVoorCache = "RugWandHouderSchroef"
 	Set:(EncowayRolnaam = "RugwandHouder") RolnaamVoorCache = "RugWandHouder"