Index: vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml
===================================================================
diff -u -r1590 -r1591
--- vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml	(.../TestUglyPickingService.cls.xml)	(revision 1590)
+++ vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml	(.../TestUglyPickingService.cls.xml)	(revision 1591)
@@ -68,6 +68,24 @@
 	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(2).AantalTePicken,1,"Controle aantal te picken")
 	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(2).AantalResterend,1,"Controle aantal resterend")
 	
+	
+	set dtoPalletReservatie = ##class(APPS.MAG.UGLYPicking.dto.PalletReservatie).%New()
+	set dtoPalletReservatie.BonNr = 999998
+	set dtoPalletReservatie.Magazijn = "UNITTEST"
+	set dtoPalletReservatie.PalletID = 1235
+	set dtoPalletReservatie.ProductID = 1001
+	set dtoPalletReservatie.Sectie = "UT-SECTIE"
+	
+	set dtoPallet = Service.GeefPalletInhoud(dtoPalletReservatie)
+	
+	do $$$AssertEquals(dtoPallet.Inhouden.Size,2,"Aantal inhouden")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(1).VerpakkingOmschrijving,"Gx10","Controle omschrijving")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(1).AantalTePicken,4,"Controle aantal te picken")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(1).AantalResterend,(1000-45)\10,"Controle aantal resterend")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(2).VerpakkingOmschrijving,"Stuks","Controle omschrijving")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(2).AantalTePicken,5,"Controle aantal te picken")
+	do $$$AssertEquals(dtoPallet.Inhouden.GetAt(2).AantalResterend,5,"Controle aantal resterend")
+	
 	Do ..VerwijderPalletReservatie()
 	
 	Do ..VerwijderProducten()
@@ -94,7 +112,7 @@
 	set PalletReservatie.PalletID = 1235
 	do PalletReservatie.ProductSetObjectId(1001)
 	set PalletReservatie.Sectie = "UT-SECTIE"
-	set PalletReservatie.AantalTePicken = 10
+	set PalletReservatie.AantalTePicken = 45
 	set PalletReservatie.AantalOpPallet = 1000
 	do PalletReservatie.%Save()
 ]]></Implementation>