Index: vhUnitTest/WSimpl/Halux/AAP/AfdrukService/KlantEtiketAfdrukken/Test.cls.xml
===================================================================
diff -u -r61718 -r61722
--- vhUnitTest/WSimpl/Halux/AAP/AfdrukService/KlantEtiketAfdrukken/Test.cls.xml	(.../Test.cls.xml)	(revision 61718)
+++ vhUnitTest/WSimpl/Halux/AAP/AfdrukService/KlantEtiketAfdrukken/Test.cls.xml	(.../Test.cls.xml)	(revision 61722)
@@ -146,9 +146,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 TAX - LC in request">
-</Method>
-
 <Method name="Test: 2 LBX in request">
 <Implementation><![CDATA[
 	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
@@ -160,7 +157,8 @@
 	#dim DnaCodeIteratorTweeStuks As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2)
 	
 	Set KlantEtiketAfdrukkenRequest = ##class(WS.Halux.AAP.KlantEtiketAfdrukkenRequest).%New()
-	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode1)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode1.DnaCode)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode2.DnaCode)
 	
 	Set EtikettenAfdrukkenHelperMock = ##class(vhTest.Mock.WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper).%New()
 	Do EtikettenAfdrukkenHelperMock.VerwachtMethodCall("MaakDnaCodeIteratorVanDnaCodeStringLijst",KlantEtiketAfdrukkenRequest.DnaCodes).DanReturn(DnaCodeIteratorTweeStuks)
@@ -171,7 +169,7 @@
 
 	Set BatchServiceMock = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
 	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode1.BatchId).DanReturn($$$True)
-	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode1.BatchId).DanReturn(BatchStub)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode1.BatchId).DanReturn(BatchStub).ExactAantalKeer(3)
 	
 	Set PrinterMock = ##class(vhTest.Mock.APPS.Halux.PPS.AansturingActie.common.KlantEtiket.Printer).%New()
 	Do PrinterMock.VerwachtMethodCall("PrintKlantEtiket",BatchStub,"",..Matches.Object(DnaCodeIteratorTweeStuks)).DanDoeNiks()
@@ -206,6 +204,7 @@
 	
 	Set KlantEtiketAfdrukkenRequest = ##class(WS.Halux.AAP.KlantEtiketAfdrukkenRequest).%New()
 	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode1.DnaCode)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode2.DnaCode)
 	
 	Set EtikettenAfdrukkenHelperMock = ##class(vhTest.Mock.WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper).%New()
 	Do EtikettenAfdrukkenHelperMock.VerwachtMethodCall("MaakDnaCodeIteratorVanDnaCodeStringLijst",KlantEtiketAfdrukkenRequest.DnaCodes).DanReturn(DnaCodeIteratorTweeStuks)
@@ -219,7 +218,6 @@
 	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode1.BatchId).DanReturn($$$True)
 	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode1.BatchId).DanReturn(BatchStub).ExactAantalKeer(2)
 	
-	
 	Set ProductieSequentieItem = ##class(APPS.Halux.common.ProductieSequentieItem).%New()
 	Set ProductieSequentieItem.SequentieNummer = "42"
 	Set ProductieSequentieItem2 = ##class(APPS.Halux.common.ProductieSequentieItem).%New()
@@ -257,10 +255,95 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 2 TAX - LC in request">
-</Method>
+<Method name="Test: 2 LBX en 2 TAX in 4 verschillende batches">
+<Implementation><![CDATA[
+	Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode1.DnaCode = "LAAAAA0"
+	Set DnaCode1.BatchId = "111111"
+	Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode2.DnaCode = "LAAAAA1"
+	Set DnaCode2.BatchId = "111112"
+	Set DnaCode3 = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode3.DnaCode = "HAAAAA0"
+	Set DnaCode3.BatchId = "111113"
+	Set DnaCode4 = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode4.DnaCode = "HAAAAA1"
+	Set DnaCode4.BatchId = "111114"
+	#dim DnaCodeIteratorTweeLBX As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2)
+	#dim DnaCodeIteratorTweeTAX As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode3, DnaCode4)
+	#dim DnaCodeIteratorAlles As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2, DnaCode3, DnaCode4)
+	
+	Set KlantEtiketAfdrukkenRequest = ##class(WS.Halux.AAP.KlantEtiketAfdrukkenRequest).%New()
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode1.DnaCode)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode2.DnaCode)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode3.DnaCode)
+	Do KlantEtiketAfdrukkenRequest.DnaCodes.Insert(DnaCode4.DnaCode)
+	
+	Set EtikettenAfdrukkenHelperMock = ##class(vhTest.Mock.WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper).%New()
+	Do EtikettenAfdrukkenHelperMock.VerwachtMethodCall("MaakDnaCodeIteratorVanDnaCodeStringLijst",KlantEtiketAfdrukkenRequest.DnaCodes).DanReturn(DnaCodeIteratorAlles)
+	
+	Set LbxBatchStub = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+	Do LbxBatchStub.IndienMethodCall("GeefCategorie").DanReturn(##class(APPS.Halux.common.enu.Categorie).Legrabox())
+	Do LbxBatchStub.IndienMethodCall("GeefProductieGroep").DanReturn("")
+	Set TaxBatchStub = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+	Do TaxBatchStub.IndienMethodCall("GeefCategorie").DanReturn(##class(APPS.Halux.common.enu.Categorie).TAORbox())
+	Do TaxBatchStub.IndienMethodCall("GeefProductieGroep").DanReturn("")
+	Do TaxBatchStub.IndienMethodCall("GeefID").DanReturn(DnaCode3.BatchId)
 
-<Method name="Test: 2 LBX en 2 TAX en 2 TAX - LC in request">
+	Set BatchServiceMock = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode1.BatchId).DanReturn($$$True)
+	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode2.BatchId).DanReturn($$$True)
+	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode3.BatchId).DanReturn($$$True)
+	Do BatchServiceMock.VerwachtMethodCall("BestaatBatch",DnaCode4.BatchId).DanReturn($$$True)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode1.BatchId).DanReturn(LbxBatchStub).ExactAantalKeer(2)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode2.BatchId).DanReturn(LbxBatchStub).ExactAantalKeer(1)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode3.BatchId).DanReturn(TaxBatchStub).ExactAantalKeer(2)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch",DnaCode4.BatchId).DanReturn(TaxBatchStub).ExactAantalKeer(1)
+	
+	Set PrinterMock = ##class(vhTest.Mock.APPS.Halux.PPS.AansturingActie.common.KlantEtiket.Printer).%New()
+	Do PrinterMock.VerwachtMethodCall("PrintKlantEtiket",LbxBatchStub,"",..Matches.Object(DnaCodeIteratorTweeLBX)).DanDoeNiks()
+	
+	Set PrinterFactoryMock = ##class(vhTest.Mock.APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.PrinterFactory).%New()
+	Do PrinterFactoryMock.VerwachtMethodCall("GeefKlantEtiketPrinter",LbxBatchStub).DanReturn(PrinterMock)
+
+	Set ProductieSequentieItem = ##class(APPS.Halux.common.ProductieSequentieItem).%New()
+	Set ProductieSequentieItem.SequentieNummer = "42"
+	Set ProductieSequentieItem2 = ##class(APPS.Halux.common.ProductieSequentieItem).%New()
+	Set ProductieSequentieItem2.SequentieNummer = "43"
+	
+	Set ProductieSequentie = ##class(vhUnitTest.APPS.Halux.common.impl.UTProductieSequentie).%New(TaxBatchStub)
+	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem)
+	Do ProductieSequentie.VoegToeSequentieItem(ProductieSequentieItem2)
+	
+	Set ProductieSequentieServiceMock = ##class(vhTest.Mock.APPS.Halux.common.impl.SequentieService).%New()
+	Do ProductieSequentieServiceMock.VerwachtMethodCall("GeefProductieSequentie",DnaCode3.BatchId).DanReturn(ProductieSequentie)
+	Do ProductieSequentieServiceMock.VerwachtMethodCall("GeefProductieSequentie",DnaCode4.BatchId).DanReturn(ProductieSequentie)
+	
+	Set WerklijstItem = ##class(APPS.Halux.PPS.Activiteit.dto.ProductieSequentieWerklijstItem).%New()
+	Set KlantEtiketInput = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.KlantEtiketInput).%New()
+	Set Uitvoeringinfo = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo).%New()
+	Set WerklijstItem.UitvoeringInfo = Uitvoeringinfo
+	
+	Set WerklijstItemMakerMock = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.KlantEtiketWerklijstItemMaker).%New(KlantEtiketInput)
+	Do WerklijstItemMakerMock.VerwachtMethodCall("MaakWerklijstItem",$$$ElkeWaarde).DanReturn(WerklijstItem)
+	
+	Set VerwerkerMock = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New("", , , )
+	Do VerwerkerMock.VerwachtMethodCall("VerwerkUitvoeringInfoLijst",$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
+	
+	Set AfdrukService = ##class(WSimpl.Halux.AAP.AfdrukService).%New(,,EtikettenAfdrukkenHelperMock,BatchServiceMock,PrinterFactoryMock,ProductieSequentieServiceMock,WerklijstItemMakerMock,VerwerkerMock)
+	
+	#dim Antwoord As WS.Halux.AAP.KlantEtiketAfdrukkenResponse = AfdrukService.KlantEtiketAfdrukken(KlantEtiketAfdrukkenRequest)
+	
+	Do EtikettenAfdrukkenHelperMock.Verifieer()
+	Do BatchServiceMock.Verifieer()
+	Do PrinterMock.Verifieer()
+	Do PrinterFactoryMock.Verifieer()
+	Do ProductieSequentieServiceMock.Verifieer()
+	Do WerklijstItemMakerMock.Verifieer()
+	Do VerwerkerMock.Verifieer()
+	
+	Do $$$AssertEquals(Antwoord.Header.Status,"200")
+]]></Implementation>
 </Method>
 </Class>
 
Index: WSimpl/Halux/AAP/AfdrukService.cls.xml
===================================================================
diff -u -r61717 -r61722
--- WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 61717)
+++ WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 61722)
@@ -188,16 +188,15 @@
 
 <Method name="GeefBatchVoorDnaCode">
 <FormalSpec>DnaCode:DOM.Halux.AAP.DnaCode</FormalSpec>
+<Private>1</Private>
 <ReturnType>APPS.Halux.common.Batch</ReturnType>
 <Implementation><![CDATA[
-	
 	#dim BatchId As %Integer = DnaCode.BatchId
 	#dim BestaatBatch As %Boolean = ..BatchService.BestaatBatch(BatchId)
 
 	If ($$$Not(BestaatBatch)) {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Batch ("_DnaCode.BatchId_") niet gevonden voor Dnacode ("_DnaCode.DnaCode_")"))
 	}
-
 	Quit ..BatchService.GeefBatch(BatchId)
 ]]></Implementation>
 </Method>
@@ -272,9 +271,8 @@
 		If (DnaCodeIterator.HasNext()){
 			#dim DnaCode As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next()
 			#dim BatchId As %Integer = DnaCode.BatchId
-			#dim Batch As APPS.Halux.common.impl.BatchImpl = ..BatchService.GeefBatch(BatchId)	
-			
-			If $$$Not(Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {	
+			#dim Batch As APPS.Halux.common.impl.BatchImpl = ..BatchService.GeefBatch(BatchId)
+			If $$$Not(Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
 				Set Printer = ..PrinterFactory.GeefKlantEtiketPrinter(Batch)
 				Do Printer.PrintKlantEtiket(Batch,,DnaCodeIterator)
 			} Else {
@@ -287,6 +285,7 @@
 				Set ActiviteitParameters.Printer = "18"
 				
 				#dim Lijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = ..MaakKlantEtiketUitvoeringInfoVanDnaCodeIterator(DnaCodeIterator)
+				
 				Do Verwerker.VerwerkUitvoeringInfoLijst(Lijst,ActiviteitParameters)
 			}
 		} Else {