Index: WSimpl/Halux/AAP/AfdrukService.cls.xml
===================================================================
diff -u -r62322 -r74853
--- WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 62322)
+++ WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 74853)
@@ -53,8 +53,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProjectSettingsAPI">
+<Type>DOM.common.ProjectSettingsAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",DocsV1:BL.PPS.TBX.DocsV1="",EtiketAfdrukkenHelper:WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper,BatchService:APPS.Halux.common.impl.BatchService="",PrinterFactory:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.PrinterFactory="",SequentieService:APPS.Halux.common.impl.SequentieService="",WerklijstItemMaker:APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.KlantEtiketWerklijstItemMaker="",Verwerker:APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten="",ProductLabel:CHUI.Prod.ProductLabel=""</FormalSpec>
+<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",DocsV1:BL.PPS.TBX.DocsV1="",EtiketAfdrukkenHelper:WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper,BatchService:APPS.Halux.common.impl.BatchService="",PrinterFactory:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.PrinterFactory="",SequentieService:APPS.Halux.common.impl.SequentieService="",WerklijstItemMaker:APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.KlantEtiketWerklijstItemMaker="",Verwerker:APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.KlantEtiketten="",ProductLabel:CHUI.Prod.ProductLabel="",ProjectSettingsAPI:DOM.common.ProjectSettingsAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -69,6 +74,7 @@
 	Set ..WerklijstItemMaker = WerklijstItemMaker
 	Set ..Verwerker = Verwerker
 	Set ..ProductLabel = $$$Inject(ProductLabel, ##class(CHUI.Prod.ProductLabel).%New())
+	Set ..ProjectSettingsAPI = $$$Inject(ProjectSettingsAPI, ##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -86,16 +92,33 @@
 		}
 		
 		#dim DnaCodeIterator As TECH.Iterator = ..EtiketAfdrukkenHelper.MaakDnaCodeIteratorVanDnaCodeStringLijst(ProboxEtiketAfdrukkenRequest.DnaCodes)
-		#dim DnaCode As TECH.Iterator = DnaCodeIterator.Next()
-		Do DnaCodeIterator.Reset()
+		#dim DnaCode As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next()
 		
-		#dim TeGebruikenPrinter = ..EtiketAfdrukkenHelper.MapProductieLijnOpPrinter(..EtiketAfdrukkenHelper.GeefWerkpost(DnaCode))
+		#dim TeGebruikenPrinter = ""
+		If $$$HasLength(ProboxEtiketAfdrukkenRequest.LijnWaaropGeprintMoetWorden) {
+			Set TeGebruikenPrinter = ..EtiketAfdrukkenHelper.MapLijnOpPrinter(ProboxEtiketAfdrukkenRequest.LijnWaaropGeprintMoetWorden)
+		} Else {
+			Set TeGebruikenPrinter = ..EtiketAfdrukkenHelper.MapWerkpostOpPrinter(..EtiketAfdrukkenHelper.GeefWerkpost(DnaCode))
+					
+			If (TeGebruikenPrinter = "Halux_LadeAfw_BWK") {
+				Set TeGebruikenPrinter = ..EtiketAfdrukkenHelper.VervangPrinterDoorLijnPrinter(TeGebruikenPrinter, DnaCode)
+			}
+		}
 		
+		Do DnaCodeIterator.Reset()
+		
 		If TeGebruikenPrinter = "" {
 			Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen printer gevonden voor DnaCode '"_DnaCode.DnaCode_"'"))
 		}
+		
 		Do ..DocsV1.Init(,"",TeGebruikenPrinter,"","")
 		Do ..DocsV1.ProboxInhoudEtiket(DnaCodeIterator)
+		
+		Do DnaCodeIterator.Reset()
+		
+		#dim KlantId As TECH.String = DnaCode.KlantNummer
+		Set Klant = ##class(DOM.VKP.enu.Klant.AutoComplete).%New()
+		
 		Set Response.Header.Status = "200"
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
@@ -162,11 +185,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="BevatDnaCode">
-<FormalSpec>aantalDnaCodes:%Integer</FormalSpec>
-<ReturnType>%Boolean</ReturnType>
-</Method>
-
 <Method name="VerwerkKlantEtiketAfdrukken">
 <FormalSpec>DnaCodeIterator:TECH.Iterator</FormalSpec>
 <Implementation><![CDATA[
@@ -335,6 +353,16 @@
 	Quit Lijst
 ]]></Implementation>
 </Method>
+
+<Method name="IsDnaCodeVoorLbxOfTbx">
+<FormalSpec>DnaCode:DOM.Halux.AAP.DnaCode</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Quit ##class(TECH.StringUtils).StartsWith(DnaCode.DnaCode, ##class(DOM.PM.enu.ProductTypePrefix).Legrabox()) ||
+		 ##class(TECH.StringUtils).StartsWith(DnaCode.DnaCode, ##class(DOM.PM.enu.ProductTypePrefix).Tandembox())
+]]></Implementation>
+</Method>
 </Class>