Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml
===================================================================
diff -u -r59955 -r59957
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml	(.../KlantEtiket.cls.xml)	(revision 59955)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml	(.../KlantEtiket.cls.xml)	(revision 59957)
@@ -30,10 +30,12 @@
 <Implementation><![CDATA[
 	#dim Batch As APPS.Halux.common.Batch = ##class(APPS.Halux.common.impl.BatchService).%New().GeefBatch(BatchID)
 	
-	#dim Printer As APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Printer = ..PrinterFactory.GeefKlantEtiketPrinter(Batch.GeefCategorie())
+	#dim DropBoxPrinter As APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Printer = ""
+	Set DropBoxPrinter = ..PrinterFactory.GeefKlantEtiketPrinter(Batch.GeefCategorie())
 	
-	If (Printer.%ClassName(1) = "APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Geen.Printer") {
-
+	If (..IsDropBoxPrinter(DropBoxPrinter)) {
+		Do DropBoxPrinter.PrintKlantEtiketToDropFolder(Batch)
+	} Else {
 		#dim PrintSpecifiekEtiket As %Boolean = (ActieParameters.Count() > 0)
 		#dim ToeleveringID As %String = ""
 		#dim Dossiercode As %String = ""
@@ -63,14 +65,20 @@
 		Do KlantEtiketPrinter.PrintKlantEtiket(Batch, PrintSpecifiekEtiket, ToeleveringID, Dossiercode, Aantal)
 		
 		Set ..ResultaatOpmerking = KlantEtiketPrinter.GeefResultaatOmschrijving()
-	} Else {
-		Do Printer.PrintKlantEtiketToDropFolder(Batch)
 	} 
 
 	Quit ..GeefGeslaagdAansturingResultaat()
 ]]></Implementation>
 </Method>
 
+<Method name="IsDropBoxPrinter">
+<FormalSpec>DropBoxPrinter:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Printer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not(DropBoxPrinter.%ClassName(1) = "APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Geen.Printer")
+]]></Implementation>
+</Method>
+
 <Method name="GeefParameters">
 <FormalSpec>BatchID:%String=""</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
@@ -113,7 +121,6 @@
 <Type>%Library.CacheStorage</Type>
 <DefaultData>KlantEtiketDefaultData</DefaultData>
 <Data name="KlantEtiketDefaultData">
-<Structure>listnode</Structure>
 <Subscript>"KlantEtiket"</Subscript>
 <Value name="1">
 <Value>PrinterFactory</Value>