Index: vhUnitTest/EXT/Optima/CalculPrix/ServiceWeb/CalculerTiroir/Test.cls.xml
===================================================================
diff -u -r69410 -r71380
--- vhUnitTest/EXT/Optima/CalculPrix/ServiceWeb/CalculerTiroir/Test.cls.xml	(.../Test.cls.xml)	(revision 69410)
+++ vhUnitTest/EXT/Optima/CalculPrix/ServiceWeb/CalculerTiroir/Test.cls.xml	(.../Test.cls.xml)	(revision 71380)
@@ -25,7 +25,7 @@
 	#dim Response As EXT.Optima.CalculPrix.dto.Response = ..WebService.CalculerTiroir(Request)
 
 	#dim VerwachteResponse As EXT.Optima.CalculPrix.dto.Response = ##class(EXT.Optima.CalculPrix.dto.Response).%New()
-	Set VerwachteResponse.KostPrijs = 103.99
+	Set VerwachteResponse.KostPrijs = 99.1
 	Set VerwachteResponse.RefVanHoecke = "-VH_Fixed"
 	Set VerwachteResponse.ErrorCode = 0
 
@@ -92,7 +92,7 @@
 	Set Lade.HeeftOpvullijstRechts = $$$False
 	Set Lade.HeeftZijstabilisering = $$$False
 	Set Lade.IsBinnenlade = $$$False
-	Set Lade.KoppelingType = "S"  ;  ##class(DOM.PM.enu.TAORKoppelingType).Schroef()
+	Set Lade.KoppelingType = "M"  ;  ##class(DOM.PM.enu.TAORKoppelingType).Movento()
 	Set Lade.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500()
 	Set Lade.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()
 	Set Lade.NietMeeleverenGeleider = 0