Index: vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml
===================================================================
diff -u -r30891 -r30942
--- vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml	(.../AansturingIncrementeel.cls.xml)	(revision 30891)
+++ vhDeploy/Maatwerk/TAOR/AansturingIncrementeel.cls.xml	(.../AansturingIncrementeel.cls.xml)	(revision 30942)
@@ -61,6 +61,8 @@
 	
 	Do ..MaakOfVervangAansturingActie(Categorie, ActiviteitGroepProductie, VerpakkingActieID, "Inhoud pallet", ..#IsNietMogelijkZonderBatch,"TAOR.PalletInhoud")
 	
+	Do ..MaakOfVervangAansturingActie(Categorie, ActiviteitGroepProductie, VerpakkingActieID, "Klant etiketten FlatpackBulk en LosseComponent", ..#IsNietMogelijkZonderBatch,"TAOR.KlantEtiket")
+	
 	; 14.06.2014 : tijdelijke tryout stuff - als je dit tegenkomt na 01.07.2015 trek maar aan de oren van JCL
 	Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).%DeleteExtent()
 	Do ##class(APPS.Halux.PPS.impl.AansturingActieVoorInformatieIDs).MaakActie(Categorie,"Opdeelzaag machine data",0,999,ActiviteitGroepProductie,"Dummy","TAOR.*.Opdeelzaag","")
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten.cls.xml	(revision 30942)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten">
+<Super>APPS.Halux.PPS.Activiteit.impl.UitvoeringInfoLijstVerwerkerBasis</Super>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	do ##super()
+	Set ..UitvoeringInfoVerwerker = ##class(APPS.Halux.PPS.Activiteit.impl.UitvoeringInfoUitgesteldeVerwerker).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="StelInDeelverwerkers">
+<Implementation><![CDATA[	do ..UitvoeringInfoVerwerker.VoegToeDeelverwerker(##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.PrintEtiketten).%New())
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(revision 30942)
@@ -0,0 +1,94 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.PrintEtiketten">
+<Super>APPS.Halux.PPS.impl.UitvoeringInfoDeelVerwerker</Super>
+
+<Property name="KlantEtiketDataLijst">
+<Type>APPS.Halux.PPS.Activiteit.impl.common.dto.KlantEtiketData</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="ToeleveringenLijst">
+<Type>TECH.String</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="LabelPrinterImpl">
+<Type>BL.Sys.LabelPrinter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>LabelPrinterImpl:BL.Sys.LabelPrinter=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..LabelPrinterImpl = $$$Implementation(LabelPrinterImpl,##class(BL.Sys.LabelPrinter).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="VerzamelData">
+<FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenUitvoeringInfo,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
+<Implementation><![CDATA[
+	If ..ToeleveringenLijst.
+	do ..KlantEtiketDataLijst.Insert(UitvoeringInfo.KlantEtiketData)
+]]></Implementation>
+</Method>
+
+<Method name="VoerUit">
+<FormalSpec>ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
+<Implementation><![CDATA[
+	Do ..LabelPrinterImpl.Clear()
+	set Iterator = ##class(TECH.ListIterator).%New(..KlantEtiketDataLijst)
+	while Iterator.HasNext() {
+		do ..VoegToeEtiket(Iterator.Next())
+	}
+	Do ..LabelPrinterImpl.Print2Bartender()
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeEtiket">
+<FormalSpec>KlantEtiketData:APPS.Halux.PPS.Activiteit.impl.common.dto.KlantEtiketData</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Etiket = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten.Etiket).%New()
+	Set Etiket.Aantal = KlantEtiketData.Aantal
+	Set Etiket.Layout = KlantEtiketData.Layout
+	Set Etiket.Device = KlantEtiketData.Device
+	Set Etiket.Taal = KlantEtiketData.Taal
+	Set Etiket.LogoLocatie = KlantEtiketData.LogoLocatie
+	Set Etiket.TypeNaam = KlantEtiketData.TypeNaam
+	Set Etiket.Code = KlantEtiketData.Code
+	Set Etiket.Dimensie = KlantEtiketData.Dimensie
+	Set Etiket.WandDikte = KlantEtiketData.WandDikte
+	Set Etiket.Kleurcodes = KlantEtiketData.Kleurcodes
+	Set Etiket.Omschrijving1 = KlantEtiketData.Omschrijving1
+	Set Etiket.Omschrijving2 = KlantEtiketData.Omschrijving2
+	Set Etiket.DuurzaamBosbeheerCertificaatLogoLocatie = KlantEtiketData.DuurzaamBosbeheerCertificaatLogoLocatie
+	Set Etiket.BarcodeID = KlantEtiketData.BarcodeID
+	Set Etiket.LadeAfbeeldingLocatie = KlantEtiketData.LadeAfbeeldingLocatie
+	Set Etiket.LandVanHerkomst = KlantEtiketData.LandVanHerkomst
+	Set Etiket.AantalTitel = KlantEtiketData.AantalTitel
+	Set Etiket.AantalStuks = KlantEtiketData.AantalStuks
+	Set Etiket.IdentNr = KlantEtiketData.IdentNr
+	Set Etiket.Info1 = KlantEtiketData.Info1
+	Set Etiket.Info2 = KlantEtiketData.Info2
+	Set Etiket.Info3 = KlantEtiketData.Info3
+	Set Etiket.Info4 = KlantEtiketData.Info4
+	Set Etiket.OrderTitel = KlantEtiketData.OrderTitel
+	Set Etiket.OrderID = KlantEtiketData.OrderID
+	Set Etiket.DossierTitel = KlantEtiketData.DossierTitel
+	Set Etiket.Dossier = KlantEtiketData.Dossier
+	Set Etiket.Verzendwijze = KlantEtiketData.Verzendwijze
+	Do ..LabelPrinterImpl.Add(Etiket)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>