Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml
===================================================================
diff -u -r32732 -r32734
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 32732)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 32734)
@@ -9,6 +9,12 @@
 <Private>1</Private>
 </Property>
 
+<Property name="TussenEtiketLookup">
+<Type>%String</Type>
+<Collection>array</Collection>
+<Private>1</Private>
+</Property>
+
 <Property name="FormatAPI">
 <Type>TECH.Format.FormatAPI</Type>
 <Private>1</Private>
@@ -36,27 +42,21 @@
 <Method name="VerzamelData">
 <FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
 <Implementation><![CDATA[
-	If $$$Not(..BestaatTussenEtiketVoorToelevering(UitvoeringInfo.ToeleveringID)) {
-		Do ..Etiketten.InsertAt(..MaakTussenEtiket(UitvoeringInfo), 1)
+	If $$$Not(..TussenEtiketLookup.IsDefined(UitvoeringInfo.ToeleveringID)) {
+		Do ..Etiketten.Insert(..MaakTussenEtiket(UitvoeringInfo))
+		Do ..TussenEtiketLookup.SetAt("", UitvoeringInfo.ToeleveringID)
 	}
 	
 	Do ..Etiketten.Insert(..MaakEtiket(UitvoeringInfo.KlantEtiketData))
 ]]></Implementation>
 </Method>
 
-<Method name="BestaatTussenEtiketVoorToelevering">
-<FormalSpec>ToeleveringID:TECH.String</FormalSpec>
-<Private>1</Private>
+<Method name="VoerUit">
+<FormalSpec>ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
 <Implementation><![CDATA[
-	#dim Gevonden As %Boolean = $$$False
-	#dim Iterator As TECH.Iterator = ##class(TECH.ListIterator).%New(..Etiketten)
-	
-	While (Iterator.HasNext() && $$$Not(Gevonden)) {
-		#dim Etiket As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.Etiket = Iterator.Next()
-		Set Gevonden = (Etiket.Info1 = ToeleveringID)
-	}
-	
-	Quit Gevonden
+	Do ..LabelPrinterImpl.Clear()
+	Do ..VoegToeEtiketten()
+	Do ..LabelPrinterImpl.Print2Bartender()
 ]]></Implementation>
 </Method>
 
@@ -66,7 +66,7 @@
 <ReturnType>BL.Sys.pxLabel</ReturnType>
 <Implementation><![CDATA[
 	#dim Etiket As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.Etiket = ..GeefEtiket(UitvoeringInfo.KlantEtiketData.Device, UitvoeringInfo.KlantEtiketData.Layout)
-		
+
 	Set Etiket.Info1 = UitvoeringInfo.ToeleveringID
 	Set Etiket.Info2 = "BatchID: " _ UitvoeringInfo.BatchID
 	Set Etiket.Info3 = "DueOut: " _ ..FormatAPI.FormatDate(UitvoeringInfo.DueOut, "dd/mm")
@@ -75,15 +75,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="VoerUit">
-<FormalSpec>ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
-<Implementation><![CDATA[
-	Do ..LabelPrinterImpl.Clear()
-	Do ..VoegToeEtiketten()
-	Do ..LabelPrinterImpl.Print2Bartender()
-]]></Implementation>
-</Method>
-
 <Method name="VoegToeEtiketten">
 <Private>1</Private>
 <Implementation><![CDATA[
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml
===================================================================
diff -u -r32729 -r32734
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml	(.../TestAlpnach.cls.xml)	(revision 32729)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/TestAlpnach.cls.xml	(.../TestAlpnach.cls.xml)	(revision 32734)
@@ -10,7 +10,7 @@
 
 <Method name="Test">
 <Implementation><![CDATA[
-	set Lijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
+	#dim Lijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
 		
 	set KlantEtiketUitvoeringInfo1 = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo).%New()
 	set KlantEtiketUitvoeringInfo1.BatchID = "15000"
@@ -128,6 +128,127 @@
 	do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Reset()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Meerdere toeleveringen">
+<Implementation><![CDATA[
+	#dim Lijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
+		
+	set KlantEtiketUitvoeringInfo1 = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo).%New()
+	set KlantEtiketUitvoeringInfo1.BatchID = "15000"
+	set KlantEtiketUitvoeringInfo1.CorrelatieID = "2512022"
+	set KlantEtiketUitvoeringInfo1.DeelAantal = "1"
+	set KlantEtiketUitvoeringInfo1.DossierCode = "CVI"
+	set KlantEtiketUitvoeringInfo1.DueOut = "63505"
+	set KlantEtiketUitvoeringInfo1.DueOutTijdstip = "2014-11-14 00:00:00"
+	set KlantEtiketUitvoeringInfo1.IsRework = "0"
+	set KlantEtiketUitvoeringInfo1.Opmerking = ""
+	set KlantEtiketUitvoeringInfo1.PartijID = "K||10"
+	set KlantEtiketUitvoeringInfo1.ProductID = "1066928"
+	set KlantEtiketUitvoeringInfo1.SequentieNummer = "1"
+	set KlantEtiketUitvoeringInfo1.Status = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).InUitvoering()
+	set KlantEtiketUitvoeringInfo1.ToeleveringID = "222222"
+	set KlantEtiketUitvoeringInfo1.ToeleveringLijnID = "110"
+	set KlantEtiketUitvoeringInfo1.ToeleveringSequentieNummer = "1"
+	set KlantEtiketUitvoeringInfo1.TotaalAantal = "1"
+	set KlantEtiketUitvoeringInfo1.VerwerkingID = ""
+	set KlantEtiketUitvoeringInfo1.WerklijstItemID = "2512022"
+	
+	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 = ""
+	
+	do Lijst.Insert(KlantEtiketUitvoeringInfo1)
+	
+	set KlantEtiketUitvoeringInfo2 = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo).%New()
+	set KlantEtiketUitvoeringInfo2.BatchID = "15000"
+	set KlantEtiketUitvoeringInfo2.CorrelatieID = "2512023"
+	set KlantEtiketUitvoeringInfo2.DeelAantal = "1"
+	set KlantEtiketUitvoeringInfo2.DossierCode = "FWG"
+	set KlantEtiketUitvoeringInfo2.DueOut = "63505"
+	set KlantEtiketUitvoeringInfo2.DueOutTijdstip = "2014-11-14 00:00:00"
+	set KlantEtiketUitvoeringInfo2.IsRework = "0"
+	set KlantEtiketUitvoeringInfo2.Opmerking = ""
+	set KlantEtiketUitvoeringInfo2.PartijID = "K||10"
+	set KlantEtiketUitvoeringInfo2.ProductID = "1141223"
+	set KlantEtiketUitvoeringInfo2.SequentieNummer = "2"
+	set KlantEtiketUitvoeringInfo2.Status = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).InUitvoering()
+	set KlantEtiketUitvoeringInfo2.ToeleveringID = "222223"
+	set KlantEtiketUitvoeringInfo2.ToeleveringLijnID = "100"
+	set KlantEtiketUitvoeringInfo2.ToeleveringSequentieNummer = "2"
+	set KlantEtiketUitvoeringInfo2.TotaalAantal = "1"
+	set KlantEtiketUitvoeringInfo2.VerwerkingID = ""
+	set KlantEtiketUitvoeringInfo2.WerklijstItemID = "2512023"
+	
+	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 = 222223
+	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(KlantEtiketUitvoeringInfo2)
+
+	set DummyUitvoeringInfoBewaarder = ##class(vhTest.Fake.APPS.Halux.PPS.Activiteit.impl.common.UitvoeringInfoBewaarder).%New()
+	do ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringIoCContainer).Instance().Register("UitvoeringInfoBewaarder",DummyUitvoeringInfoBewaarder)
+	
+	set FakeLabelPrinter = ##class(vhTest.Fake.BL.Sys.LabelPrinter).%New(..GeefBestandLocatie())
+	set Verwerker = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten).%New(FakeLabelPrinter)
+	
+	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>
 </Class>
 
 
Index: vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestMeerdereToeleveringen/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestMeerdereToeleveringen/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten/TestAlpnach/TestMeerdereToeleveringen/HALUX_productie_TAOR_01_Klant_TAX_8x11.txt	(revision 32734)
@@ -0,0 +1,7 @@
+%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	
+															222222	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	
+															222223	BatchID: 15000	DueOut: 14/11								
+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	222223	DI1