Index: APPS/common/Print/impl/PrintAPI.cls.xml
===================================================================
diff -u -r41597 -r59692
--- APPS/common/Print/impl/PrintAPI.cls.xml	(.../PrintAPI.cls.xml)	(revision 41597)
+++ APPS/common/Print/impl/PrintAPI.cls.xml	(.../PrintAPI.cls.xml)	(revision 59692)
@@ -24,6 +24,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefZPLPrinter">
+<FormalSpec>Toepassing:%String="",ComputerNaam:%String=..#DefaultComputerID</FormalSpec>
+<ReturnType>APPS.common.Print.ZPLPrinter</ReturnType>
+<Implementation><![CDATA[
+	#dim DeviceString as %String = ""
+	;bepaal device if wkstation, toepassing
+	Set DeviceString = $Get(^TECH("PRINT",Toepassing,ComputerNaam,"ZPLPrinter","Device"))
+	if $Length(DeviceString){
+		Quit ##class(APPS.common.Print.impl.ZPLPrinter).%New(DeviceString)
+	} else {
+		;TODO fout smijten
+		;geen printer definitie
+	}
+	
+	Quit ##class(APPS.common.Print.impl.ZPLPrinter).%New(DeviceString)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLabelPrinter">
 <FormalSpec>Toepassing:%String="",ComputerNaam:%String=..#DefaultComputerID</FormalSpec>
 <ReturnType>APPS.common.Print.LabelPrinter</ReturnType>