Index: APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml
===================================================================
diff -u -r73588 -r73656
--- APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 73588)
+++ APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 73656)
@@ -88,10 +88,11 @@
 	#dim IsDeelVanSamengesteldHalffabItem As %Boolean = $$$False
 	
 	#dim RolnaamVoorCache As %String = ..RolnaamProcessor.GeefRolnaamVoorCache(RolnaamVoorEncoway)
-	If ((##class(TECH.StringUtils).Contains(RolnaamVoorCache, ".")) || ..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
+	
+	If ((##class(TECH.StringUtils).Contains(RolnaamVoorCache, ".")) || ..RolnaamProcessor.IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
 		#dim SGRol As %String = ""
-		If (..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
-			Set SGRol = ..GeefRolnaamVanGekoppeldKenmerk(RolnaamVoorCache)
+		If (..RolnaamProcessor.IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
+			Set SGRol = ..RolnaamProcessor.GeefRolnaamVanGekoppeldKenmerk(RolnaamVoorCache)
 		} Else {
 			Set SGRol = $Piece(RolnaamVoorCache, ".", 1)
 		}
@@ -105,11 +106,11 @@
 			Set SGHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(SGRol)
 		}
 
-		If (..IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
-			If (..IsGekoppeldeMat(RolnaamVoorCache)) {
+		If (..RolnaamProcessor.IsResultaatVanGekoppeldKenmerk(RolnaamVoorCache)) {
+			If (..RolnaamProcessor.IsGekoppeldeMat(RolnaamVoorCache)) {
 				Set RolnaamVoorCache = $Piece(RolnaamVoorCache, ".", 1)	
 			}
-			If (..IsGekoppeldeSST(RolnaamVoorCache)) {
+			If (..RolnaamProcessor.IsGekoppeldeSST(RolnaamVoorCache)) {
 				Set RolnaamVoorCache = $Piece(RolnaamVoorCache, ".", 2)
 			}
 		} Else {
@@ -259,61 +260,6 @@
 <Implementation><![CDATA[	Quit ..ProductAPI.GeefProductIdVoorIdentNummer(IdentNummer)
 ]]></Implementation>
 </Method>
-
-<Method name="IsResultaatVanGekoppeldKenmerk">
-<FormalSpec>RolNaam:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[
-	#dim IsGekoppeldKenmerk As %Boolean = $$$False
-	
-	If (..IsGekoppeldeMat(RolNaam)) {
-		Set IsGekoppeldKenmerk = $$$True
-	}
-
-	If ..IsGekoppeldeSST(RolNaam) {
-		Set IsGekoppeldKenmerk = $$$True
-	}
-	
-	
-	Quit IsGekoppeldKenmerk
-]]></Implementation>
-</Method>
-
-<Method name="GeefRolnaamVanGekoppeldKenmerk">
-<FormalSpec>RolNaam:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim RolNaamGekoppeldKenmerk As %String = ""
-		
-	If (..IsGekoppeldeMat(RolNaam)) {
-		Set RolNaamGekoppeldKenmerk = "MAT_Standaard_MatX"
-	} ElseIf (..IsGekoppeldeSST(RolNaam)) {
-		Set RolNaamGekoppeldKenmerk = "SpaceStep_SpaceStep"
-	} Else {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("Rolnaam voor gekoppeld kenmerk kan niet bepaald worden voor rol '" _ RolNaam _ "'"))	
-	}
-	
-	Quit RolNaamGekoppeldKenmerk
-]]></Implementation>
-</Method>
-
-<Method name="IsGekoppeldeMat">
-<FormalSpec>RolNaam:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit RolNaam = "Mat"
-]]></Implementation>
-</Method>
-
-<Method name="IsGekoppeldeSST">
-<FormalSpec>RolNaam:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).StartsWith(RolNaam, "SST")
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: APPS/PM/Maatwerk/impl/VhConfig/Converter/RolnaamProcessor.cls.xml
===================================================================
diff -u -r73588 -r73656
--- APPS/PM/Maatwerk/impl/VhConfig/Converter/RolnaamProcessor.cls.xml	(.../RolnaamProcessor.cls.xml)	(revision 73588)
+++ APPS/PM/Maatwerk/impl/VhConfig/Converter/RolnaamProcessor.cls.xml	(.../RolnaamProcessor.cls.xml)	(revision 73656)
@@ -9,17 +9,76 @@
 <Implementation><![CDATA[
 	#dim RolnaamVoorCache As %String = EncowayRolnaam
 	
-	Set:((EncowayRolnaam = "RugHout") || (EncowayRolnaam = "RugStaal")) RolnaamVoorCache = "Rug.X"	
-	Set:(EncowayRolnaam = "AfdekkapRugwandHouder") RolnaamVoorCache = "AfdekkapRugWandHouder"
-	Set:(EncowayRolnaam = "RugwandHouderSchroef") RolnaamVoorCache = "RugWandHouderSchroef"
-	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "RugwandHouder")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "RugwandHouder", "RugWandHouder")
-	Set:(EncowayRolnaam = "TOBSynchronisatieAdapter") RolnaamVoorCache = "TiponBlumotionSynchronisatieAdapter"
-	Set:(EncowayRolnaam = "TOBSetEenhedenEnMeenemers") RolnaamVoorCache = "TiponBlumotionSetEenhedenEnMeenemers"
-	Set:(EncowayRolnaam = "TOBSynchronisatieStang") RolnaamVoorCache = "TiponBlumotionSynchronisatieStang"
+	Set:((EncowayRolnaam = "BackWood") || (EncowayRolnaam = "BackSteel")) RolnaamVoorCache = "Rug.X"
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "Bottom")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "Bottom", "Bodem")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "BoxSystemSide")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "BoxSystemSide", "LadeZijkant")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "CoverCapInner")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "CoverCapInner", "AfdekkapBinnen")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "CoverCapOuter")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "CoverCapOuter", "AfdekkapBuiten")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "FrontAttachment")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "FrontAttachment", "LadeZijkant")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "FrontBaseStabiliser")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "FrontBaseStabiliser", "FrontBevestiging")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "Packaging.V1BoxWithCover")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "Packaging.V1BoxWithCover", "Verpakking.V1DoosMetDeksel")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "Packaging.V1LoosePartsBox")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "Packaging.V1LoosePartsBox", "???")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "Runner")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "Runner", "Geleider")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "TOBSetUnitsAndTriggers")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "TOBSetUnitsAndTriggers", "TiponBlumotionSetEenhedenEnMeenemers")
+	Set:(##class(TECH.StringUtils).Contains(EncowayRolnaam, "TOBSynchroLinkage")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(EncowayRolnaam, "TOBSynchroLinkage", "TiponBlumotionSynchronisatieStang")
+		
+	Set:(##class(TECH.StringUtils).Contains(RolnaamVoorCache, "Left")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(RolnaamVoorCache, "Left", "Links")
+	Set:(##class(TECH.StringUtils).Contains(RolnaamVoorCache, "Right")) RolnaamVoorCache = ##class(TECH.StringUtils).Replace(RolnaamVoorCache, "Right", "Rechts")
 	
 	Quit RolnaamVoorCache
 ]]></Implementation>
 </Method>
+
+<Method name="IsResultaatVanGekoppeldKenmerk">
+<FormalSpec>RolNaam:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim IsGekoppeldKenmerk As %Boolean = $$$False
+	
+	If (..IsGekoppeldeMat(RolNaam)) {
+		Set IsGekoppeldKenmerk = $$$True
+	}
+
+	If ..IsGekoppeldeSST(RolNaam) {
+		Set IsGekoppeldKenmerk = $$$True
+	}
+	
+	
+	Quit IsGekoppeldKenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefRolnaamVanGekoppeldKenmerk">
+<FormalSpec>RolNaam:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim RolNaamGekoppeldKenmerk As %String = ""
+		
+	If (..IsGekoppeldeMat(RolNaam)) {
+		Set RolNaamGekoppeldKenmerk = "MAT_Standaard_MatX"
+	} ElseIf (..IsGekoppeldeSST(RolNaam)) {
+		Set RolNaamGekoppeldKenmerk = "SpaceStep_SpaceStep"
+	} Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("Rolnaam voor gekoppeld kenmerk kan niet bepaald worden voor rol '" _ RolNaam _ "'"))	
+	}
+	
+	Quit RolNaamGekoppeldKenmerk
+]]></Implementation>
+</Method>
+
+<Method name="IsGekoppeldeMat">
+<FormalSpec>RolNaam:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit RolNaam = "Mat"
+]]></Implementation>
+</Method>
+
+<Method name="IsGekoppeldeSST">
+<FormalSpec>RolNaam:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).StartsWith(RolNaam, "SST")
+]]></Implementation>
+</Method>
 </Class>