Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r65917 -r67117
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 65917)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 67117)
@@ -58,9 +58,9 @@
 	Do ..ConvertVerpakkingZonderOnderdelen(Product,TBXProduct)
 	Do ..ConverteerProductieWijze(Product,TBXProduct)
 
-	If Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade() {
-		Set TBXProduct.ItemRugwandMateriaal = Product.RugwandMateriaal
-	}
+	Set TBXProduct.ItemRugwandMateriaal = Product.RugwandMateriaal
+	Set TBXProduct.ItemPlaatMateriaal = Product.PlaatMateriaal
+	Do ..ConvertBodemKleurVoorStalenRug(Product,TBXProduct)
 	
 	Quit TBXProduct
 ]]></Implementation>
@@ -72,10 +72,26 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim LadeKleur As Prod.GAMeta.BT.TBLadeKleur = ##class(Prod.GAMeta.BT.TBLadeKleur).OpenViaItemCode(TBXProduct.ItemKL,TBXProduct.ItemDC,1)
+	If $$$Not($IsObject(LadeKleur)) {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("Fout bij opvragen LadeKleur. Kon geen object openen voor Ladekleur='"_TBXProduct.ItemKL_"' en DesignCode='"_TBXProduct.ItemDC_"'.")
+	}
 	Set TBXProduct.ItemDS = LadeKleur.BepaalDesignID(TBXProduct.ItemDC)
 ]]></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>
@@ -167,17 +183,17 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Uittrekbaarheid As %String = ##class(DOM.PM.enu.TBXUittrekbaarheid).Volledig()
-	#dim LadeDesign As %String = ..GeefLadeDesign(Product.LadeKleur)
+	#dim LadeDesign As %String = ..GeefLadeDesign(Product.LadeKleur, Product.DesignCode)
 	
 	Set TBXProduct.ItemLT = ..TBXLadeCodeBepaler.BepaalLadeCode(Product.Klasse, Product.ZijkantHoogte, Product.LadeHoogte, Product.IsBinnenlade, Uittrekbaarheid, LadeDesign)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefLadeDesign">
-<FormalSpec>LadeKleur:%String</FormalSpec>
+<FormalSpec>LadeKleur:%String,DesignCodeId:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $Case(LadeKleur, "BZ":"ZA", "SW":"WA", "MG":"GA", "IN":"IA", :"")
+<Implementation><![CDATA[	Quit $Case(LadeKleur, "BZ":"ZA", "SW":"WA", "MG":$$$If(DesignCodeId="MA","GMA","GA"), "IN":"IA", "OG":"OMT", :"")
 ]]></Implementation>
 </Method>