Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml
===================================================================
diff -u -r37447 -r38155
--- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 37447)
+++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 38155)
@@ -175,10 +175,12 @@
 		#dim PropertyName As %String = PropertyIterator.Next()
 		Continue:PropertyName="NietMeeleveren"
 		Continue:PropertyName="RugHoogte"
+		Continue:PropertyName="TussenrugMateriaal"
 		
 		Do ..ConverterData.Add(PropertyName,PropertyName)
 	}
 	Do ..ConverterData.Add("LadeHoogte", "RugHoogte")
+	Do ..ConverterData.Add("TussenrugMateriaal","TussenrugMateriaal","Set Output = $Case(Input, ""W"":##class(DOM.PM.enu.TBXRugMateriaal).Hout(), ""S"":##class(DOM.PM.enu.TBXRugMateriaal).Staal(), :Input)")
 	
 	Quit ..ConverterData
 ]]></Implementation>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml
===================================================================
diff -u -r38151 -r38155
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 38151)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/ConverteerProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 38155)
@@ -511,6 +511,168 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Sifonlade 1 smalle uitsparing 150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 150
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"S;120;140;150")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 1 brede uitsparing 250">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 250
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"B;120;140;250")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 1 uitsparing Maatwerk">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 42
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"M;120;140;42")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 2 uitsparingen 150/150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 2
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 150
+	Set TeConverterenProduct.UitsparingDataBreedteM = 60
+	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 150
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SS;120;140;60;150;150")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 2 uitsparingen 250/250">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 2
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 250
+	Set TeConverterenProduct.UitsparingDataBreedteM = 60
+	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 250
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BB;120;140;60;250;250")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 2 uitsparingen 150/250">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 2
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 150
+	Set TeConverterenProduct.UitsparingDataBreedteM = 60
+	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 250
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SB;120;140;60;150;250")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 2 uitsparingen 250/150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 2
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 250
+	Set TeConverterenProduct.UitsparingDataBreedteM = 60
+	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 150
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BS;120;140;60;250;150")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade 2 uitsparingen maatwerk">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
+	Set TeConverterenProduct.Klasse = "SY2"
+	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 2
+	Set TeConverterenProduct.UitsparingDataBreedteX = 120
+	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 42
+	Set TeConverterenProduct.UitsparingDataBreedteM = 60
+	Set TeConverterenProduct.UitsparingDataBreedteZ2 = 42
+	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+	
+	Set TBXLadeCodeBepalerStub = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	Do TBXLadeCodeBepalerStub.IndienMethodCall("BepaalLadeCode","SY2","M","C",0,"V","GA").DanDoeNiks()
+	
+	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New(TBXLadeCodeBepalerStub)
+	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
+	
+	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"MM;120;140;60;42;42")
+]]></Implementation>
+</Method>
+
 <Method name="GeefTeConverterenProduct">
 <Implementation><![CDATA[
 	Set TeConverterenProduct = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml
===================================================================
diff -u -r38151 -r38155
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 38151)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter.cls.xml	(.../ProductConverter.cls.xml)	(revision 38155)
@@ -49,6 +49,7 @@
 	Do ..ConvertLadeCodeKenmerken(Product,WebOrderLijn)
 	Do ..ConvertDwarsverdelingen(Product,WebOrderLijn)
 	Do ..ConvertFrontBevestiging(Product,WebOrderLijn)
+	Do ..ConvertUitsparingen(Product,WebOrderLijn)
 	
 	Quit WebOrderLijn
 ]]></Implementation>
@@ -211,6 +212,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConvertUitsparingen">
+<FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&WebOrderLijn:WS.TBX.EM.OrderLijn]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If Product.UitsparingDataAantalUitsparingen = 1 {
+		Set WebOrderLijn.ItemSPZK = $Select(Product.UitsparingDataBreedteZ1="150":"S",Product.UitsparingDataBreedteZ1="250":"B",1:"M")_";"_Product.UitsparingDataBreedteX_";"_Product.UitsparingDataBreedteY_";"_Product.UitsparingDataBreedteZ1
+	}
+	If Product.UitsparingDataAantalUitsparingen = 2 {
+		Set WebOrderLijn.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
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefConvertDataTBX">
 <Private>1</Private>
 <ReturnType>TECH.ObjectUtils.ObjectConvertData</ReturnType>