Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Inpak/Printer.cls.xml
===================================================================
diff -u -r59948 -r59992
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Inpak/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59948)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Inpak/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59992)
@@ -16,7 +16,11 @@
 <FormalSpec>ToeleveringID:%String,ProductID:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ""
+<Implementation><![CDATA[
+	#dim DnaCodeService As APPS.Halux.AAP.DnaCodeService 
+	Set DnaCodeService = ##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService")
+
+	quit DnaCodeService.GeefVolgendeAfTeDrukkenDnaCode(ToeleveringID, ProductID,"")
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Onbepaald/Printer.cls.xml
===================================================================
diff -u -r59948 -r59992
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Onbepaald/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59948)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Onbepaald/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59992)
@@ -16,7 +16,11 @@
 <FormalSpec>ToeleveringID:%String,ProductID:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ""
+<Implementation><![CDATA[
+	#dim DnaCodeService As APPS.Halux.AAP.DnaCodeService 
+	Set DnaCodeService = ##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService")
+
+	quit DnaCodeService.GeefVolgendeAfTeDrukkenDnaCode(ToeleveringID, ProductID,"")
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/ProductOpMaat/Printer.cls.xml
===================================================================
diff -u -r59948 -r59992
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/ProductOpMaat/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59948)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/ProductOpMaat/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59992)
@@ -16,7 +16,11 @@
 <FormalSpec>ToeleveringID:%String,ProductID:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ""
+<Implementation><![CDATA[
+	#dim DnaCodeService As APPS.Halux.AAP.DnaCodeService 
+	Set DnaCodeService = ##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService")
+
+	quit DnaCodeService.GeefVolgendeAfTeDrukkenDnaCode(ToeleveringID, ProductID,"")
 ]]></Implementation>
 </Method>
 </Class>