Index: vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml
===================================================================
diff -u -r39660 -r40462
--- vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 39660)
+++ vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 40462)
@@ -65,7 +65,7 @@
 	Set Kenmerken.UitsparingDataBreedteX = 147
 	Set Kenmerken.UitsparingDataBreedteY = 147
 	Set Kenmerken.UitsparingDataBreedteZ1 = 306
-	Set Kenmerken.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Kenmerken.RugwandMateriaal = "S"
 	
 	Quit Kenmerken
 ]]></Implementation>
@@ -82,7 +82,8 @@
 	Set Kenmerken.UitsparingDataBreedteX = 225
 	Set Kenmerken.UitsparingDataBreedteY = 225
 	Set Kenmerken.UitsparingDataBreedteZ1 = 150
-	Set Kenmerken.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Kenmerken.TussenrugMateriaal = "S"
+	Set Kenmerken.RugwandMateriaal = "H"
 	
 	Quit Kenmerken
 ]]></Implementation>
@@ -102,7 +103,8 @@
 	Set Kenmerken.UitsparingDataBreedteY = 180
 	Set Kenmerken.UitsparingDataBreedteZ1 = 150
 	Set Kenmerken.UitsparingDataBreedteZ2 = 150
-	Set Kenmerken.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Kenmerken.TussenrugMateriaal = "S"
+	Set Kenmerken.RugwandMateriaal = "H"
 	
 	Quit Kenmerken
 ]]></Implementation>
Index: BL/PR/GA/TB/tmpDev2.mac.rou
===================================================================
diff -u -r40451 -r40462
--- BL/PR/GA/TB/tmpDev2.mac.rou	(.../tmpDev2.mac.rou)	(revision 40451)
+++ BL/PR/GA/TB/tmpDev2.mac.rou	(.../tmpDev2.mac.rou)	(revision 40462)
@@ -591,3 +591,4 @@
 
 
 
+
Index: vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml
===================================================================
diff -u -r39660 -r40462
--- vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 39660)
+++ vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 40462)
@@ -70,7 +70,7 @@
 	Set Resultaat.UitsparingDataBreedteX = 147
 	Set Resultaat.UitsparingDataBreedteY = 147
 	Set Resultaat.UitsparingDataBreedteZ1 = 306
-	Set Resultaat.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Quit Resultaat
 ]]></Implementation>
@@ -87,6 +87,7 @@
 	Set Resultaat.UitsparingDataBreedteX = 225
 	Set Resultaat.UitsparingDataBreedteY = 225
 	Set Resultaat.UitsparingDataBreedteZ1 = 150
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	Set Resultaat.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Quit Resultaat
@@ -107,6 +108,7 @@
 	Set Resultaat.UitsparingDataBreedteY = 180
 	Set Resultaat.UitsparingDataBreedteZ1 = 150
 	Set Resultaat.UitsparingDataBreedteZ2 = 150
+	Set Resultaat.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	Set Resultaat.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Quit Resultaat
Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml
===================================================================
diff -u -r40339 -r40462
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml	(.../UitsparingValidator.cls.xml)	(revision 40339)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml	(.../UitsparingValidator.cls.xml)	(revision 40462)
@@ -90,10 +90,10 @@
 		Do Exceptions.Insert(Exception)
 	}
 	
-	If ($$$Not(Product.Klasse="SP2"))&&($$$HasLength(Product.RugwandMateriaal)) {
+	If (Product.Klasse="SP2")&&($$$HasLength(Product.TussenrugMateriaal)) {
 		Set Exception = ##class(TECH.ObjectUtils.ObjectConverterCombinationException).%New()
 		Do Exception.AddCombination($classname(Product),"Klasse",Product.Klasse)
-		Do Exception.AddCombination($classname(Product),"RugwandMateriaal",Product.RugwandMateriaal)
+		Do Exception.AddCombination($classname(Product),"TussenrugMateriaal",Product.RugwandMateriaal)
 		Do Exceptions.Insert(Exception)
 	}
 	
Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39950 -r40462
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39950)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 40462)
@@ -267,6 +267,7 @@
 			If ##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ1,"150","250") && $$$Not($$$StartsWith($ListGet(UitsparingData,1),"M")){
 				Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 			}
+			Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 		} Else {
 			Set TBXProduct.UitsparingDataBreedteX = $ListGet(UitsparingData,2)
 			Set TBXProduct.UitsparingDataBreedteY = $ListGet(UitsparingData,3)
@@ -276,24 +277,25 @@
 			If (##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ1,"150","250") && ##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ2,"150","250")) && $$$Not($$$StartsWith($ListGet(UitsparingData,1),"M")){
 				Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 			}
+			Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 		}
 	} ElseIf ..Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak() {
-		Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+		Set TBXProduct.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 		If $Piece(Product.ItemSPZK,";",1)="SA" {
 			Set TBXProduct.UitsparingDataBreedteX = 143
 			Set TBXProduct.UitsparingDataBreedteY = 143
 			Set TBXProduct.UitsparingDataBreedteZ1 = ..GeefInterneBreedte(Product) - 143 - 143
-			Set TBXProduct.TussenrugMateriaal = ##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.TussenrugMateriaal = ##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.TussenrugMateriaal = ##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/EdiNaarEcon.cls.xml
===================================================================
diff -u -r39953 -r40462
--- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 39953)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 40462)
@@ -133,26 +133,26 @@
 		Set Eigenschappen.UitsparingData.Z1.Vorm = "Recht"
 		
 		If Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak(){
-			Set Eigenschappen.UitsparingData.X.Materiaal = Product.TussenrugMateriaal
-			Set Eigenschappen.UitsparingData.Y.Materiaal = Product.TussenrugMateriaal
+			Set Eigenschappen.UitsparingData.X.Materiaal = Product.RugwandMateriaal
+			Set Eigenschappen.UitsparingData.Y.Materiaal = Product.RugwandMateriaal
 			Set Eigenschappen.UitsparingData.Z1.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
 		} Else {
-			Set Eigenschappen.UitsparingData.X.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
-			Set Eigenschappen.UitsparingData.Y.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
+			Set Eigenschappen.UitsparingData.X.Materiaal = Product.RugwandMateriaal
+			Set Eigenschappen.UitsparingData.Y.Materiaal = Product.RugwandMateriaal
 			Set Eigenschappen.UitsparingData.Z1.Materiaal = Product.TussenrugMateriaal
 		}
 		
 	} ElseIf Product.UitsparingDataAantalUitsparingen = 2 {
 		Set Eigenschappen.UitsparingData.UitsparingAantal = ##class(ECON.PM.Maatwerk.enu.TBXUitsparingAantal).Dubbel()
 		Set Eigenschappen.UitsparingData.X.Breedte = Product.UitsparingDataBreedteX
 		Set Eigenschappen.UitsparingData.X.Hoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijwandHoogte).M()
-		Set Eigenschappen.UitsparingData.X.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
+		Set Eigenschappen.UitsparingData.X.Materiaal = Product.RugwandMateriaal
 		Set Eigenschappen.UitsparingData.Y.Breedte = Product.UitsparingDataBreedteY
 		Set Eigenschappen.UitsparingData.Y.Hoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijwandHoogte).M()
-		Set Eigenschappen.UitsparingData.Y.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
+		Set Eigenschappen.UitsparingData.Y.Materiaal = Product.RugwandMateriaal
 		Set Eigenschappen.UitsparingData.M.Breedte = Product.UitsparingDataBreedteM
 		Set Eigenschappen.UitsparingData.M.Hoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijwandHoogte).M()
-		Set Eigenschappen.UitsparingData.M.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
+		Set Eigenschappen.UitsparingData.M.Materiaal = Product.RugwandMateriaal
 		Set Eigenschappen.UitsparingData.Z1.Breedte = Product.UitsparingDataBreedteZ1
 		Set Eigenschappen.UitsparingData.Z1.Hoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijwandHoogte).M()
 		Set Eigenschappen.UitsparingData.Z1.Materiaal = Product.TussenrugMateriaal
Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml
===================================================================
diff -u -r39953 -r40462
--- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 39953)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 40462)
@@ -129,8 +129,9 @@
 		Set Eigenschappen.UitsparingDataBreedteZ2 = Product.UitsparingData.Z2.Breedte
 	}
 	If Product.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).Spoelbak(){
-		Set Eigenschappen.TussenrugMateriaal = Product.UitsparingData.X.Materiaal
+		Set Eigenschappen.RugwandMateriaal = Product.UitsparingData.X.Materiaal
 	} Else {
+		Set Eigenschappen.RugwandMateriaal = Product.UitsparingData.X.Materiaal
 		Set Eigenschappen.TussenrugMateriaal = Product.UitsparingData.Z1.Materiaal
 	}
 ]]></Implementation>
Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml
===================================================================
diff -u -r40380 -r40462
--- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 40380)
+++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 40462)
@@ -95,6 +95,31 @@
 			Set Eigenschappen.FrontOndersteuningAantal = ""
 		}
 		
+		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()
+				} Else {
+					Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+				}
+			} Else {
+				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())
+			}
+		} ElseIf (Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).SifonTypeBlum()) {
+			If (Product.TussenrugMateriaal = "") {
+				If ((##class(TECH.StringUtils).Equals(Product.UitsparingDataBreedteZ1,"150","250")) || (##class(TECH.StringUtils).Equals(Product.UitsparingDataBreedteZ2,"150","250"))) {
+					Set Eigenschappen.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+					Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+				} Else {
+					Set Eigenschappen.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+					Set Eigenschappen.RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+				}
+			} Else {
+				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())
+				Set Eigenschappen.TussenrugMateriaal = $Case(Product.TussenrugMateriaal, "W":##class(DOM.PM.enu.TBXRugwandMateriaal).Hout(), "S":##class(DOM.PM.enu.TBXRugwandMateriaal).Staal(),:##class(DOM.PM.enu.TBXRugwandMateriaal).Hout())
+			}
+		}
+		
 		If (KlantId = ##class(DOM.VKP.enu.Klant).Labonorm()) && (Product.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakkingType).Pallet()) {
 			Set Eigenschappen.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakkingType).Procom()
 		}
@@ -196,14 +221,14 @@
 		#dim PropertyName As %String = PropertyIterator.Next()
 		Continue:PropertyName="NietMeeleveren"
 		Continue:PropertyName="TussenrugMateriaal"
+		Continue:PropertyName="RugwandMateriaal"
 		Continue:PropertyName="FrontOndersteuningAantal"
 		Continue:PropertyName="FrontOndersteuningType"
 		Continue:PropertyName="BodemKleur"
 		Continue:PropertyName="LadeKleur"
 		
 		Do ..ConverterData.Add(PropertyName,PropertyName)
 	}
-	Do ..ConverterData.Add("TussenrugMateriaal","TussenrugMateriaal","Set Output = $Case(Input, ""W"":##class(DOM.PM.enu.TBXRugwandMateriaal).Hout(), ""S"":##class(DOM.PM.enu.TBXRugwandMateriaal).Staal(), :Input)")
 	Do ..ConverterData.Add("HeeftOpvullijstLinks","HeeftOpvullijstLinks","Set Output = $Case(Input, """":""0"", :Input)")
 	Do ..ConverterData.Add("HeeftOpvullijstRechts","HeeftOpvullijstRechts","Set Output = $Case(Input, """":""0"", :Input)")
 	Do ..ConverterData.Add("BodemKleur","BodemKleur","Set Output = $Case(Input, ""TS"":""BZ"", :Input)")