Index: vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r66821 -r71621
--- vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 66821)
+++ vhTest/Mock/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 71621)
@@ -28,6 +28,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefDnaCodeVoorDubbeleAfdruk">
+<FormalSpec>BatchId:%String,Sequentienummer:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDnaCodeVoorDubbeleAfdruk",BatchId,Sequentienummer)
+]]></Implementation>
+</Method>
+
 <Method name="GeefVolgendeAfTeDrukkenDnaCode">
 <FormalSpec>ToeleveringID:%String,ProductID:%String,SequentieNummer:%String="",Herafdruk:%Boolean=$$$False,BatchId:%String="",IsKlantEtiketSpaceStep:%Boolean=$$$False</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml
===================================================================
diff -u -r71619 -r71621
--- APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml	(.../MaatwerkProductEtiketten.cls.xml)	(revision 71619)
+++ APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml	(.../MaatwerkProductEtiketten.cls.xml)	(revision 71621)
@@ -50,8 +50,9 @@
 <Private>1</Private>
 </Property>
 
-<Property name="DnaCodeRepository">
-<Type>DOM.Halux.AAP.DnaCodeRepository</Type>
+<Property name="DnaCodeService">
+<Type>APPS.Halux.AAP.DnaCodeService</Type>
+<Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
@@ -66,7 +67,7 @@
 	Set ..DueOutFormatter = ##class(APPS.Halux.PPS.impl.BatchDueOutFormatter).%New()
 	Set ..ProductAPI = ##class(DOM.PM.impl.ProductAPI).%New()
 	Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
-	Set ..DnaCodeRepository = ##class(DOM.Halux.AAP.DnaCodeRepository).%New()
+	Set ..DnaCodeService =  ##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService")
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -129,7 +130,7 @@
 					Set Etiket = ..EtiketBuilder.MaakMaatwerkProductInVHossViaVHossProdSeqItem(UitvoeringInfo)
 				} Else {
 					#dim ToeleveringID As %String = UitvoeringInfo.ToeleveringID
-					#dim DnaCode As %String = ..GeefDnaCodeVoorExtraAfdruk(UitvoeringInfo)
+					#dim DnaCode As %String = ..DnaCodeService.GeefDnaCodeVoorDubbeleAfdruk(UitvoeringInfo.BatchID, UitvoeringInfo.SequentieNummer)
 					
 					Set Etiket = ..EtiketBuilder.MaakMaatwerkProductViaToeleveringEnLijnID(ToeleveringID, UitvoeringInfo.ToeleveringLijnID, 1, UitvoeringInfo.PrinterID, UitvoeringInfo.SequentieNummer, DnaCode,, IsKlantEtiketSpaceStep)
 				}
@@ -237,24 +238,6 @@
 	Quit IsSpoelbakeLade || IsSifonLade || IsSmalleLade
 ]]></Implementation>
 </Method>
-
-<Method name="GeefDnaCodeVoorExtraAfdruk">
-<FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.KlantEtiketUitvoeringInfo</FormalSpec>
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim DnaCode As %String = ""
-	#dim DnaCodeIterator As TECH.Iterator = ..DnaCodeRepository.ZoekViaBatchIdEnSequentienummer(UitvoeringInfo.BatchID, UitvoeringInfo.SequentieNummer)
-	#dim DnaCodeLijst As %ListOfObjects = ##class(TECH.ListUtils).IteratorToList(DnaCodeIterator)
-		
-	If (DnaCodeLijst.Size = 1) {
-		#dim DnaCodeObject As DOM.Halux.AAP.DnaCode = DnaCodeLijst.GetAt(1)
-		Set DnaCode = DnaCodeObject.DnaCode
-	}
-	
-	Quit DnaCode
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r66826 -r71621
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 66826)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 71621)
@@ -243,6 +243,25 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="GeefDnaCodeVoorDubbeleAfdruk">
+<FormalSpec>BatchId:%String,Sequentienummer:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim DnaCode As %String = ""
+	#dim DnaCodeIterator As TECH.Iterator = ..DnaCodeRepository.ZoekViaBatchIdEnSequentienummer(BatchId, Sequentienummer)
+	#dim DnaCodeLijst As %ListOfObjects = ##class(TECH.ListUtils).IteratorToList(DnaCodeIterator)
+		
+	If (DnaCodeLijst.Size = 1) {
+		#dim DnaCodeObject As DOM.Halux.AAP.DnaCode = DnaCodeLijst.GetAt(1)
+		Set DnaCode = DnaCodeObject.DnaCode
+	} Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.DataCorruptException).%New("Er zijn '" _ DnaCodeLijst.Size _ "' DnaCodes gevonden in plaats van 1."))
+	}
+	
+	Quit DnaCode
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r63566 -r71621
--- vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 63566)
+++ vhTest/Fake/APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 71621)
@@ -21,6 +21,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefDnaCodeVoorDubbeleAfdruk">
+<FormalSpec>BatchId:%String,Sequentienummer:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="MagDnaCodeBijgewerktWorden">
 <FormalSpec>DnaCode:DOM.Halux.AAP.DnaCode,ProductID:%String,Herafdruk:%Boolean,SequentieNummer:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>