Index: DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml
===================================================================
diff -u -r903 -r946
--- DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml	(.../DataMBonlijnFactory.cls.xml)	(revision 903)
+++ DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml	(.../DataMBonlijnFactory.cls.xml)	(revision 946)
@@ -1,37 +1,37 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-07 20:00:15">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-18 10:50:53">
 <Class name="DOM.OV.impl.DataM.DataMBonlijnFactory">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62157,72086.54276</TimeChanged>
+<TimeChanged>62168,39134.684713</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="Create">
 <ClassMethod>1</ClassMethod>
-<FormalSpec>LijnNummer:%Integer,LijnInfo:%String</FormalSpec>
+<FormalSpec>Bon:DOM.OV.Bon="",LijnNummer:%Integer,LijnInfo:%String</FormalSpec>
 <ReturnType>DOM.OV.Orderlijn</ReturnType>
 <Implementation><![CDATA[
 	Set Bonlijn = ""
 	Set Type = $P($P(LijnInfo,"\",17),"#")
 	If (Type = ##class(DOM.OV.enu.BonlijnType).Product())
 	{
-		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMProductOrderlijn).%New(LijnNummer, LijnInfo)
+		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMProductOrderlijn).%New(Bon,LijnNummer, LijnInfo)
 	}
 	ElseIf (Type [ ##class(DOM.OV.enu.BonlijnType).Manueel())
 	{
-		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMManueleOrderlijn).%New(LijnNummer, LijnInfo)
+		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMManueleOrderlijn).%New(Bon,LijnNummer, LijnInfo)
 	}
-	ElseIf (Type [ ##class(DOM.OV.enu.BonlijnType).Tekst())
+	ElseIf (Type [ ##class(DOM.OV.enu.BonlijnType).Tekst())||(Type ="T")
 	{
-		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMTekstOrderlijn).%New(LijnNummer, LijnInfo)
+		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMTekstOrderlijn).%New(Bon,LijnNummer, LijnInfo)
 	}
 	ElseIf (Type [ ##class(DOM.OV.enu.BonlijnType).OrderVerwijzing())
 	{
-		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMOrderVerwijzingOrderlijn).%New(LijnNummer, LijnInfo)
+		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMOrderVerwijzingOrderlijn).%New(Bon,LijnNummer, LijnInfo)
 	}
 	Quit Orderlijn
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="2747198335"/>
+<Checksum value="2548234412"/>
 </Export>