Index: vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r33375 -r36596
--- vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 33375)
+++ vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 36596)
@@ -84,7 +84,7 @@
 	
 	#dim DoosLosseOnderdelen As APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
 
-	do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 10)
+	do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 65)
 ]]></Implementation>
 </Method>
 
@@ -148,19 +148,19 @@
 	#define ProductId 1000000
 	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.N
-	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),88.4, 679.8, 559.4)
+	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),88.4, 678.8, 564)
 	do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.M
-	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),90, 679.8, 559.4)
+	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),90, 678.8, 564)
 	do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.C
-	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),180 , 645.4,558.4)
+	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),180 , 645.4,564)
 	do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.F
-	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),245, 645.4,558.4)
+	do ..AssertDoos(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLade(),245, 645.4,564)
 	do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(..TAORKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -177,12 +177,12 @@
 		set AantalSpecificaties = AantalSpecificaties + 1
 		
 		if (KartonSpecificatie.BenamingVerpakkingsOnderdeel = ##class(DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel).DoosMetDeksel()) {
-			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeBreedte, 0, 0), 1311, "Breedte van DoosMetDeksel")
-			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeLengte, 0, 0), 1058, "Lengte van DoosMetDeksel")
+			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeBreedte, 0, 0), 1312, "Breedte van DoosMetDeksel")
+			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeLengte, 0, 0), 1056, "Lengte van DoosMetDeksel")
 			do $$$AssertEquals(KartonSpecificatie.KartonSamenstelling, ##class(DOM.PM.Verpakking.enu.KartonSamenstelling).Dun(), "Kartonsamenstelling = EB")
 		} elseif (KartonSpecificatie.BenamingVerpakkingsOnderdeel = ##class(DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel).DoosLosseOnderdelen()) {
-			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeBreedte, 0, 0), 768, "Breedte van DoosLosseOnderdelen")
-			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeLengte, 0, 0), 476, "Lengte van DoosLosseOnderdelen")
+			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeBreedte, 0, 0), 760, "Breedte van DoosLosseOnderdelen")
+			do $$$AssertEquals(+$Justify(KartonSpecificatie.NodigeLengte, 0, 0), 467, "Lengte van DoosLosseOnderdelen")
 			do $$$AssertEquals(KartonSpecificatie.KartonSamenstelling, ##class(DOM.PM.Verpakking.enu.KartonSamenstelling).Dun(), "Kartonsamenstelling = EB")
 		} else {
 			do $$$AssertTrue(0, "Allen DoosMetDeksel en Losse onderdelen zijn mogelijk")
@@ -200,16 +200,9 @@
 	
 	do SnijService.SnijVoorLade("TEST.DO", "", 1, ##class(BL.Prod.OptiBox.enu.SnijMachine).Halux(), 1)
 	do $$$AssertEquals(OptiBoxStub.BasisRef, "TEST.DO")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("BREEDTE"), 0, 0), 681, "Lade")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("DIEPTE"), 0, 0), 513, "Lade")
+	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("BREEDTE"), 0, 0), 679, "Lade")
+	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("DIEPTE"), 0, 0), 514, "Lade")
 	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("HOOGTE"), 0, 0), 90, "Lade")
-	
-	do SnijService.SnijVoorLosseOnderdelen("TEST.LO", "", 1, ##class(BL.Prod.OptiBox.enu.SnijMachine).Halux(), 1)
-	do $$$AssertEquals(OptiBoxStub.BasisRef, "TEST.LO")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("BREEDTE"), 0, 0), 115, "Losse onderdelen")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("DIEPTE"), 0, 0), 505, "Losse onderdelen")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("HOOGTE"), 0, 0), 82, "Losse onderdelen")
-	do $$$AssertEquals(+$Justify(OptiBoxStub.Params("BREEDTECP"), 0, 0), 57, "Losse onderdelen")
 ]]></Implementation>
 </Method>