Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r47135 -r47142
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 47135)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 47142)
@@ -1036,12 +1036,28 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Result as %String = ""
-	#dim TekstLijnIterator as TECH.Iterator = ..GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Tekst())
+	#dim TekstLijnIterator as TECH.Iterator = ..GeefTextlijnenVoorAfdrukDocumentType(##class(DOM.VKP.enu.OrderLijnType).Tekst())
 	While (TekstLijnIterator.HasNext()){
+		#dim Tekst as %String = TekstLijnIterator.Next().GeefTekst()
+ 		if $Length(Tekst) {
+		 		Set Result = $Select($Length(Result):$$$CRLF,1:"") _ Tekst
+ 		}		
+	}
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="GeefTextlijnenVoorAfdrukDocumentType">
+<FormalSpec>AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType=""</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	#dim Result as %ListOfObjects = ##class(%ListOfObjects).%New()
+	#dim TekstLijnIterator as TECH.Iterator = ..GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Tekst())
+	While (TekstLijnIterator.HasNext()){		
 		#dim Lijn as DOM.VKP.TekstOrderlijn = TekstLijnIterator.Next()
  		if $$$Not(Lijn.IsGekoppeldAanProductLijn()){
-			if ##class(TECH.StringUtils).Contains(Lijn.GeefAfdrukkenOp(),AfdrukDocumentType) && $Length(Lijn.GeefTekst()){
-		 		Set Result = $Select($Length(Result):$$$CRLF,1:"") _ Lijn.GeefTekst()
+			if ##class(TECH.StringUtils).Contains(Lijn.GeefAfdrukkenOp(),AfdrukDocumentType) || (AfdrukDocumentType = "") {
+				Do Result.Insert(Lijn)
 			}
  		}		
 	}