Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml
===================================================================
diff -u -r32737 -r32742
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml	(.../TestAlpnach.cls.xml)	(revision 32737)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml	(.../TestAlpnach.cls.xml)	(revision 32742)
@@ -8,6 +8,14 @@
 <Private>1</Private>
 </Property>
 
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	Do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Reset()
+]]></Implementation>
+</Method>
+
 <Method name="Test">
 <Implementation><![CDATA[
 	#dim Lijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
@@ -98,8 +106,6 @@
 	do Verwerker.VerwerkUitvoeringInfoLijst(Lijst,##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
 	
 	do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
-	
-	do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Reset()
 ]]></Implementation>
 </Method>
 
@@ -195,8 +201,96 @@
 	do Verwerker.VerwerkUitvoeringInfoLijst(Lijst,##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
 	
 	do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Wisselen van kar zorgt voor extra tussenetiket">
+<Implementation><![CDATA[
+	#dim Lijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
+	#dim KlantEtiketUitvoeringInfo1 As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo = ..MaakKlantEtiketUitvoeringInfo()
+	Set KlantEtiketUitvoeringInfo1.SequentieNummer = 1
+	Set KlantEtiketUitvoeringInfo1.ToeleveringID = 222222
 	
-	do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Reset()
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.AantalStuks = 1
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.AantalTitel = "Stk"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.BarcodeID = ""
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Code = "M/Z"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Device = "HALUX_productie_TAOR"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Dimensie = "D:500 x B:408"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Dossier = 222222
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.DossierCode = "CVI"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.DossierTitel = "Dossier"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.DuurzaamBosbeheerCertificaatLogoLocatie = "LOGO\W\PEFC_VH_PROD_70.JPG"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.IdentNr = "9.669.288.10"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Info1 = ""
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Info2 = "UNITTEST KLANT"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Info3 = ""
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Info4 = ""
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Kleurcodes = "NE-NE NE"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.LadeAfbeeldingLocatie = "GENERIEK\TAOR_BOX\VET\TAOR_BOX_M_Z.JPG"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.LandVanHerkomst = "Made in BELGIUM"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Layout = "Klant_TAX_8x11"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.LogoLocatie = "LOGO\TAOR_zwart.jpg"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Omschrijving1 = "Zijkant links"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Omschrijving2 = "Natuur Eikenhout - Natuur Eikenhout"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.OrderID = 322222
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.OrderTitel = "Order"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Taal = "N"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.TypeNaam = "TA'OR BOX"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.Verzendwijze = "DI1"
+	Set KlantEtiketUitvoeringInfo1.KlantEtiketData.WandDikte = ""
+	
+	#dim KlantEtiketUitvoeringInfo2 As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo = ..MaakKlantEtiketUitvoeringInfo()
+	Set KlantEtiketUitvoeringInfo2.SequentieNummer = 2
+	Set KlantEtiketUitvoeringInfo2.ToeleveringID = 222222
+	
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Aantal = 1
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.AantalStuks = 1
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.AantalTitel = "Stk"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.BarcodeID = ""
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Code = "F"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Device = "HALUX_productie_TAOR"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Dimensie = "D:400 x B:878"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Dossier = 222222
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.DossierCode = "FWG"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.DossierTitel = "Dossier"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.DuurzaamBosbeheerCertificaatLogoLocatie = "LOGO\W\PEFC_VH_PROD_80.JPG"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.IdentNr = "9.412.236.11"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Info1 = ""
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Info2 = "UNITTEST KLANT"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Info3 = ""
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Info4 = ""
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Kleurcodes = "W-W W"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.LadeAfbeeldingLocatie = "GENERIEK\TAOR_BOX\VET\TAOR_BOX_F.JPG"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.LandVanHerkomst = "Made in BELGIUM"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Layout = "Klant_TAX_8x11"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.LogoLocatie = "LOGO\TAOR_zwart.jpg"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Omschrijving1 = "Zijkant links"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Omschrijving2 = "Wit - Wit"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.OrderID = 322222
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.OrderTitel = "Order"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Taal = "N"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.TypeNaam = "TA'OR BOX"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.Verzendwijze = "DI1"
+	Set KlantEtiketUitvoeringInfo2.KlantEtiketData.WandDikte = ""	
+	
+	Do Lijst.Insert(KlantEtiketUitvoeringInfo1)
+	Do Lijst.Insert(KlantEtiketUitvoeringInfo2)
+	
+	#dim DummyUitvoeringInfoBewaarder As vhTest.Fake.APPS.Halux.PPS.Activiteit.impl.common.UitvoeringInfoBewaarder = ##class(vhTest.Fake.APPS.Halux.PPS.Activiteit.impl.common.UitvoeringInfoBewaarder).%New()
+	
+	Do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Register("UitvoeringInfoBewaarder", DummyUitvoeringInfoBewaarder)
+	
+	#dim FakeLabelPrinter As vhTest.Fake.BL.Sys.LabelPrinter = ##class(vhTest.Fake.BL.Sys.LabelPrinter).%New(..GeefBestandLocatie())
+
+	#dim AssemblageKarRepositoryStub As vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository = ##class(vhTest.Mock.APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
+	Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, 1).DanReturn(1)
+	Do AssemblageKarRepositoryStub.IndienMethodCall("GeefKarVolgnummerViaSequentieNr", KlantEtiketUitvoeringInfo1.BatchID, 2).DanReturn(2)
+
+	#dim Verwerker As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(FakeLabelPrinter, AssemblageKarRepositoryStub)
+	Do Verwerker.VerwerkUitvoeringInfoLijst(Lijst, ##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New())
+	
+	Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
 ]]></Implementation>
 </Method>
 
Index: vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestWisselenvankarzorgtvoorextratussenetiket/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestWisselenvankarzorgtvoorextratussenetiket/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestWisselenvankarzorgtvoorextratussenetiket/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt	(revision 32742)
@@ -0,0 +1,6 @@
+%BTW% /AF="C:\Bartender\Templates\Klant_TAX_8x11.btw" /PRN="HALUX_productie_TAOR" /R=3 /P  /D=<Trigger File Name> /CLOSE
+%END%
+LogoLocatie	TypeNaam	Code	Dimensie	WandDikte	Kleurcodes	Omschrijving1	Omschrijving2	DuurzaamBosbeheerCertificaatLogoLocatie	BarcodeID	LadeAfbeeldingLocatie	LandVanHerkomst	AantalTitel	Aantal	IdentNr	ReferentieVeld1	ReferentieVeld2	ReferentieVeld3	ReferentieVeld4	DossierCode	OrderTitel	OrderID	DossierTitel	Dossier	Verzendwijze	
+															Toelevering:222222, Kar:1	BatchID:15000	DueOut:14/11								
+LOGO\TAOR_zwart.jpg	TA'OR BOX	M/Z	D:500 x B:408		NE-NE NE	Zijkant links	Natuur Eikenhout - Natuur Eikenhout	LOGO\W\PEFC_VH_PROD_70.JPG		GENERIEK\TAOR_BOX\VET\TAOR_BOX_M_Z.JPG	Made in BELGIUM	Stk	1	9.669.288.10		UNITTEST KLANT			CVI	Order	322222	Dossier	222222	DI1	
+LOGO\TAOR_zwart.jpg	TA'OR BOX	F	D:400 x B:878		W-W W	Zijkant links	Wit - Wit	LOGO\W\PEFC_VH_PROD_80.JPG		GENERIEK\TAOR_BOX\VET\TAOR_BOX_F.JPG	Made in BELGIUM	Stk	1	9.412.236.11		UNITTEST KLANT			FWG	Order	322222	Dossier	222222	DI1