Index: APPS/MAG/LabelPrintService.cls.xml
===================================================================
diff -u -r67491 -r67572
--- APPS/MAG/LabelPrintService.cls.xml	(.../LabelPrintService.cls.xml)	(revision 67491)
+++ APPS/MAG/LabelPrintService.cls.xml	(.../LabelPrintService.cls.xml)	(revision 67572)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.MAG.LabelPrintService">
-<Super>%RegisteredObject</Super>
+<Super>TECH.RegisteredObject</Super>
 
 <Property name="LabelPrinter">
 <Type>BL.Sys.LabelPrinter</Type>
@@ -62,11 +62,16 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set Etiketten = ##class(%ListOfObjects).%New()
-	Set Etiket = ##class(BL.Etiket.EenBarcodeEtiket).%New()
-	Set Etiket.Tekst = Tekst	
-
-	Set Etiket.Device = ##class(BL.Sys.LabelPrinter).DefaultDevice("1BARCODEETIKET")	
-	Do Etiketten.Insert(Etiket)
+	Set i = ##class(TECH.StringIterator).%New(Tekst,$CHAR(10))
+	while i.HasNext(){
+		#dim DeTekst as %String = i.Next()
+		Set Etiket = ##class(BL.Etiket.EenBarcodeEtiket).%New()
+		Set Etiket.Tekst = ##class(TECH.StringUtils).VervangNietPrintbareKaraktersDoorSpatie(DeTekst)
+		if $l(##class(TECH.StringUtils).TrimWhitespaces( Etiket.Tekst)) {
+			Set Etiket.Device = ##class(BL.Sys.LabelPrinter).DefaultDevice("1BARCODEETIKET")	
+			Do Etiketten.Insert(Etiket)
+		}
+	}
 	Quit Etiketten
 ]]></Implementation>
 </Method>