Index: APPS/MAG/UglyPickingService.cls.xml
===================================================================
diff -u -r1779 -r1780
--- APPS/MAG/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1779)
+++ APPS/MAG/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1780)
@@ -91,10 +91,10 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
-<Method name="ReservatieProbleemOplossen">
-<FormalSpec>ProductLijn:APPS.MAG.UGLYPicking.dto.ProductLijn,NieuwReservatieAantal:%Integer</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[]]></Implementation>
+<Method name="WijzigReservatieAantal">
+<FormalSpec>BonNr:%Integer,ProductLijn:APPS.MAG.UGLYPicking.dto.ProductLijn,NieuwReservatieAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[	Do ..Service.WijzigReservatieAantal(BonNr, ProductLijn, NieuwReservatieAantal)
+]]></Implementation>
 </Method>
 
 <Method name="StartBon">
Index: vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml
===================================================================
diff -u -r1759 -r1780
--- vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml	(.../TestUglyPickingService.cls.xml)	(revision 1759)
+++ vhUnitTest/APPS/MAG/UGLYPicking/TestUglyPickingService.cls.xml	(.../TestUglyPickingService.cls.xml)	(revision 1780)
@@ -184,6 +184,35 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestWijzigReservatieAantal">
+<Implementation><![CDATA[
+	Do ..MaakBon(1234)
+	
+	Set Service = ##class(APPS.MAG.UGLYPicking.impl.UglyPickingService).%New()
+	Do Service.StartBon(1234)
+	
+	Set ProductLijnen = Service.GeefProductLijnen(1234,##class(APPS.MAG.UGLYPicking.enu.Magazijn).TandemAventos())
+	Set ProductLijn = ProductLijnen.Lijst.GetAt(1)
+	
+	Set NieuwReservatieAantal = 1
+	Do Service.WijzigReservatieAantal(1234,ProductLijn,NieuwReservatieAantal)
+	
+	Set ResultSet = ##class(%ResultSet).%New("Flow.OrderWMS.PalletReservatie:GetIDViaConsNrPallIDAndProd")
+	Do ResultSet.Execute(1234, ProductLijn.PalletID , ProductLijn.ProductID)
+	Do ResultSet.Next()
+	Set PalletReservatieID = ResultSet.Data("ID")
+	Set PalletReservatie = ##class(Flow.OrderWMS.PalletReservatie).%OpenId(PalletReservatieID)
+	
+	Do $$$AssertEquals(ProductLijn.Aantal,2,"Er moeten 2 producten gepicked worden")
+	Do $$$AssertEquals(PalletReservatie.AantalTePicken,1,"Het aantal te picken producten is gewijzigd van 2 naar 1")
+	
+	
+	Do Service.StopHuidigeBon()
+	
+	Do ..VerwijderBon(1234)
+]]></Implementation>
+</Method>
+
 <Method name="TestStelUit">
 <Implementation><![CDATA[
 	Do ..MaakBon(1234)
Index: WS/MAG/UGLYPicking/UGLYPickingService.cls.xml
===================================================================
diff -u -r1779 -r1780
--- WS/MAG/UGLYPicking/UGLYPickingService.cls.xml	(.../UGLYPickingService.cls.xml)	(revision 1779)
+++ WS/MAG/UGLYPicking/UGLYPickingService.cls.xml	(.../UGLYPickingService.cls.xml)	(revision 1780)
@@ -109,5 +109,12 @@
 <Implementation><![CDATA[	Quit ##class(APPS.MAG.UglyPickingService).%New().VoerPickingUit(Product)
 ]]></Implementation>
 </Method>
+
+<Method name="WijzigReservatieAantal">
+<FormalSpec>BonNr:%Integer,ProductLijn:APPS.MAG.UGLYPicking.dto.ProductLijn,NieuwReservatieAantal:%Integer</FormalSpec>
+<WebMethod>1</WebMethod>
+<Implementation><![CDATA[	Do ##class(APPS.MAG.UglyPickingService).%New().WijzigReservatieAantal(BonNr, ProductLijn, NieuwReservatieAantal)
+]]></Implementation>
+</Method>
 </Class>
 </Export>
Index: APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml
===================================================================
diff -u -r1779 -r1780
--- APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1779)
+++ APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1780)
@@ -382,13 +382,27 @@
 		Do ProductLijnen.KennisAnkers.Insert(Kennis.Msg)
 	}
 	
-	Set Status = ##class(BL.MB.UGLYPicking.OrderReservatie).CreateUnFinishedZeroPalletIDs(BonNr,Magazijn,##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen())
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT Count(1) As AantalReservaties FROM Flow_OrderWMS.PalletReservatie WHERE ConsolidatieNr = ? AND Magazijn = ?")
+	Do ResultSet.Execute(BonNr,Magazijn)
 	
-	If ($$$ISERR(Status))
+	If (ResultSet.Next())
 	{
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Pallet reservaties konden niet uitgevoerd worden",Status))
+		If (ResultSet.Data("AantalReservaties") = 0)
+		{
+			Set Status = ##class(BL.MB.UGLYPicking.OrderReservatie).CreateUnFinishedZeroPalletIDs(BonNr,Magazijn,##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen())
+			
+			If ($$$ISERR(Status))
+			{
+				Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Pallet reservaties konden niet uitgevoerd worden",Status))
+			}
+		}
 	}
-	
+	Else
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Kon niet achterhalen of de palletreservaties zijn uitgevoerd voor deze bon!"))
+	}
+		
 	Set Status = ##class(BL.MB.UGLYPicking.OrderReservatie).ProcessUnFinishedZeroPalletIDs(BonNr,Magazijn)
 
  	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
@@ -521,9 +535,48 @@
 <ReturnType>%Status</ReturnType>
 </Method>
 
-<Method name="ReservatieProbleemOplossen">
-<FormalSpec>ProductLijn:APPS.MAG.UGLYPicking.dto.ProductLijn,NieuwReservatieAantal:%Integer</FormalSpec>
-<ReturnType>%Status</ReturnType>
+<Method name="WijzigReservatieAantal">
+<FormalSpec>BonNr:%Integer,ProductLijn:APPS.MAG.UGLYPicking.dto.ProductLijn,NieuwReservatieAantal:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	
+	If (NieuwReservatieAantal < 0)
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Het nieuwe reservatieaantal kan niet kleiner zijn dan 0!"))	
+	}
+
+	Do ..ControleerSessie(BonNr)
+	
+	Set PalletReservatieID = ..BepaalPalletReservatieID(BonNr,ProductLijn.ProductID,ProductLijn.PalletID)
+	
+	Set PalletReservatie = ##class(Flow.OrderWMS.PalletReservatie).%OpenId(PalletReservatieID)
+	
+	If ('$IsObject(PalletReservatie))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Kon geen palletreservatie terugvinden voor deze productlijn."))	
+	}
+	
+	If (NieuwReservatieAantal = 0)
+	{
+		Do ##class(Flow.OrderWMS.PalletReservatie).%DeleteId(PalletReservatieID)
+	}
+	Else
+	{
+		Set PalletReservatie.AantalTePicken = NieuwReservatieAantal
+		Set Status = PalletReservatie.%Save()
+	}
+	
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon het nieuwe aantal niet opslaan in de palletreservatie!",Status))
+	}
+	
+	Set Status = ##class(BL.MB.UGLYPicking.OrderReservatie).ProcessUnFinishedZeroPalletIDs(BonNr,PalletReservatie.Magazijn)
+	
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Kon de reallocatie niet uitvoeren voor dit product."))
+	}
+]]></Implementation>
 </Method>
 
 <Method name="StartBon">