Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r67097 -r67117
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 67097)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 67117)
@@ -60,6 +60,7 @@
 
 	Set TBXProduct.ItemRugwandMateriaal = Product.RugwandMateriaal
 	Set TBXProduct.ItemPlaatMateriaal = Product.PlaatMateriaal
+	Do ..ConvertBodemKleurVoorStalenRug(Product,TBXProduct)
 	
 	Quit TBXProduct
 ]]></Implementation>
@@ -78,6 +79,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConvertBodemKleurVoorStalenRug">
+<FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&TBXProduct:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If Product.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal() {
+		#dim PasAanVoorStalenRug As %Boolean = ##class(TECH.StringUtils).Equals(Product.BodemKleur, "LG", "WI") && (Product.PlaatMateriaal '= "HS")
+		If PasAanVoorStalenRug {
+			Set TBXProduct.ItemKB = TBXProduct.ItemKB _ "S"
+		}
+	}
+]]></Implementation>
+</Method>
+
 <Method name="ConvertCorpusWandDikte">
 <FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&TBXProduct:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy]]></FormalSpec>
 <Private>1</Private>