Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml
===================================================================
diff -u -r38157 -r38161
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 38157)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 38161)
@@ -179,15 +179,30 @@
 ]]></Implementation>
 </Method>
 
-<Method name="aTest: Master of All Schuifkes">
+<Method name="Test: Master of All Schuifkes">
 <Implementation><![CDATA[
-	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ..GeefTeConverterenProduct()
+	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).StandaardLade()
+	Set TeConverterenProduct.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TIPONBLUMOTION()
+	Set TeConverterenProduct.IsBinnenbreedte = $$$False
+	Set TeConverterenProduct.CorpusWandDikte = 18
+	Set TeConverterenProduct.HeeftZijstabilisering = $$$True
+	Set TeConverterenProduct.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
+	Set TeConverterenProduct.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart()
+	Set TeConverterenProduct.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).InschuifElement()
+	Set TeConverterenProduct.BodemKleur = "DG"
+	Set TeConverterenProduct.RugHoogte = "C"
+	Set TeConverterenProduct.IsBinnenlade = $$$False
+	Set TeConverterenProduct.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
+	Set TeConverterenProduct.AantalDwarsverdelingen = 3
+	Set TeConverterenProduct.HeeftDwarsverdeling = $$$True
+	Set TeConverterenProduct.HeeftMat = $$$True
+	Set TeConverterenProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
 	
 	#dim ProductConverter = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.ProductConverter).%New()
 	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.Convert(TeConverterenProduct)
 	
 	Do $$$AssertEquals(WebOrderLijn.ItemASM,"WI.AF")
-	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"R")
+	Do $$$AssertEquals(WebOrderLijn.ItemBGRP,"X")
 	Do $$$AssertEquals(WebOrderLijn.ItemBM,"TOB")
 	Do $$$AssertEquals(WebOrderLijn.ItemBX,"INSCHF")
 	Do $$$AssertEquals(WebOrderLijn.ItemCB,600)
@@ -197,7 +212,7 @@
 	Do $$$AssertEquals(WebOrderLijn.ItemDS,"ZA")
 	Do $$$AssertEquals(WebOrderLijn.ItemDSOms,"")
 	Do $$$AssertEquals(WebOrderLijn.ItemDWV,3)
-	Do $$$AssertEquals(WebOrderLijn.ItemFB,"Z")
+	Do $$$AssertEquals(WebOrderLijn.ItemFB,"I")
 	Do $$$AssertEquals(WebOrderLijn.ItemFS,"A")
 	Do $$$AssertEquals(WebOrderLijn.ItemKB,"DG")
 	Do $$$AssertEquals(WebOrderLijn.ItemKBOms,"")
@@ -208,8 +223,8 @@
 	Do $$$AssertEquals(WebOrderLijn.ItemKVOms,"")
 	Do $$$AssertEquals(WebOrderLijn.ItemKX,"")
 	Do $$$AssertEquals(WebOrderLijn.ItemKXOms,"")
-	Do $$$AssertEquals(WebOrderLijn.ItemLD,450)
-	Do $$$AssertEquals(WebOrderLijn.ItemLT,"CM/Z")
+	Do $$$AssertEquals(WebOrderLijn.ItemLD,400)
+	Do $$$AssertEquals(WebOrderLijn.ItemLT,"CM")
 	Do $$$AssertEquals(WebOrderLijn.ItemOLP,"")
 	Do $$$AssertEquals(WebOrderLijn.ItemOPVL,"")
 	Do $$$AssertEquals(WebOrderLijn.ItemRK,"BZ")
@@ -222,12 +237,6 @@
 	Do $$$AssertEquals(WebOrderLijn.ItemWD,18)
 ]]></Implementation>
 </Method>
-
-<Method name="GeefTeConverterenProduct">
-<ReturnType>APPS.EDI.common.dto.v001.LadeTBX</ReturnType>
-<Implementation><![CDATA[	Quit ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).StandaardLade()
-]]></Implementation>
-</Method>
 </Class>