Index: WSimpl/Halux/AAP/AfdrukService.cls.xml
===================================================================
diff -u -r61730 -r74853
--- WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 61730)
+++ WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 74853)
@@ -48,8 +48,18 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductLabel">
+<Type>CHUI.Prod.ProductLabel</Type>
+<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=""</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>
@@ -63,6 +73,8 @@
 	Set ..SequentieService = $$$Inject(SequentieService, ##class(APPS.Halux.common.impl.SequentieService).%New())
 	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>
@@ -80,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()
@@ -110,25 +139,20 @@
 		If ProductEtiketAfdrukkenRequest.DnaCodes.Count() = 0 {
 			Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen DnaCodes aangeleverd om af te drukken"))
 		}
-		#dim DnaCodeIterator As TECH.Iterator = ..EtiketAfdrukkenHelper.MaakDnaCodeIteratorVanDnaCodeStringLijst(ProductEtiketAfdrukkenRequest.DnaCodes)
-		#dim DnaCode As TECH.Iterator = DnaCodeIterator.Next()
-		Do DnaCodeIterator.Reset()
 		
+		#dim DnaCodeIterator As TECH.Iterator = ..EtiketAfdrukkenHelper.MaakDnaCodeIteratorVanDnaCodeStringLijst(ProductEtiketAfdrukkenRequest.DnaCodes)
+	
 		While DnaCodeIterator.HasNext() {
 			#dim DnaCodeInfo As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next()
-			//Set PRNr = DnaCodeInfo.ProductNummer
-			
-			//Do ##class(CHUI.Prod.ProductLabel).DoOne(DnaCodeInfo.ProductNummer) //PRNr
-			//Do ##class(CHUI.Prod.ProductLabel).PrintProductEtiketMetDnaCode(DnaCodeInfo) //PRNr
+			Do ..ProductLabel.PrintMaatwerkMetDnaCodes(DnaCodeInfo)
 		}
-						
+		
 		Set Response.Header.Status = "200"
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Set Response.Header.Status = Exception.GeefExceptionCode()
 		Set Response.Header.Omschrijving = Exception.GeefOmschrijving()
 	}
-	
 	Quit Response
 ]]></Implementation>
 </Method>
@@ -161,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[
@@ -334,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>