Index: APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/Geen/EtiketPrinter.cls.xml
===================================================================
diff -u -r59977 -r60704
--- APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/Geen/EtiketPrinter.cls.xml	(.../EtiketPrinter.cls.xml)	(revision 59977)
+++ APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/Geen/EtiketPrinter.cls.xml	(.../EtiketPrinter.cls.xml)	(revision 60704)
@@ -17,7 +17,7 @@
 </Method>
 
 <Method name="PrintKlantEtiket">
-<FormalSpec>Batch:APPS.Halux.common.Batch,Parameters:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,Parameters:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters,LijstDnacode:%ListOfDataTypes=""</FormalSpec>
 </Method>
 
 <Storage name="Default">
Index: WSimpl/Halux/AAP/AfdrukService.cls.xml
===================================================================
diff -u -r60679 -r60704
--- WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 60679)
+++ WSimpl/Halux/AAP/AfdrukService.cls.xml	(.../AfdrukService.cls.xml)	(revision 60704)
@@ -223,67 +223,80 @@
 		} 	
 		
 	}
-		
+	
+	Set Iterator = ##class(TECH.IteratorOfIterators).%New()
+	;Do Iterator.SetIterators(..GeefBodemIterator(), ..GeefFrontIterator(), ..GeefRugIterator(), ..GeefZijkantIterator())
 	// iterator van iteratoren van alle lijsten
-	// ItereatorOfIterators
+	// IteratorOfIterators
 	// gaat factory op roepen en print klant etiket uitvoeren
 	// PrintKlantEtiketVanDnaCodes --> PrintKlantEtiketMetDnaCodes
 	// PrintKlantEtiket dus gebruiken bij de printer nog de dnacode gaan toevoegen
 	// de factory kan gebruikt worden dan ook
 	// eerst NBO horen dan Pieter
 	
 	
+	Set PrinterFactory = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.PrinterFactory).%New()
 	#dim Printer As APPS.Halux.PPS.AansturingActie.common.KlantEtiket.Printer = ""
+	Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 	
+	
 	If (KaderdeurDnaCodesLijst.Count() > 0) {
 		#dim KaderdeurDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(KaderdeurDnaCodesLijst)
 		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.KAD.Printer).%New()
+		//Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.KAD.Printer).%New()
 		Do Printer.PrintKlantEtiket(,, KaderdeurDnaCodesLijst)		
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 	}
 	
 	If (MatDnaCodesLijst.Count() > 0) {
 		#dim MatDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(MatDnaCodesLijst)
 		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Mat.Printer).%New()
-		Do Printer.PrintKlantEtiket(,, MatDnaCodesLijst)
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Mat.Printer).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
+		Do Printer.PrintKlantEtiket(,, MatDnaCodesLijst)		
 	}
 	
 	If (InpakDnaCodesLijst.Count() > 0) {
 		#dim InpakDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(InpakDnaCodesLijst)
 		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Inpak.Printer).%New()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Inpak.Printer).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, InpakDnaCodesLijst)
 	}
 	
 	If (OnbepaaldDnaCodesLijst.Count() > 0) {
 		#dim OnbepaaldDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(OnbepaaldDnaCodesLijst)
 		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Onbepaald.Printer).%New()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Onbepaald.Printer).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, OnbepaaldDnaCodesLijst)
 	}
 	
 	If (ProductOpMaatDnaCodesLijst.Count() > 0) {
 		#dim ProductOpMaatDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(ProductOpMaatDnaCodesLijst)
 		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.ProductOpMaat.Printer).%New()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.ProductOpMaat.Printer).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, ProductOpMaatDnaCodesLijst)
 	}
 	
 	If (KastDnaCodesLijst.Count() > 0) {
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.MaatwerkInVHOSS.EtiketPrinter).%New()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.MaatwerkInVHOSS.EtiketPrinter).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, KastDnaCodesLijst)
 	}
 	
 	If (TAORboxDnaCodesLijst.Count() > 0) {
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.Taorbox.KlantEtiket.Geen.EtiketPrinter).%New()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.Taorbox.KlantEtiket.Geen.EtiketPrinter).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, TAORboxDnaCodesLijst)	
 	}
 	
 	If (MaatwerkDnaCodesLijst.Count() > 0) {
 		#dim MaatwerkDnaCodesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(MaatwerkDnaCodesLijst)
-		
-		Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.ProductOpMaat.Printer).%New()
+		set test = MaatwerkDnaCodesIterator.HasNext()
+		;Set Printer = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.ProductOpMaat.Printer).%New()
+		Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
 		Do Printer.PrintKlantEtiket(,, MaatwerkDnaCodesLijst)
 	}
 
Index: APPS/Halux/PPS/AansturingActie/common/KlantEtiket/Printer.cls.xml
===================================================================
diff -u -r59979 -r60704
--- APPS/Halux/PPS/AansturingActie/common/KlantEtiket/Printer.cls.xml	(.../Printer.cls.xml)	(revision 59979)
+++ APPS/Halux/PPS/AansturingActie/common/KlantEtiket/Printer.cls.xml	(.../Printer.cls.xml)	(revision 60704)
@@ -7,7 +7,7 @@
 
 <Method name="PrintKlantEtiket">
 <Abstract>1</Abstract>
-<FormalSpec>Batch:APPS.Halux.common.Batch,Parameters:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters=""</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,Parameters:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters="",LijstDnacode:%ListOfDataTypes=""</FormalSpec>
 </Method>
 
 <Method name="GeefResultaatOmschrijving">