Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r58593 -r58599
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 58593)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 58599)
@@ -23,8 +23,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="InventarisService">
+<Type>APPS.MAG.Inventaris.impl.InventarisService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",PalletCodeValidator:WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator=""</FormalSpec>
+<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",PalletCodeValidator:WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator="",InventarisService:APPS.MAG.Inventaris.impl.InventarisService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -33,6 +38,7 @@
 	Set ..DnaCodeRepository = $$$Inject(DnaCodeRepository, ##class(DOM.Halux.AAP.DnaCodeRepository).%New())
 	Set ..PalletCodeValidator = $$$Inject(PalletCodeValidator, ##class(WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator).%New())
 	Set ..DateTimeAPI = ##class(TECH.Context).Instance().GeefDateTimeAPI()
+	Set ..InventarisService = $$$Inject(InventarisService, ##class(APPS.MAG.Inventaris.impl.InventarisService).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -202,6 +208,7 @@
 <ReturnType>WS.Halux.AAP.ToeleveringBijwerkenResponse</ReturnType>
 <Implementation><![CDATA[
 	#dim DnaCode As DOM.Halux.AAP.DnaCode
+	#dim VolgNr As %String
 	
 	Set Response = ##class(WS.Halux.AAP.ToeleveringBijwerkenResponse).%New()
 	Try {
@@ -219,12 +226,14 @@
 				}
 				
 				If ToeleveringBijwerkenRequest.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer() {
-					Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(ToeleveringBijwerkenRequest.Toelevering, , ToeleveringBijwerkenRequest.Header.Initialen)
+					Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(ToeleveringBijwerkenRequest.Toelevering, , ToeleveringBijwerkenRequest.Header.Initialen,.VolgNr)
 					
 					If DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Gescand() {
 						Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer()
 						Do ..DnaCodeRepository.Bewaar(DnaCode)
 					}
+					
+					Do ##class(BL.MB.UGLYPicking.Receptie).CloseAndHandleBuffer("~tmp",VolgNr)
 				}
 				
 			}
@@ -248,6 +257,7 @@
 <ReturnType>WS.Halux.AAP.PalletBijwerkenResponse</ReturnType>
 <Implementation><![CDATA[
 	#dim DnaCode As DOM.Halux.AAP.DnaCode
+	#dim VolgNr As %String
 	
 	Set Response = ##class(WS.Halux.AAP.PalletBijwerkenResponse).%New()
 	Try {
@@ -265,12 +275,15 @@
 				}
 				
 				If PalletBijwerkenRequest.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer() {
-					Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(, PalletBijwerkenRequest.Pallet, PalletBijwerkenRequest.Header.Initialen)
+					Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(, PalletBijwerkenRequest.Pallet, PalletBijwerkenRequest.Header.Initialen,.VolgNr)
 					
 					If DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Gescand() {
 						Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBuffer()
+						Set DnaCode.Locatie = ##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit()
 						Do ..DnaCodeRepository.Bewaar(DnaCode)
 					}
+					
+					Do ##class(BL.MB.UGLYPicking.Receptie).CloseAndHandleBuffer("~tmp",VolgNr)
 				}
 				
 			}
@@ -343,11 +356,14 @@
 					Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaPalletCode(OudePalletCode)
 				}	
 				If DnaCodeIterator.HasNext() {
+					Do ..InventarisService.HernoemPallet(OudePalletCode, NieuwePalletCode)
+					
 					While DnaCodeIterator.HasNext() {
 						Set DnaCode = DnaCodeIterator.Next()
 						Set DnaCode.PalletCode = NieuwePalletCode
 						Do ..DnaCodeRepository.Bewaar(DnaCode)
 					}
+					
 					Set Response.Header.Status = "200"
 					Set Response.Header.Omschrijving = "Pallet is succesvol gewijzigd"
 					Set Response.Header.OmschrijvingVoorLogging = "Pallet is succesvol gewijzigd van '"_OudePalletCode_"' naar '"_NieuwePalletCode_"'"
Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml
===================================================================
diff -u -r58239 -r58599
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml	(.../Test.cls.xml)	(revision 58239)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/HernoemPallet/Test.cls.xml	(.../Test.cls.xml)	(revision 58599)
@@ -43,6 +43,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="InventarisServiceMock">
+<Type>APPS.MAG.Inventaris.impl.InventarisService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -57,6 +62,7 @@
 	Set ..DnaCodeIterator2 = ##class(TECH.ListUtils).CreateIteratorOfObjects(..DnaCode2)
 	Set ..DnaCodeRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.DnaCodeRepository).%New()
 	Set ..PalletCodeValidatorStub = ##class(vhTest.Mock.WSimpl.Halux.AAP.DnaCodeService.PalletCodeValidator).%New()
+	Set ..InventarisServiceMock = ##class(vhTest.Mock.APPS.MAG.Inventaris.impl.InventarisService).%New()
 ]]></Implementation>
 </Method>
 
@@ -188,14 +194,17 @@
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..Request.OudeCode).DanReturn($$$True)
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..Request.NieuweCode).DanReturn($$$True)
 
-	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("HernoemPallet",..DnaCode1.PalletCode,..DnaCode2.PalletCode).DanDoeNiks()
+
+	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub, ..InventarisServiceMock)
 	
 	#dim Antwoord As WS.Halux.AAP.HernoemPalletResponse = DnaCodeService.HernoemPallet(..Request)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"200")
 	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Pallet is succesvol gewijzigd")
 	Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
 	Do ..DnaCodeRepositoryMock.Verifieer()
+	Do ..InventarisServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -212,14 +221,17 @@
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode1.PalletCode).DanReturn($$$True)
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode2.PalletCode).DanReturn($$$True)
 
-	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("HernoemPallet",..DnaCode1.PalletCode,..DnaCode2.PalletCode).DanDoeNiks()
+
+	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub, ..InventarisServiceMock)
 	
 	#dim Antwoord As WS.Halux.AAP.HernoemPalletResponse = DnaCodeService.HernoemPallet(..Request)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"200")
 	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Pallet is succesvol gewijzigd")
 	Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
 	Do ..DnaCodeRepositoryMock.Verifieer()
+	Do ..InventarisServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -236,14 +248,17 @@
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode1.PalletCode).DanReturn($$$True)
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode2.PalletCode).DanReturn($$$True)
 
-	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("HernoemPallet",..DnaCode1.PalletCode,..DnaCode2.PalletCode).DanDoeNiks()
+
+	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub, ..InventarisServiceMock)
 	
 	#dim Antwoord As WS.Halux.AAP.HernoemPalletResponse = DnaCodeService.HernoemPallet(..Request)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"200")
 	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Pallet is succesvol gewijzigd")
 	Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
 	Do ..DnaCodeRepositoryMock.Verifieer()
+	Do ..InventarisServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -259,14 +274,17 @@
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode1.PalletCode).DanReturn($$$True)
 	Do ..PalletCodeValidatorStub.IndienMethodCall("ValideerPalletCode",..DnaCode2.PalletCode).DanReturn($$$True)
 
-	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub)
+	Do ..InventarisServiceMock.VerwachtMethodCall("HernoemPallet",..DnaCode1.PalletCode,..DnaCode2.PalletCode).DanDoeNiks()
+
+	Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(..DnaCodeRepositoryMock, ..PalletCodeValidatorStub, ..InventarisServiceMock)
 	
 	#dim Antwoord As WS.Halux.AAP.HernoemPalletResponse = DnaCodeService.HernoemPallet(..Request)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"200")
 	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Pallet is succesvol gewijzigd")
 	Do $$$AssertEquals(Antwoord.DnaCodes.Count(),0)
 	Do ..DnaCodeRepositoryMock.Verifieer()
+	Do ..InventarisServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>
Index: BL/MB/UGLYPicking/Receptie.cls.xml
===================================================================
diff -u -r58121 -r58599
--- BL/MB/UGLYPicking/Receptie.cls.xml	(.../Receptie.cls.xml)	(revision 58121)
+++ BL/MB/UGLYPicking/Receptie.cls.xml	(.../Receptie.cls.xml)	(revision 58599)
@@ -2077,7 +2077,7 @@
 	While DnaCodeIterator.HasNext() {
 		Set DnaCode = DnaCodeIterator.Next()
 		If DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Gescand() {
-			Set Status = ..AddToBuffer(RGID,VolgNr,DnaCode.ProductNummer,DnaCode.LadeCode,DnaCode.Locatie,DnaCode.PalletCode,Initialen,,,,,)
+			Set Status = ..AddToBuffer(RGID,VolgNr,DnaCode.ProductNummer,DnaCode.LadeCode,##class(APPS.MAG.enu.MagazijnTransitLocatie).Halux2Transit(),DnaCode.PalletCode,Initialen,,,,,)
 		}
 	}  
 	;Buffer verwijderen indien geen lijnen aangemaakt (leeg)