Index: vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r58679 -r66785
--- vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 58679)
+++ vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 66785)
@@ -141,6 +141,33 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestLosseOnderdelenDoosAanwezigVoorFrontbevestiging">
+<Implementation><![CDATA[
+	Do ..TAORKenmerken.NietMeeleveren.Insert(..Enum.Rol.Glijder)
+	Do ..TAORKenmerken.NietMeeleveren.Insert(..Enum.Rol.BodemOndersteuning)
+
+	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(..TAORKenmerken)
+	
+	#dim DoosLosseOnderdelen As APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
+	
+	Do $$$AssertTrue($IsObject(DoosBerekenaar.GeefDoosLosseOnderdelen()))
+]]></Implementation>
+</Method>
+
+<Method name="TestBinnenladeLosseOnderdelenDoosNietAanwezigVoorFrontbevestiging">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken.IsBinnenlade = $$$True
+	
+	Do ..TAORKenmerken.NietMeeleveren.Insert(..Enum.Rol.Glijder)
+	Do ..TAORKenmerken.NietMeeleveren.Insert(..Enum.Rol.BodemOndersteuning)
+	
+	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(..TAORKenmerken)
+	
+	#dim DoosLosseOnderdelen As APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
+	Do $$$AssertFalse($IsObject(DoosBerekenaar.GeefDoosLosseOnderdelen()))
+]]></Implementation>
+</Method>
+
 <Method name="TestLadeMetOpvullijst">
 <Implementation><![CDATA[
 	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(..TAORKenmerken)