Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r64585 -r65360
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 64585)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 65360)
@@ -70,6 +70,10 @@
 	Do ..ConvertVerpakkingZonderOnderdelen(Product,TBXProduct)
 	Do ..ConvertDraagKracht(Product,TBXProduct)
 	Do ..ConverteerProductieWijze(Product,TBXProduct)
+
+	If TBXProduct.Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade() {
+		Set TBXProduct.RugwandMateriaal = Product.ItemRugwandMateriaal
+	}
 	
 	Quit TBXProduct
 ]]></Implementation>
@@ -298,17 +302,17 @@
 			Set TBXProduct.UitsparingDataBreedteX = 143
 			Set TBXProduct.UitsparingDataBreedteY = 143
 			Set TBXProduct.UitsparingDataBreedteZ1 = ..GeefInterneBreedte(Product) - 143 - 143
-			Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+			//Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 		} ElseIf $Piece(Product.ItemSPZK,";",1)="S2" {
 			Set TBXProduct.UitsparingDataBreedteX = 147
 			Set TBXProduct.UitsparingDataBreedteY = 147
 			Set TBXProduct.UitsparingDataBreedteZ1 = ..GeefInterneBreedte(Product) - 147 - 147
-			Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+			//Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 		} ElseIf $Piece(Product.ItemSPZK,";",1)="B2" {
 			Set TBXProduct.UitsparingDataBreedteX = 197
 			Set TBXProduct.UitsparingDataBreedteY = 197
 			Set TBXProduct.UitsparingDataBreedteZ1 = ..GeefInterneBreedte(Product) - 197 - 197
-			Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+			//Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 		} Else {
 			Set TBXProduct.UitsparingDataBreedteX = $ListGet(UitsparingData,2)
 			Set TBXProduct.UitsparingDataBreedteY = $ListGet(UitsparingData,3)
Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml
===================================================================
diff -u -r64552 -r65360
--- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 64552)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 65360)
@@ -50,6 +50,10 @@
 	Do ..ConverteerProductieWijze(EconKenmerken, .EdiKenmerken)
 	Do ..ConverteerDesign(EconKenmerken, .EdiKenmerken)
 	
+	If EconKenmerken.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).Lade() {
+		Set EdiKenmerken.RugwandMateriaal = EconKenmerken.RugwandMateriaal
+	}
+	
 	Quit EdiKenmerken
 ]]></Implementation>
 </Method>
Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml
===================================================================
diff -u -r61300 -r65360
--- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 61300)
+++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 65360)
@@ -103,9 +103,13 @@
 			Set Product.RugHoogte = Product.LadeHoogte
 		}
 		Do ..Converter.Convert(Product,Eigenschappen,..LadeEigenschappenConverteerOptiesTBX)
+		If Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade() {
+			Set Eigenschappen.RugwandMateriaal = $Case(Product.RugwandMateriaal, "W":##class(DOM.PM.enu.TBXRugwandMateriaal).Hout(), "S":##class(DOM.PM.enu.TBXRugwandMateriaal).Staal(), :##class(DOM.PM.enu.TBXRugwandMateriaal).Hout())
+		}
+		Else {
+			Do ..ZetMaterialenVoorSpoelbakEnSifonTBX(Product,Eigenschappen)
+		}
 		
-		Do ..ZetMaterialenVoorSpoelbakEnSifonTBX(Product,Eigenschappen)
-		
 		If ##class(TECH.StringUtils).Equals(Product.FrontOndersteuningAantal, 1,2,3) {
 			Set Eigenschappen.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontStabilisator()
 			Set Eigenschappen.FrontOndersteuningAantal = Product.FrontOndersteuningAantal
@@ -162,7 +166,7 @@
 	If (Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak()){
 		If (Product.RugwandMateriaal = "") {
 			If ((##class(TECH.StringUtils).Equals(Product.UitsparingDataBreedteX,"147","197") && (Product.RugHoogte = "M")) || ((Product.UitsparingDataBreedteX = "143") && (Product.RugHoogte = "D"))) {
-				Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+				Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()   ; Voorheen waren dit vaste maten voor stalen rugstukken. Nu enkel nog houten rug mogelijk. 
 			} Else {
 				Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 			}
Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r64586 -r65360
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 64586)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 65360)
@@ -57,6 +57,10 @@
 	Do ..ConvertNietMeeleveren(Product,TBXProduct)
 	Do ..ConvertVerpakkingZonderOnderdelen(Product,TBXProduct)
 	Do ..ConverteerProductieWijze(Product,TBXProduct)
+
+	If Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade() {
+		Set TBXProduct.ItemRugwandMateriaal = Product.RugwandMateriaal
+	}
 	
 	Quit TBXProduct
 ]]></Implementation>
Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml
===================================================================
diff -u -r56380 -r65360
--- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 56380)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 65360)
@@ -39,7 +39,13 @@
 	Set EconKenmerken.GreepEnMeenemer = $Case(EdiKenmerken.GreepEnMeenemer,"No":"Zonder","Handle":"Greep","HandleAndLatch":"Meenemer",:"Zonder")
 	Set EconKenmerken.HangmapBoringAantal = "0"
 	Set EconKenmerken.HeeftAfwijkendeRughoogte = "false"
-	Set EconKenmerken.RugwandMateriaal = $$$If(+EdiKenmerken.UitsparingDataAantalUitsparingen=0, ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout(), "")
+	If EdiKenmerken.Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade() {
+		Set EconKenmerken.RugwandMateriaal = EdiKenmerken.RugwandMateriaal
+	}
+	Else {
+		Set EconKenmerken.RugwandMateriaal = ""
+	}
+	
 	Set EconKenmerken.Toepassing = EdiKenmerken.Klasse
 	Set EconKenmerken.Variant = "TBX"
 	Set EconKenmerken.ProductieWijze = ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig()