Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r48475 -r48476
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 48475)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 48476)
@@ -1068,10 +1068,10 @@
 	#dim Result as %String = ""
 	#dim TekstLijnIterator as TECH.Iterator = ##class(TECH.ListIterator).%New(..GeefTekstlijnenVoorAfdrukDocumentType(AfdrukDocumentType))
 	While (TekstLijnIterator.HasNext()){
-		#dim Lijn as DOM.VKP.TekstOrderlijn = TekstLijnIterator.Next()
+		#dim TekstLijn as DOM.VKP.TekstOrderlijn = TekstLijnIterator.Next()
 
-		#dim Tekst as %String = Lijn.GeefTekst()
-		#dim IsOpgegevenPakketId As %Boolean = (Lijn.GeefPakketId() = PakketId)
+		#dim Tekst as %String = TekstLijn.GeefTekst()
+		#dim IsOpgegevenPakketId As %Boolean = (TekstLijn.GeefPakketId() = PakketId)
 		
  		if IsOpgegevenPakketId && $Length(Tekst) {
 		 		Set Result = Result _ $Select($Length(Result):$$$CRLF,1:"") _ Tekst
@@ -1089,14 +1089,14 @@
 	Set TekstLijnenLijst = ##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()
+		#dim TekstLijn as DOM.VKP.TekstOrderlijn = TekstLijnIterator.Next()
 		
-		#dim IsTekstLijnVanOrder As %Boolean = $$$Not(Lijn.IsGekoppeldAanProductLijn())
-		#dim IsOpgegevenAfdrukDocumentType As %Boolean = (##class(TECH.StringUtils).Contains(Lijn.GeefAfdrukkenOp(),AfdrukDocumentType) || (AfdrukDocumentType = ""))
-		#dim IsOpgegevenPakketId As %Boolean = (Lijn.GeefPakketId() = PakketId)
+		#dim IsTekstLijnVanOrder As %Boolean = $$$Not(TekstLijn.IsGekoppeldAanProductLijn())
+		#dim IsOpgegevenAfdrukDocumentType As %Boolean = (##class(TECH.StringUtils).Contains(TekstLijn.GeefAfdrukkenOp(),AfdrukDocumentType) || (AfdrukDocumentType = ""))
+		#dim IsOpgegevenPakketId As %Boolean = (TekstLijn.GeefPakketId() = PakketId)
 		
 		If IsTekstLijnVanOrder && IsOpgegevenAfdrukDocumentType && IsOpgegevenPakketId {
-			Do TekstLijnenLijst.Insert(Lijn)
+			Do TekstLijnenLijst.Insert(TekstLijn)
  		}		
 	}
 	Quit TekstLijnenLijst