Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r51286 -r51420
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 51286)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 51420)
@@ -79,6 +79,12 @@
 <Transient>1</Transient>
 </Property>
 
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+<Transient>1</Transient>
+</Property>
+
 <Property name="EindPersonalityBepaler">
 <Type>DOM.VKP.impl.EindPersonalityBepaler</Type>
 <Private>1</Private>
@@ -707,6 +713,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="LoggerGet">
+<Private>1</Private>
+<ReturnType>vhLib.Logger</ReturnType>
+<Implementation><![CDATA[
+	If (r%Logger = "")
+	{
+		set r%Logger = ##class(vhLib.Logger).%New()
+	}
+	Quit r%Logger
+]]></Implementation>
+</Method>
+
 <Method name="GeefVolgNrVoorUniekLijnNrStored">
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>
@@ -1163,15 +1181,16 @@
 <FormalSpec>AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType,GekoppeldAanProductLijn:%String="",PakketId:%String=""</FormalSpec>
 <Implementation><![CDATA[
 	#dim TekstLijnIterator as TECH.Iterator = ..GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Tekst())
-	While (TekstLijnIterator.HasNext()){		
+	While (TekstLijnIterator.HasNext()){	
 		#dim Lijn as DOM.VKP.TekstOrderlijn = TekstLijnIterator.Next()
-		
+
 		#dim IsTekstLijnVanOrder As %Boolean = ($$$Not(Lijn.IsGekoppeldAanProductLijn()) && (GekoppeldAanProductLijn = ""))
 		#dim IsTekstLijnVanProductLijn As %Boolean = (Lijn.GeefGekoppeldAanProductLijn() = GekoppeldAanProductLijn)
-		#dim IsOpgegevenAfdrukDocumentType As %Boolean = (Lijn.GeefAfdrukkenOp() = AfdrukDocumentType) || (AfdrukDocumentType = "")
+		#dim IsOpgegevenAfdrukDocumentType As %Boolean = (Lijn.GeefAfdrukkenOp() [ AfdrukDocumentType) || (AfdrukDocumentType = "")
 		#dim IsOpgegevenPakketId As %Boolean = (Lijn.GeefPakketId() = PakketId)
 		
 		if (IsTekstLijnVanProductLijn || IsTekstLijnVanOrder) && IsOpgegevenAfdrukDocumentType && IsOpgegevenPakketId {
+			Do ..Logger.Debug("VerwijderTekstVoorAfdrukDocumentType", GekoppeldAanProductLijn)
 			Do ..OrderLijnen.RemoveAt(Lijn.GeefLijnVolgNr())
 			Do ..VerwijderdeOrderLijnen.Insert(Lijn.GeefLijnVolgNr())
  		}