Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Printer.cls.xml
===================================================================
diff -u -r61126 -r61131
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Printer.cls.xml	(.../Printer.cls.xml)	(revision 61126)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Printer.cls.xml	(.../Printer.cls.xml)	(revision 61131)
@@ -53,7 +53,7 @@
 			Set itLijnen = Toelevering.GeefTypeToeleveringLijnIterator(##class(DOM.AKP.enu.ToeleveringLijnType).Product())
 			While itLijnen.HasNext() {
 				#dim Lijn As DOM.AKP.ProductToeleveringLijn = itLijnen.Next()
-				#dim DnaCode As %String = ..GeefDnaCode(Toelevering.GeefID(), Lijn.GeefProductID())
+				#dim DnaCode As %String = ""
 				Do PRINT^HADETIK("|PRN|\\FOP\ICT","T",Toelevering.GeefID(),Lijn.GeefLijnVolgNr(),Lijn.GeefProductID(),..GeefLijnAantal(Lijn),VoorkeurPrinter,DnaCode)
 			}
 		}
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/ResetBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT
===================================================================
diff -u -r59495 -r61131
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/ResetBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT	(.../HALUX_productie_TAOR_KlantKAD8x11.TXT)	(revision 59495)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/ResetBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT	(.../HALUX_productie_TAOR_KlantKAD8x11.TXT)	(revision 61131)
@@ -1,3 +1,3 @@
 %BTW% /AF="C:\Bartender\Templates\KlantKAD8x11.btw" /PRN="HALUX_productie_TAOR" /R=3 /P  /D=<Trigger File Name> /CLOSE
 %END%
-LOGO\Logo VHZwart.svg	UNITTEST KLANT	Sint Niklaas	Order	322.222	Ref : 	K.CC.KI.9	Deur - Links	H:546 x B:594	PBG-EV : Breed glas geanodiseerd	FZ : Float gezuurd		UNITTES	Dossier		KCCKI9		
+LOGO\Logo VHZwart.svg	UNITTEST KLANT	Sint Niklaas	Order	322.222	Ref : 	K.CC.KI.9	Deur - Links	H:546 x B:594	PBG-EV : Breed glas geanodiseerd	FZ : Float gezuurd		UNITTES	Dossier		KCCKI9		TestDnaCode
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/StartBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT
===================================================================
diff -u -r59495 -r61131
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/StartBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT	(.../HALUX_productie_TAOR_KlantKAD8x11.TXT)	(revision 59495)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Kaderdeur.Aansturing/Test001/StartBatch/HALUX_productie_TAOR_KlantKAD8x11.TXT	(.../HALUX_productie_TAOR_KlantKAD8x11.TXT)	(revision 61131)
@@ -1,3 +1,3 @@
 %BTW% /AF="C:\Bartender\Templates\KlantKAD8x11.btw" /PRN="HALUX_productie_TAOR" /R=3 /P  /D=<Trigger File Name> /CLOSE
 %END%
-LOGO\Logo VHZwart.svg	UNITTEST KLANT	Sint Niklaas	Order	322.222	Ref : 	K.CC.KI.9	Deur - Links	H:546 x B:594	PBG-EV : Breed glas geanodiseerd	FZ : Float gezuurd		UNITTES	Dossier		KCCKI9		
+LOGO\Logo VHZwart.svg	UNITTEST KLANT	Sint Niklaas	Order	322.222	Ref : 	K.CC.KI.9	Deur - Links	H:546 x B:594	PBG-EV : Breed glas geanodiseerd	FZ : Float gezuurd		UNITTES	Dossier		KCCKI9		TestDnaCode
Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r60929 -r61131
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 60929)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 61131)
@@ -218,6 +218,9 @@
 	If $$$Not(..ProjectSettingsApi.IsActiefDnaCodeOpEtiket()) {
 		Quit ""
 	}
+	If ##class(TECH.Context.RuntimeContext).Instance().GeefApplicatie() = "IntegratieTest" {
+		Quit "TestDnaCode"
+	}
 	#dim Result As %String = ""
 	#dim DnaCodeIterator As TECH.Iterator
 	Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringIdEnStatus(ToeleveringID,##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBatch())
Index: HADETIK.mac.rou
===================================================================
diff -u -r61126 -r61131
--- HADETIK.mac.rou	(.../HADETIK.mac.rou)	(revision 61126)
+++ HADETIK.mac.rou	(.../HADETIK.mac.rou)	(revision 61131)
@@ -426,11 +426,6 @@
  
 	 If $E($$$PRGet($$$KortTekst),1,3)="Z37" Do  Quit ; Glazen boxside op maat
 	 . Do ##class(CHUI.Prod.ProductLabel).PrintVHMaatwerkMetDnaCodes(PRNr,$G(C("KLNMBIG")),$G(C("TOENR")),$G(C("ORDNR")),Aantal,"",$G(C("DNACODE")))
-   
-	 If DnaCode="" && ObjTyp = "T" && ##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefDnaCodeOpEtiket(){
-		Set DnaCode = ##class(APPS.Halux.AAP.DnaCodeService).%New().GeefVolgendeAfTeDrukkenDnaCode(ObjRef,PRNr,"") 
-		Set Aantal = 1
-	 }
  
 	 Set ProdGrp=##class(BL.PPS.TBX.LeanBatch).%New().ProdGrp(PRNr,$G(C("KLNR")))
 	 Quit:ProdGrp?1(1"A",1"B") ; VHoss - wordt afgedrukt NA de optimalisatie
@@ -443,7 +438,10 @@
  	 Set C("LOGO")=$G(^IPCom("CS","LOGO4682",0))
 	 Set:$D(^IPCom("CS","LOGO"_C("KLNR"))) C("LOGO")=$G(^IPCom("CS","LOGO"_C("KLNR"),0))
 	 Set:($G(C("KLNR"))=$$$KlantDKGDeKeukenfabriek) C("LOGO")=""
+	 
 	 For Loop=1:1:$G(C("AANTAL"),Aantal) Do
+	 . If (DnaCode="") && (ObjTyp = "T") && ##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefDnaCodeOpEtiket() Do
+	 . . Set C("DNACODE")=##class(APPS.Halux.AAP.DnaCodeService).%New().GeefVolgendeAfTeDrukkenDnaCode(ObjRef,PRNr,"")
 	 . If $G(C("HASCHARGE")) Do CHARGEID(.C) ; aanpassen ChargeID per product
 	 . Merge %Print2File($G(C("LABELSIZE"),"10x10"),C("LABELTYP"),%Print2File)=C ; onthouden vn de definities
 	 . Set %Print2File=%Print2File+1