Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml
===================================================================
diff -u -r61563 -r62146
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml	(.../Test.cls.xml)	(revision 61563)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml	(.../Test.cls.xml)	(revision 62146)
@@ -252,8 +252,15 @@
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode1.PalletCode).DanReturn($$$True)
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode2.PalletCode).DanReturn($$$True)
 
+	#dim DummyLocatieCode As %String = "01020304"
+	Set LocatieStub = ##class(vhTest.Mock.DOM.MAG.impl.MagazijnLocatie).%New()
+	Do LocatieStub.IndienMethodCall("GeefCode").DanReturn(DummyLocatieCode)
+
 	Do ..InventarisServiceMock.VerwachtMethodCall("HernoemPallet",..DnaCode1.PalletCode,..DnaCode2.PalletCode).ExactAantalKeer(0).DanDoeNiks()
 	Do ..InventarisServiceMock.VerwachtMethodCall("VoerBijladenUit",..DnaCode1.PalletCode,..DnaCode2.PalletCode,##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit(),..DnaCode1.ProductNummer,1).ExactAantalKeer(1).DanDoeNiks()
+	Do ..InventarisServiceMock.VerwachtMethodCall("GeefLocatieVoorDrager",..Request.OudeCode).DanReturn(LocatieStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("VerplaatsPallet",..Request.OudeCode,##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit()).DanReturn(LocatieStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("VerplaatsPallet",..Request.OudeCode,LocatieStub.GeefCode()).DanReturn(LocatieStub)
 	
 	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub, ..InventarisServiceMock)
 	
Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r62064 -r62146
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 62064)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 62146)
@@ -577,7 +577,11 @@
 						If $$$Not($$$HasLength(HernoemPalletRequest.EnkelDezeDnaCode)) {
 							Do ..InventarisService.HernoemPallet(OudePalletCode, NieuwePalletCode)
 						} Else {
+							#dim Locatie As DOM.MAG.MagazijnLocatie = ..InventarisService.GeefLocatieVoorDrager(OudePalletCode).GeefCode()
+							Do ..InventarisService.VerplaatsPallet(OudePalletCode, ##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit())
 							Do ..InventarisService.VoerBijladenUit(OudePalletCode, NieuwePalletCode, ##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit(), DnaCode.ProductNummer, 1)						
+							
+							Do ..InventarisService.VerplaatsPallet(OudePalletCode,Locatie)
 						}
 					}
 					
@@ -610,6 +614,7 @@
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Set Response.Header.Status = Exception.GeefExceptionCode()
 		Set Response.Header.Omschrijving = Exception.GeefOmschrijving()
+		Do ##class(vhLib.Logger).LogExceptie(Exception)
 	}
 	Quit Response
 ]]></Implementation>