Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39710 -r39711
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39710)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39711)
@@ -244,23 +244,24 @@
 	Set TBXProduct.UitsparingDataAantalUitsparingen = $$$If($ListLength(UitsparingData)=6,2,1)
 	
 	If ..Klasse = ##class(DOM.PM.enu.TBXToepassing).SifonTypeBlum() {
+		Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 		If (TBXProduct.UitsparingDataAantalUitsparingen = 1) {
 			Set TBXProduct.UitsparingDataBreedteX = $ListGet(UitsparingData,2)
 			Set TBXProduct.UitsparingDataBreedteY = $ListGet(UitsparingData,3)
 			Set TBXProduct.UitsparingDataBreedteZ1 = $ListGet(UitsparingData,4)
+			If ##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ1,"150","250") {
+				Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+			}
 		} Else {
 			Set TBXProduct.UitsparingDataBreedteX = $ListGet(UitsparingData,2)
 			Set TBXProduct.UitsparingDataBreedteY = $ListGet(UitsparingData,3)
 			Set TBXProduct.UitsparingDataBreedteM = $ListGet(UitsparingData,4)
 			Set TBXProduct.UitsparingDataBreedteZ1 = $ListGet(UitsparingData,5)
 			Set TBXProduct.UitsparingDataBreedteZ2 = $ListGet(UitsparingData,6)
+			If ##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ1,"150","250") && ##class(TECH.StringUtils).Equals(TBXProduct.UitsparingDataBreedteZ2,"150","250"){
+				Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+			}
 		}
-	
-		If $$$Not($Piece(Product.ItemSPZK,";",1)["M"){
-			Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
-		} Else {
-			Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
-		}
 	} ElseIf ..Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak() {
 		Set TBXProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 		If $Piece(Product.ItemSPZK,";",1)="SA" {
Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml
===================================================================
diff -u -r39705 -r39711
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml	(.../Test.cls.xml)	(revision 39705)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerEdiNaarLegacy/Test.cls.xml	(.../Test.cls.xml)	(revision 39711)
@@ -561,6 +561,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteX = 120
 	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 150
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -579,6 +580,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteX = 120
 	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 250
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -597,6 +599,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteX = 120
 	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 42
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -617,6 +620,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteM = 60
 	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 150
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -637,6 +641,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteM = 60
 	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 250
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -657,6 +662,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteM = 60
 	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 250
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -677,6 +683,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteM = 60
 	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 150
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
@@ -697,6 +704,7 @@
 	Set TeConverterenProduct.UitsparingDataBreedteM = 60
 	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 42
 	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	Set TeConverterenProduct.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
 	
 	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
 	
Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r39705 -r39711
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 39705)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 39711)
@@ -225,11 +225,28 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	If Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).SifonTypeBlum(){
+		#dim UitsparingCode As %String = ""
 		If Product.UitsparingDataAantalUitsparingen = 1 {
-			Set TBXProduct.ItemSPZK = $Select(Product.UitsparingDataBreedteZ1="150":"S",Product.UitsparingDataBreedteZ1="250":"B",1:"M.")_";"_Product.UitsparingDataBreedteX_";"_Product.UitsparingDataBreedteY_";"_Product.UitsparingDataBreedteZ1
+			If Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Hout(){
+				Set UitsparingCode = "M."
+			} ElseIf Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Staal(){
+				If Product.UitsparingDataBreedteZ1="150"{
+					Set UitsparingCode = "S"
+				} ElseIf Product.UitsparingDataBreedteZ1="250"{
+					Set UitsparingCode = "B"
+				}
+			}
+			
+			Set TBXProduct.ItemSPZK = UitsparingCode_";"_Product.UitsparingDataBreedteX_";"_Product.UitsparingDataBreedteY_";"_Product.UitsparingDataBreedteZ1
 		}
 		If Product.UitsparingDataAantalUitsparingen = 2 {
-			Set TBXProduct.ItemSPZK = $Select(Product.UitsparingDataBreedteZ1="150":"S",Product.UitsparingDataBreedteZ1="250":"B",1:"M")_$Select(Product.UitsparingDataBreedteZ2="150":"S",Product.UitsparingDataBreedteZ2="250":"B",1:"M")_";"_Product.UitsparingDataBreedteX_";"_Product.UitsparingDataBreedteY_";"_Product.UitsparingDataBreedteM_";"_Product.UitsparingDataBreedteZ1_";"_Product.UitsparingDataBreedteZ2
+			If Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Hout(){
+				Set UitsparingCode = "MM"
+			} ElseIf Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Staal(){
+				Set UitsparingCode = $Select(Product.UitsparingDataBreedteZ1="150":"S",Product.UitsparingDataBreedteZ1="250":"B")_$Select(Product.UitsparingDataBreedteZ2="150":"S",Product.UitsparingDataBreedteZ2="250":"B")
+			}
+			
+			Set TBXProduct.ItemSPZK = UitsparingCode_";"_Product.UitsparingDataBreedteX_";"_Product.UitsparingDataBreedteY_";"_Product.UitsparingDataBreedteM_";"_Product.UitsparingDataBreedteZ1_";"_Product.UitsparingDataBreedteZ2
 		}
 	} ElseIf Product.Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak(){
 		If Product.RugHoogte = "D" {