Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml
===================================================================
diff -u -r39134 -r39192
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 39134)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 39192)
@@ -92,6 +92,33 @@
 	Do $$$AssertObject(ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct),##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).LadeMetVeelExtras())
 ]]></Implementation>
 </Method>
+
+<Method name="Test: LegacyNaarEdi Spoelbaklade">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SpoelbakLade()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	
+	Do $$$AssertObject(ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct),##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SpoelbakLade())
+]]></Implementation>
+</Method>
+
+<Method name="Test: LegacyNaarEdi M-sifon lade (1 uitsparing)">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SifonLadeMet1Uitsparing()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	
+	Do $$$AssertObject(ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct),##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SifonLadeMet1Uitsparing())
+]]></Implementation>
+</Method>
+
+<Method name="Test: LegacyNaarEdi M-sifon lade (2 uitsparingen)">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).SifonLadeMet2Uitsparingen()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	
+	Do $$$AssertObject(ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct),##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).SifonLadeMet2Uitsparingen())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml
===================================================================
diff -u -r39131 -r39192
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml	(.../Test.cls.xml)	(revision 39131)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml	(.../Test.cls.xml)	(revision 39192)
@@ -367,157 +367,134 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-/*
-Method "Test: Sifonlade 1 smalle uitsparing 150"()
-{
-	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
-	Set TeConverterenProduct.Klasse = "SY2"
-	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
-	Set TeConverterenProduct.UitsparingDataBreedteX = 120
-	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 150
-	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+<Method name="Test: Sifonlade 1 smalle uitsparing 150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "S;120;140;150"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"S;120;140;150")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,1)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,150)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 1 brede uitsparing 250"()
-{
-	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
-	Set TeConverterenProduct.Klasse = "SY2"
-	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
-	Set TeConverterenProduct.UitsparingDataBreedteX = 120
-	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 250
-	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+<Method name="Test: Sifonlade 1 uitsparing Maatwerk">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "M.;120;140;42"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"B;120;140;250")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,1)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,42)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 1 uitsparing Maatwerk"()
-{
-	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
-	Set TeConverterenProduct.Klasse = "SY2"
-	Set TeConverterenProduct.UitsparingDataAantalUitsparingen = 1
-	Set TeConverterenProduct.UitsparingDataBreedteX = 120
-	Set TeConverterenProduct.UitsparingDataBreedteZ1 = 42
-	Set TeConverterenProduct.UitsparingDataBreedteY = 140
+<Method name="Test: Sifonlade 2 uitsparingen 150/150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "SS;120;140;60;150;150"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"M.;120;140;42")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,2)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,150)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteM,60)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ2,150)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 2 uitsparingen 150/150"()
-{
-	#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
+<Method name="Test: Sifonlade 2 uitsparingen 250/250">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "BB;120;140;60;250;250"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SS;120;140;60;150;150")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,2)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,250)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteM,60)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ2,250)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 2 uitsparingen 250/250"()
-{
-	#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
+<Method name="Test: Sifonlade 2 uitsparingen 150/250">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "SB;120;140;60;150;250"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BB;120;140;60;250;250")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,2)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,150)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteM,60)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ2,250)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 2 uitsparingen 150/250"()
-{
-	#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
+<Method name="Test: Sifonlade 2 uitsparingen 250/150">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "BS;120;140;60;250;150"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"SB;120;140;60;150;250")
-}
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,2)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,250)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteM,60)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ2,150)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 
-Method "Test: Sifonlade 2 uitsparingen 250/150"()
-{
-	#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
+<Method name="Test: Sifonlade 2 uitsparingen maatwerk">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemSPZK = "MM;120;140;60;42;42"
+	Set TeConverterenProduct.ItemLT = "MY2"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As APPS.EDI.common.dto.v001.LadeTBX = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"BS;120;140;60;250;150")
-}
-
-Method "Test: Sifonlade 2 uitsparingen maatwerk"()
-{
-	#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 DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
-	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemSPZK,"MM;120;140;60;42;42")
-}
-*/
-]]></Content>
-</UDLText>
+	Do $$$AssertEquals(GeconverteerdProduct.Klasse,"SY2")
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataAantalUitsparingen,2)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteX,120)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ1,42)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteM,60)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteZ2,42)
+	Do $$$AssertEquals(GeconverteerdProduct.UitsparingDataBreedteY,140)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39130 -r39192
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39130)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39192)
@@ -58,11 +58,8 @@
 	Do ..ConvertMat(Product,TBXProduct)
 	Do ..ConvertGreepEnMeenemer(Product,TBXProduct)
 	Do ..ConvertVerlaagdeRug(Product,TBXProduct)
+	Do ..ConvertUitsparingen(Product,TBXProduct)
 	
-	/*Do ..ConvertDesignEnKleuren(Product,TBXProduct)
-
-	Do ..ConvertUitsparingen(Product,TBXProduct)*/
-	
 	Quit TBXProduct
 ]]></Implementation>
 </Method>
@@ -231,6 +228,30 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConvertUitsparingen">
+<FormalSpec><![CDATA[Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy,&TBXProduct:APPS.EDI.common.dto.v001.LadeTBX]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Quit:Product.ItemSPZK=""
+	
+	#dim UitsparingData As %List = $ListFromString(Product.ItemSPZK,";")
+	
+	Set TBXProduct.UitsparingDataAantalUitsparingen = $$$If($ListLength(UitsparingData)=6,2,1)
+	
+	If (TBXProduct.UitsparingDataAantalUitsparingen = 1) {
+		Set TBXProduct.UitsparingDataBreedteX = $ListGet(UitsparingData,2)
+		Set TBXProduct.UitsparingDataBreedteY = $ListGet(UitsparingData,3)
+		Set TBXProduct.UitsparingDataBreedteZ1 = $ListGet(UitsparingData,4)
+	} 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)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefConvertDataTBX">
 <Private>1</Private>
 <ReturnType>TECH.ObjectUtils.ObjectConvertData</ReturnType>