Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r48187 -r48357
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 48187)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 48357)
@@ -1066,11 +1066,11 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Result as %String = ""
-	#dim TekstLijnIterator as TECH.Iterator = ##class(TECH.ListIterator).%New(..GeefTekstlijnenVoorAfdrukDocumentType(##class(DOM.VKP.enu.OrderLijnType).Tekst()))
+	#dim TekstLijnIterator as TECH.Iterator = ##class(TECH.ListIterator).%New(..GeefTekstlijnenVoorAfdrukDocumentType(AfdrukDocumentType))
 	While (TekstLijnIterator.HasNext()){
 		#dim Tekst as %String = TekstLijnIterator.Next().GeefTekst()
  		if $Length(Tekst) {
-		 		Set Result = $Select($Length(Result):$$$CRLF,1:"") _ Tekst
+		 		Set Result = Result _ $Select($Length(Result):$$$CRLF,1:"") _ Tekst
  		}		
 	}
 	Quit Result